Charles KWON OhJun
486e466592
Major changes since last commit: - FiveSql2 SQL:1999 engine (10,458 LOC) — 43/43 ALL PASS - 21 compiler/runtime bugs fixed (short-circuit AND/OR, FOR LOOP, etc.) - @byref pass-by-reference via RefCell pattern - Mutable closure capture (EnsureLocalRef + RefCell sharing) - RTL: 400 → 479 functions (+79: file, string, datetime, hash, UTF-8) - DateTime/Timestamp fully working (hb_DateTime, hb_Hour/Min/Sec, display) - Reserved word guard (39 keywords blocked from function calls) - AEval arg order fix (element before index) - Closure capture redecl fix (unique _cap_ names per block) - Hash/string indexing in ArrayPush/ArrayPop - Harbour compat test suite: 51/51 - 4 docs: Porting Report, Implementation Plan, Optimization Plan, Commercialization Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
1593 lines
67 KiB
C
1593 lines
67 KiB
C
/*
|
|
* Harbour 3.2.0dev (r2510040809)
|
|
* GNU C 13.3 (64-bit)
|
|
* Generated C source from "test/test_sql1999.prg"
|
|
*/
|
|
|
|
#include "hbvmpub.h"
|
|
#include "hbinit.h"
|
|
|
|
|
|
HB_FUNC( MAIN );
|
|
HB_FUNC_EXTERN( ERRORBLOCK );
|
|
HB_FUNC_EXTERN( QOUT );
|
|
HB_FUNC_EXTERN( BREAK );
|
|
HB_FUNC_STATIC( SETUPDATA );
|
|
HB_FUNC_EXTERN( __QUIT );
|
|
HB_FUNC_STATIC( TESTCTE );
|
|
HB_FUNC_STATIC( TESTRECURSIVECTE );
|
|
HB_FUNC_STATIC( TESTWINDOWFUNCTIONS );
|
|
HB_FUNC_STATIC( TESTSQL92FULL );
|
|
HB_FUNC_STATIC( TESTMERGE );
|
|
HB_FUNC_STATIC( TESTCOMBINED );
|
|
HB_FUNC_STATIC( CLEANUPDATA );
|
|
HB_FUNC_EXTERN( HB_NTOS );
|
|
HB_FUNC_EXTERN( INT );
|
|
HB_FUNC_EXTERN( MAX );
|
|
HB_FUNC_STATIC( ASSERT );
|
|
HB_FUNC_STATIC( TRY );
|
|
HB_FUNC_EXTERN( FIVE_SQL );
|
|
HB_FUNC_STATIC( ROWS );
|
|
HB_FUNC_EXTERN( VALTYPE );
|
|
HB_FUNC_EXTERN( LEN );
|
|
HB_FUNC_STATIC( VAL1 );
|
|
HB_FUNC_STATIC( ISERR );
|
|
HB_FUNC_STATIC( CELLVAL );
|
|
HB_FUNC_STATIC( COLNAME );
|
|
HB_FUNC_EXTERN( UPPER );
|
|
HB_FUNC_EXTERN( ALLTRIM );
|
|
HB_FUNC_EXTERN( HB_FILEEXISTS );
|
|
HB_FUNC_EXTERN( FERASE );
|
|
HB_FUNC_EXTERN( DBCREATE );
|
|
HB_FUNC_EXTERN( DBUSEAREA );
|
|
HB_FUNC_EXTERN( DBAPPEND );
|
|
HB_FUNC_EXTERN( FIELDPUT );
|
|
HB_FUNC_EXTERN( DBCOMMIT );
|
|
HB_FUNC_EXTERN( DBCLOSEAREA );
|
|
HB_FUNC_EXTERN( DBCLOSEALL );
|
|
HB_FUNC_EXTERN( SQLLOADCONSTRAINTS );
|
|
HB_FUNC_EXTERN( SQLVALIDATEUNIQUE );
|
|
HB_FUNC_EXTERN( SELECT );
|
|
HB_FUNC_EXTERN( DBSELECTAREA );
|
|
HB_FUNC_INITSTATICS();
|
|
|
|
|
|
HB_INIT_SYMBOLS_BEGIN( hb_vm_SymbolInit_TEST_SQL1999 )
|
|
{ "MAIN", {HB_FS_PUBLIC | HB_FS_FIRST | HB_FS_LOCAL}, {HB_FUNCNAME( MAIN )}, NULL },
|
|
{ "ERRORBLOCK", {HB_FS_PUBLIC}, {HB_FUNCNAME( ERRORBLOCK )}, NULL },
|
|
{ "QOUT", {HB_FS_PUBLIC}, {HB_FUNCNAME( QOUT )}, NULL },
|
|
{ "DESCRIPTION", {HB_FS_PUBLIC | HB_FS_MESSAGE}, {NULL}, NULL },
|
|
{ "OPERATION", {HB_FS_PUBLIC | HB_FS_MESSAGE}, {NULL}, NULL },
|
|
{ "BREAK", {HB_FS_PUBLIC}, {HB_FUNCNAME( BREAK )}, NULL },
|
|
{ "SETUPDATA", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( SETUPDATA )}, NULL },
|
|
{ "__QUIT", {HB_FS_PUBLIC}, {HB_FUNCNAME( __QUIT )}, NULL },
|
|
{ "TESTCTE", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( TESTCTE )}, NULL },
|
|
{ "TESTRECURSIVECTE", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( TESTRECURSIVECTE )}, NULL },
|
|
{ "TESTWINDOWFUNCTIONS", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( TESTWINDOWFUNCTIONS )}, NULL },
|
|
{ "TESTSQL92FULL", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( TESTSQL92FULL )}, NULL },
|
|
{ "TESTMERGE", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( TESTMERGE )}, NULL },
|
|
{ "TESTCOMBINED", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( TESTCOMBINED )}, NULL },
|
|
{ "CLEANUPDATA", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CLEANUPDATA )}, NULL },
|
|
{ "HB_NTOS", {HB_FS_PUBLIC}, {HB_FUNCNAME( HB_NTOS )}, NULL },
|
|
{ "INT", {HB_FS_PUBLIC}, {HB_FUNCNAME( INT )}, NULL },
|
|
{ "MAX", {HB_FS_PUBLIC}, {HB_FUNCNAME( MAX )}, NULL },
|
|
{ "ASSERT", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( ASSERT )}, NULL },
|
|
{ "TRY", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( TRY )}, NULL },
|
|
{ "FIVE_SQL", {HB_FS_PUBLIC}, {HB_FUNCNAME( FIVE_SQL )}, NULL },
|
|
{ "ROWS", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( ROWS )}, NULL },
|
|
{ "VALTYPE", {HB_FS_PUBLIC}, {HB_FUNCNAME( VALTYPE )}, NULL },
|
|
{ "LEN", {HB_FS_PUBLIC}, {HB_FUNCNAME( LEN )}, NULL },
|
|
{ "VAL1", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( VAL1 )}, NULL },
|
|
{ "ISERR", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( ISERR )}, NULL },
|
|
{ "CELLVAL", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CELLVAL )}, NULL },
|
|
{ "COLNAME", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( COLNAME )}, NULL },
|
|
{ "UPPER", {HB_FS_PUBLIC}, {HB_FUNCNAME( UPPER )}, NULL },
|
|
{ "ALLTRIM", {HB_FS_PUBLIC}, {HB_FUNCNAME( ALLTRIM )}, NULL },
|
|
{ "HB_FILEEXISTS", {HB_FS_PUBLIC}, {HB_FUNCNAME( HB_FILEEXISTS )}, NULL },
|
|
{ "FERASE", {HB_FS_PUBLIC}, {HB_FUNCNAME( FERASE )}, NULL },
|
|
{ "DBCREATE", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBCREATE )}, NULL },
|
|
{ "DBUSEAREA", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBUSEAREA )}, NULL },
|
|
{ "DBAPPEND", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBAPPEND )}, NULL },
|
|
{ "FIELDPUT", {HB_FS_PUBLIC}, {HB_FUNCNAME( FIELDPUT )}, NULL },
|
|
{ "DBCOMMIT", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBCOMMIT )}, NULL },
|
|
{ "EMPLOYEES", {HB_FS_PUBLIC}, {NULL}, NULL },
|
|
{ "DBCLOSEAREA", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBCLOSEAREA )}, NULL },
|
|
{ "ORDERS", {HB_FS_PUBLIC}, {NULL}, NULL },
|
|
{ "PRODUCTS", {HB_FS_PUBLIC}, {NULL}, NULL },
|
|
{ "DBCLOSEALL", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBCLOSEALL )}, NULL },
|
|
{ "SQLLOADCONSTRAINTS", {HB_FS_PUBLIC}, {HB_FUNCNAME( SQLLOADCONSTRAINTS )}, NULL },
|
|
{ "SQLVALIDATEUNIQUE", {HB_FS_PUBLIC}, {HB_FUNCNAME( SQLVALIDATEUNIQUE )}, NULL },
|
|
{ "UQTBL", {HB_FS_PUBLIC}, {NULL}, NULL },
|
|
{ "SELECT", {HB_FS_PUBLIC}, {HB_FUNCNAME( SELECT )}, NULL },
|
|
{ "DBSELECTAREA", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBSELECTAREA )}, NULL },
|
|
{ "(_INITSTATICS00003)", {HB_FS_INITEXIT | HB_FS_LOCAL}, {hb_INITSTATICS}, NULL }
|
|
HB_INIT_SYMBOLS_EX_END( hb_vm_SymbolInit_TEST_SQL1999, "test/test_sql1999.prg", 0x0, 0x0003 )
|
|
|
|
#if defined( HB_PRAGMA_STARTUP )
|
|
#pragma startup hb_vm_SymbolInit_TEST_SQL1999
|
|
#elif defined( HB_DATASEG_STARTUP )
|
|
#define HB_DATASEG_BODY HB_DATASEG_FUNC( hb_vm_SymbolInit_TEST_SQL1999 )
|
|
#include "hbiniseg.h"
|
|
#endif
|
|
|
|
HB_FUNC( MAIN )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
116,47,0,36,29,0,176,1,0,89,50,0,1,0,
|
|
0,0,176,2,0,106,7,84,82,65,80,58,32,0,
|
|
48,3,0,95,1,112,0,72,106,2,32,0,72,48,
|
|
4,0,95,1,112,0,72,20,1,176,5,0,95,1,
|
|
12,1,6,20,1,36,31,0,176,2,0,106,65,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,0,20,1,36,32,0,176,
|
|
2,0,106,57,32,32,70,105,118,101,83,113,108,32,
|
|
83,81,76,58,49,57,57,57,47,50,48,48,51,32,
|
|
67,111,109,112,114,101,104,101,110,115,105,118,101,32,
|
|
70,101,97,116,117,114,101,32,84,101,115,116,32,83,
|
|
117,105,116,101,0,20,1,36,33,0,176,2,0,106,
|
|
65,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,0,20,1,36,34,
|
|
0,176,2,0,20,0,36,36,0,113,16,0,0,36,
|
|
37,0,176,6,0,20,0,114,65,0,0,36,38,0,
|
|
115,73,36,39,0,176,2,0,106,38,70,65,84,65,
|
|
76,58,32,83,101,116,117,112,68,97,116,97,40,41,
|
|
32,102,97,105,108,101,100,32,45,45,32,97,98,111,
|
|
114,116,105,110,103,0,20,1,36,40,0,176,7,0,
|
|
20,0,36,43,0,176,2,0,106,44,45,45,45,32,
|
|
83,101,99,116,105,111,110,32,49,58,32,87,73,84,
|
|
72,32,40,67,84,69,41,32,78,111,110,45,82,101,
|
|
99,117,114,115,105,118,101,32,45,45,45,0,20,1,
|
|
36,44,0,176,8,0,20,0,36,46,0,176,2,0,
|
|
106,1,0,20,1,36,47,0,176,2,0,106,34,45,
|
|
45,45,32,83,101,99,116,105,111,110,32,50,58,32,
|
|
87,73,84,72,32,82,69,67,85,82,83,73,86,69,
|
|
32,45,45,45,0,20,1,36,48,0,176,9,0,20,
|
|
0,36,50,0,176,2,0,106,1,0,20,1,36,51,
|
|
0,176,2,0,106,36,45,45,45,32,83,101,99,116,
|
|
105,111,110,32,51,58,32,87,105,110,100,111,119,32,
|
|
70,117,110,99,116,105,111,110,115,32,45,45,45,0,
|
|
20,1,36,52,0,176,10,0,20,0,36,54,0,176,
|
|
2,0,106,1,0,20,1,36,55,0,176,2,0,106,
|
|
40,45,45,45,32,83,101,99,116,105,111,110,32,52,
|
|
58,32,83,81,76,45,57,50,32,70,117,108,108,32,
|
|
70,101,97,116,117,114,101,115,32,45,45,45,0,20,
|
|
1,36,56,0,176,11,0,20,0,36,58,0,176,2,
|
|
0,106,1,0,20,1,36,59,0,176,2,0,106,34,
|
|
45,45,45,32,83,101,99,116,105,111,110,32,53,58,
|
|
32,77,69,82,71,69,32,47,32,85,80,83,69,82,
|
|
84,32,45,45,45,0,20,1,36,60,0,176,12,0,
|
|
20,0,36,62,0,176,2,0,106,1,0,20,1,36,
|
|
63,0,176,2,0,106,45,45,45,45,32,83,101,99,
|
|
116,105,111,110,32,54,58,32,67,111,109,98,105,110,
|
|
101,100,32,65,100,118,97,110,99,101,100,32,81,117,
|
|
101,114,105,101,115,32,45,45,45,0,20,1,36,64,
|
|
0,176,13,0,20,0,36,66,0,113,16,0,0,36,
|
|
67,0,176,14,0,20,0,114,62,0,0,36,68,0,
|
|
115,73,36,69,0,176,2,0,106,43,32,32,40,99,
|
|
108,101,97,110,117,112,32,101,110,99,111,117,110,116,
|
|
101,114,101,100,32,101,114,114,111,114,115,44,32,99,
|
|
111,110,116,105,110,117,105,110,103,41,0,20,1,36,
|
|
72,0,176,2,0,106,1,0,20,1,36,73,0,176,
|
|
2,0,106,65,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,0,20,
|
|
1,36,74,0,176,2,0,106,10,32,32,82,69,83,
|
|
85,76,84,83,0,20,1,36,75,0,176,2,0,106,
|
|
10,32,32,80,97,115,115,58,32,32,0,176,15,0,
|
|
103,1,0,12,1,72,20,1,36,76,0,176,2,0,
|
|
106,10,32,32,70,97,105,108,58,32,32,0,176,15,
|
|
0,103,2,0,12,1,72,20,1,36,77,0,176,2,
|
|
0,106,10,32,32,84,111,116,97,108,58,32,0,176,
|
|
15,0,103,3,0,12,1,72,20,1,36,78,0,176,
|
|
2,0,106,10,32,32,82,97,116,101,58,32,32,0,
|
|
176,15,0,176,16,0,103,1,0,92,100,65,176,17,
|
|
0,103,3,0,122,12,2,18,12,1,12,1,72,106,
|
|
2,37,0,72,20,1,36,79,0,176,2,0,106,65,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,61,61,61,61,61,61,
|
|
61,61,61,61,61,61,61,61,0,20,1,36,81,0,
|
|
7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( ASSERT )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,2,116,47,0,36,89,0,104,3,0,170,36,
|
|
90,0,95,2,28,33,36,91,0,104,1,0,170,36,
|
|
92,0,176,2,0,106,9,32,32,80,65,83,83,58,
|
|
32,0,95,1,72,20,1,25,31,36,94,0,104,2,
|
|
0,170,36,95,0,176,2,0,106,9,32,32,70,65,
|
|
73,76,58,32,0,95,1,72,20,1,36,98,0,100,
|
|
110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( TRY )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,1,36,108,0,113,20,0,0,36,109,0,176,
|
|
20,0,95,1,12,1,80,2,114,35,0,0,36,110,
|
|
0,115,73,36,111,0,106,10,95,95,101,114,114,111,
|
|
114,95,95,0,4,1,0,4,0,0,4,2,0,80,
|
|
2,36,114,0,95,2,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( ROWS )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,1,36,119,0,176,22,0,95,1,12,1,106,
|
|
2,65,0,8,28,28,176,23,0,95,1,12,1,92,
|
|
2,16,28,16,36,120,0,176,23,0,95,1,92,2,
|
|
1,20,1,7,36,123,0,121,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( VAL1 )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,1,36,128,0,176,22,0,95,1,12,1,106,
|
|
2,65,0,8,28,58,176,23,0,95,1,12,1,92,
|
|
2,16,28,46,176,23,0,95,1,92,2,1,12,1,
|
|
121,15,28,32,176,23,0,95,1,92,2,1,122,1,
|
|
12,1,121,15,28,16,36,129,0,95,1,92,2,1,
|
|
122,1,122,1,110,7,36,132,0,100,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( ISERR )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,1,36,137,0,176,22,0,95,1,12,1,106,
|
|
2,65,0,8,28,50,176,23,0,95,1,12,1,122,
|
|
16,28,39,176,23,0,95,1,122,1,12,1,121,15,
|
|
28,26,36,138,0,95,1,122,1,122,1,106,10,95,
|
|
95,101,114,114,111,114,95,95,0,8,110,7,36,141,
|
|
0,9,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CELLVAL )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,3,36,147,0,176,22,0,95,1,12,1,106,
|
|
2,65,0,8,28,63,176,23,0,95,1,12,1,92,
|
|
2,16,28,51,95,2,176,23,0,95,1,92,2,1,
|
|
12,1,34,28,36,95,3,176,23,0,95,1,92,2,
|
|
1,95,2,1,12,1,34,28,18,36,148,0,95,1,
|
|
92,2,1,95,2,1,95,3,1,110,7,36,151,0,
|
|
100,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( COLNAME )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,2,36,156,0,176,22,0,95,1,12,1,106,
|
|
2,65,0,8,28,48,176,23,0,95,1,12,1,122,
|
|
16,28,37,95,2,176,23,0,95,1,122,1,12,1,
|
|
34,28,23,36,157,0,176,28,0,176,29,0,95,1,
|
|
122,1,95,2,1,12,1,20,1,7,36,160,0,106,
|
|
1,0,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( SETUPDATA )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,36,177,0,106,3,73,68,0,106,2,78,
|
|
0,92,10,121,4,4,0,106,5,78,65,77,69,0,
|
|
106,2,67,0,92,30,121,4,4,0,106,5,68,69,
|
|
80,84,0,106,2,67,0,92,20,121,4,4,0,106,
|
|
7,83,65,76,65,82,89,0,106,2,78,0,92,12,
|
|
92,2,4,4,0,106,7,77,71,82,95,73,68,0,
|
|
106,2,78,0,92,10,121,4,4,0,4,5,0,80,
|
|
1,36,179,0,176,30,0,106,14,101,109,112,108,111,
|
|
121,101,101,115,46,100,98,102,0,12,1,28,26,36,
|
|
180,0,176,31,0,106,14,101,109,112,108,111,121,101,
|
|
101,115,46,100,98,102,0,20,1,36,182,0,176,32,
|
|
0,106,14,101,109,112,108,111,121,101,101,115,46,100,
|
|
98,102,0,95,1,20,2,36,183,0,176,33,0,120,
|
|
100,106,14,101,109,112,108,111,121,101,101,115,46,100,
|
|
98,102,0,100,9,9,20,6,36,185,0,176,34,0,
|
|
20,0,176,35,0,122,122,20,2,176,35,0,92,2,
|
|
106,6,65,108,105,99,101,0,20,2,176,35,0,92,
|
|
3,106,12,69,110,103,105,110,101,101,114,105,110,103,
|
|
0,20,2,176,35,0,92,4,93,64,31,20,2,176,
|
|
35,0,92,5,121,20,2,36,186,0,176,34,0,20,
|
|
0,176,35,0,122,92,2,20,2,176,35,0,92,2,
|
|
106,4,66,111,98,0,20,2,176,35,0,92,3,106,
|
|
12,69,110,103,105,110,101,101,114,105,110,103,0,20,
|
|
2,176,35,0,92,4,93,88,27,20,2,176,35,0,
|
|
92,5,122,20,2,36,187,0,176,34,0,20,0,176,
|
|
35,0,122,92,3,20,2,176,35,0,92,2,106,8,
|
|
67,104,97,114,108,105,101,0,20,2,176,35,0,92,
|
|
3,106,12,69,110,103,105,110,101,101,114,105,110,103,
|
|
0,20,2,176,35,0,92,4,93,112,23,20,2,176,
|
|
35,0,92,5,122,20,2,36,188,0,176,34,0,20,
|
|
0,176,35,0,122,92,4,20,2,176,35,0,92,2,
|
|
106,6,68,105,97,110,97,0,20,2,176,35,0,92,
|
|
3,106,6,83,97,108,101,115,0,20,2,176,35,0,
|
|
92,4,93,76,29,20,2,176,35,0,92,5,121,20,
|
|
2,36,189,0,176,34,0,20,0,176,35,0,122,92,
|
|
5,20,2,176,35,0,92,2,106,4,69,118,101,0,
|
|
20,2,176,35,0,92,3,106,6,83,97,108,101,115,
|
|
0,20,2,176,35,0,92,4,93,136,19,20,2,176,
|
|
35,0,92,5,92,4,20,2,36,190,0,176,34,0,
|
|
20,0,176,35,0,122,92,6,20,2,176,35,0,92,
|
|
2,106,6,70,114,97,110,107,0,20,2,176,35,0,
|
|
92,3,106,6,83,97,108,101,115,0,20,2,176,35,
|
|
0,92,4,93,148,17,20,2,176,35,0,92,5,92,
|
|
4,20,2,36,191,0,176,34,0,20,0,176,35,0,
|
|
122,92,7,20,2,176,35,0,92,2,106,6,71,114,
|
|
97,99,101,0,20,2,176,35,0,92,3,106,10,77,
|
|
97,114,107,101,116,105,110,103,0,20,2,176,35,0,
|
|
92,4,93,100,25,20,2,176,35,0,92,5,121,20,
|
|
2,36,192,0,176,34,0,20,0,176,35,0,122,92,
|
|
8,20,2,176,35,0,92,2,106,6,72,101,110,114,
|
|
121,0,20,2,176,35,0,92,3,106,10,77,97,114,
|
|
107,101,116,105,110,103,0,20,2,176,35,0,92,4,
|
|
93,124,21,20,2,176,35,0,92,5,92,7,20,2,
|
|
36,193,0,176,34,0,20,0,176,35,0,122,92,9,
|
|
20,2,176,35,0,92,2,106,4,73,118,121,0,20,
|
|
2,176,35,0,92,3,106,3,72,82,0,20,2,176,
|
|
35,0,92,4,93,112,23,20,2,176,35,0,92,5,
|
|
121,20,2,36,194,0,176,34,0,20,0,176,35,0,
|
|
122,92,10,20,2,176,35,0,92,2,106,5,74,97,
|
|
99,107,0,20,2,176,35,0,92,3,106,3,72,82,
|
|
0,20,2,176,35,0,92,4,93,136,19,20,2,176,
|
|
35,0,92,5,92,9,20,2,36,195,0,176,36,0,
|
|
20,0,36,196,0,85,108,37,74,176,38,0,20,0,
|
|
74,36,205,0,106,3,73,68,0,106,2,78,0,92,
|
|
10,121,4,4,0,106,7,69,77,80,95,73,68,0,
|
|
106,2,78,0,92,10,121,4,4,0,106,8,80,82,
|
|
79,68,85,67,84,0,106,2,67,0,92,30,121,4,
|
|
4,0,106,7,65,77,79,85,78,84,0,106,2,78,
|
|
0,92,12,92,2,4,4,0,106,11,79,82,68,69,
|
|
82,95,68,65,84,69,0,106,2,67,0,92,10,121,
|
|
4,4,0,4,5,0,80,1,36,207,0,176,30,0,
|
|
106,11,111,114,100,101,114,115,46,100,98,102,0,12,
|
|
1,28,23,36,208,0,176,31,0,106,11,111,114,100,
|
|
101,114,115,46,100,98,102,0,20,1,36,210,0,176,
|
|
32,0,106,11,111,114,100,101,114,115,46,100,98,102,
|
|
0,95,1,20,2,36,211,0,176,33,0,120,100,106,
|
|
11,111,114,100,101,114,115,46,100,98,102,0,100,9,
|
|
9,20,6,36,212,0,176,34,0,20,0,176,35,0,
|
|
122,122,20,2,176,35,0,92,2,122,20,2,176,35,
|
|
0,92,3,106,7,76,97,112,116,111,112,0,20,2,
|
|
176,35,0,92,4,93,196,9,20,2,176,35,0,92,
|
|
5,106,11,50,48,50,52,45,48,49,45,49,53,0,
|
|
20,2,36,213,0,176,34,0,20,0,176,35,0,122,
|
|
92,2,20,2,176,35,0,92,2,122,20,2,176,35,
|
|
0,92,3,106,8,77,111,110,105,116,111,114,0,20,
|
|
2,176,35,0,92,4,93,32,3,20,2,176,35,0,
|
|
92,5,106,11,50,48,50,52,45,48,51,45,50,48,
|
|
0,20,2,36,214,0,176,34,0,20,0,176,35,0,
|
|
122,92,3,20,2,176,35,0,92,2,92,2,20,2,
|
|
176,35,0,92,3,106,9,75,101,121,98,111,97,114,
|
|
100,0,20,2,176,35,0,92,4,93,150,0,20,2,
|
|
176,35,0,92,5,106,11,50,48,50,52,45,48,50,
|
|
45,49,48,0,20,2,36,215,0,176,34,0,20,0,
|
|
176,35,0,122,92,4,20,2,176,35,0,92,2,92,
|
|
3,20,2,176,35,0,92,3,106,6,77,111,117,115,
|
|
101,0,20,2,176,35,0,92,4,92,100,20,2,176,
|
|
35,0,92,5,106,11,50,48,50,52,45,48,52,45,
|
|
48,53,0,20,2,36,216,0,176,34,0,20,0,176,
|
|
35,0,122,92,5,20,2,176,35,0,92,2,92,4,
|
|
20,2,176,35,0,92,3,106,8,80,114,105,110,116,
|
|
101,114,0,20,2,176,35,0,92,4,93,176,4,20,
|
|
2,176,35,0,92,5,106,11,50,48,50,52,45,48,
|
|
53,45,49,50,0,20,2,36,217,0,176,34,0,20,
|
|
0,176,35,0,122,92,6,20,2,176,35,0,92,2,
|
|
92,4,20,2,176,35,0,92,3,106,8,83,99,97,
|
|
110,110,101,114,0,20,2,176,35,0,92,4,93,244,
|
|
1,20,2,176,35,0,92,5,106,11,50,48,50,52,
|
|
45,48,54,45,49,56,0,20,2,36,218,0,176,34,
|
|
0,20,0,176,35,0,122,92,7,20,2,176,35,0,
|
|
92,2,92,5,20,2,176,35,0,92,3,106,7,84,
|
|
97,98,108,101,116,0,20,2,176,35,0,92,4,93,
|
|
132,3,20,2,176,35,0,92,5,106,11,50,48,50,
|
|
52,45,48,55,45,50,50,0,20,2,36,219,0,176,
|
|
34,0,20,0,176,35,0,122,92,8,20,2,176,35,
|
|
0,92,2,92,6,20,2,176,35,0,92,3,106,6,
|
|
80,104,111,110,101,0,20,2,176,35,0,92,4,93,
|
|
76,4,20,2,176,35,0,92,5,106,11,50,48,50,
|
|
52,45,48,56,45,51,48,0,20,2,36,220,0,176,
|
|
34,0,20,0,176,35,0,122,92,9,20,2,176,35,
|
|
0,92,2,92,7,20,2,176,35,0,92,3,106,7,
|
|
67,97,109,101,114,97,0,20,2,176,35,0,92,4,
|
|
93,184,11,20,2,176,35,0,92,5,106,11,50,48,
|
|
50,52,45,48,57,45,48,53,0,20,2,36,221,0,
|
|
176,34,0,20,0,176,35,0,122,92,10,20,2,176,
|
|
35,0,92,2,92,7,20,2,176,35,0,92,3,106,
|
|
5,76,101,110,115,0,20,2,176,35,0,92,4,93,
|
|
220,5,20,2,176,35,0,92,5,106,11,50,48,50,
|
|
52,45,49,48,45,49,52,0,20,2,36,222,0,176,
|
|
34,0,20,0,176,35,0,122,92,11,20,2,176,35,
|
|
0,92,2,92,8,20,2,176,35,0,92,3,106,8,
|
|
72,101,97,100,115,101,116,0,20,2,176,35,0,92,
|
|
4,93,250,0,20,2,176,35,0,92,5,106,11,50,
|
|
48,50,52,45,49,49,45,48,49,0,20,2,36,223,
|
|
0,176,34,0,20,0,176,35,0,122,92,12,20,2,
|
|
176,35,0,92,2,92,9,20,2,176,35,0,92,3,
|
|
106,5,68,101,115,107,0,20,2,176,35,0,92,4,
|
|
93,32,3,20,2,176,35,0,92,5,106,11,50,48,
|
|
50,53,45,48,49,45,49,48,0,20,2,36,224,0,
|
|
176,34,0,20,0,176,35,0,122,92,13,20,2,176,
|
|
35,0,92,2,92,9,20,2,176,35,0,92,3,106,
|
|
6,67,104,97,105,114,0,20,2,176,35,0,92,4,
|
|
93,88,2,20,2,176,35,0,92,5,106,11,50,48,
|
|
50,53,45,48,50,45,49,53,0,20,2,36,225,0,
|
|
176,34,0,20,0,176,35,0,122,92,14,20,2,176,
|
|
35,0,92,2,92,10,20,2,176,35,0,92,3,106,
|
|
5,76,97,109,112,0,20,2,176,35,0,92,4,93,
|
|
200,0,20,2,176,35,0,92,5,106,11,50,48,50,
|
|
53,45,48,51,45,50,48,0,20,2,36,226,0,176,
|
|
34,0,20,0,176,35,0,122,92,15,20,2,176,35,
|
|
0,92,2,92,2,20,2,176,35,0,92,3,106,7,
|
|
87,101,98,99,97,109,0,20,2,176,35,0,92,4,
|
|
93,94,1,20,2,176,35,0,92,5,106,11,50,48,
|
|
50,53,45,48,52,45,48,49,0,20,2,36,227,0,
|
|
176,36,0,20,0,36,228,0,85,108,39,74,176,38,
|
|
0,20,0,74,36,236,0,106,3,73,68,0,106,2,
|
|
78,0,92,10,121,4,4,0,106,5,78,65,77,69,
|
|
0,106,2,67,0,92,40,121,4,4,0,106,9,67,
|
|
65,84,69,71,79,82,89,0,106,2,67,0,92,20,
|
|
121,4,4,0,106,6,80,82,73,67,69,0,106,2,
|
|
78,0,92,12,92,2,4,4,0,4,4,0,80,1,
|
|
36,238,0,176,30,0,106,13,112,114,111,100,117,99,
|
|
116,115,46,100,98,102,0,12,1,28,25,36,239,0,
|
|
176,31,0,106,13,112,114,111,100,117,99,116,115,46,
|
|
100,98,102,0,20,1,36,241,0,176,32,0,106,13,
|
|
112,114,111,100,117,99,116,115,46,100,98,102,0,95,
|
|
1,20,2,36,242,0,176,33,0,120,100,106,13,112,
|
|
114,111,100,117,99,116,115,46,100,98,102,0,100,9,
|
|
9,20,6,36,243,0,176,34,0,20,0,176,35,0,
|
|
122,122,20,2,176,35,0,92,2,106,9,87,105,100,
|
|
103,101,116,32,65,0,20,2,176,35,0,92,3,106,
|
|
9,72,97,114,100,119,97,114,101,0,20,2,176,35,
|
|
0,92,4,101,61,10,215,163,112,253,61,64,10,2,
|
|
20,2,36,244,0,176,34,0,20,0,176,35,0,122,
|
|
92,2,20,2,176,35,0,92,2,106,9,87,105,100,
|
|
103,101,116,32,66,0,20,2,176,35,0,92,3,106,
|
|
9,72,97,114,100,119,97,114,101,0,20,2,176,35,
|
|
0,92,4,101,31,133,235,81,184,254,72,64,10,2,
|
|
20,2,36,245,0,176,34,0,20,0,176,35,0,122,
|
|
92,3,20,2,176,35,0,92,2,106,13,83,111,102,
|
|
116,119,97,114,101,32,80,114,111,0,20,2,176,35,
|
|
0,92,3,106,9,83,111,102,116,119,97,114,101,0,
|
|
20,2,176,35,0,92,4,101,72,225,122,20,174,255,
|
|
104,64,10,2,20,2,36,246,0,176,34,0,20,0,
|
|
176,35,0,122,92,4,20,2,176,35,0,92,2,106,
|
|
16,49,48,37,32,79,102,102,32,83,112,101,99,105,
|
|
97,108,0,20,2,176,35,0,92,3,106,9,68,105,
|
|
115,99,111,117,110,116,0,20,2,176,35,0,92,4,
|
|
101,123,20,174,71,225,250,35,64,10,2,20,2,36,
|
|
247,0,176,34,0,20,0,176,35,0,122,92,5,20,
|
|
2,176,35,0,92,2,106,13,83,101,114,118,105,99,
|
|
101,32,80,108,97,110,0,20,2,176,35,0,92,3,
|
|
106,8,83,101,114,118,105,99,101,0,20,2,176,35,
|
|
0,92,4,101,143,194,245,40,92,255,88,64,10,2,
|
|
20,2,36,248,0,176,34,0,20,0,176,35,0,122,
|
|
92,6,20,2,176,35,0,92,2,106,9,71,97,100,
|
|
103,101,116,32,88,0,20,2,176,35,0,92,3,106,
|
|
9,72,97,114,100,119,97,114,101,0,20,2,176,35,
|
|
0,92,4,101,72,225,122,20,174,191,98,64,10,2,
|
|
20,2,36,249,0,176,36,0,20,0,36,250,0,85,
|
|
108,40,74,176,38,0,20,0,74,36,252,0,100,110,
|
|
7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CLEANUPDATA )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,2,0,36,20,1,106,14,101,109,112,108,111,121,
|
|
101,101,115,46,100,98,102,0,106,14,101,109,112,108,
|
|
111,121,101,101,115,46,110,116,120,0,106,11,111,114,
|
|
100,101,114,115,46,100,98,102,0,106,11,111,114,100,
|
|
101,114,115,46,110,116,120,0,106,13,112,114,111,100,
|
|
117,99,116,115,46,100,98,102,0,106,13,112,114,111,
|
|
100,117,99,116,115,46,110,116,120,0,106,13,109,101,
|
|
114,103,101,116,103,116,46,100,98,102,0,106,13,109,
|
|
101,114,103,101,116,103,116,46,110,116,120,0,106,13,
|
|
109,101,114,103,101,115,114,99,46,100,98,102,0,106,
|
|
13,109,101,114,103,101,115,114,99,46,110,116,120,0,
|
|
106,15,116,114,117,110,99,95,116,101,115,116,46,100,
|
|
98,102,0,106,15,116,114,117,110,99,95,116,101,115,
|
|
116,46,110,116,120,0,106,10,99,107,116,98,108,46,
|
|
100,98,102,0,106,10,99,107,116,98,108,46,102,115,
|
|
99,0,106,10,99,107,116,98,108,46,110,116,120,0,
|
|
106,10,117,113,116,98,108,46,100,98,102,0,106,10,
|
|
117,113,116,98,108,46,102,115,99,0,106,10,117,113,
|
|
116,98,108,46,110,116,120,0,106,13,117,113,116,98,
|
|
108,95,117,113,46,110,116,120,0,106,14,102,107,95,
|
|
112,97,114,101,110,116,46,100,98,102,0,106,14,102,
|
|
107,95,112,97,114,101,110,116,46,110,116,120,0,106,
|
|
13,102,107,95,99,104,105,108,100,46,100,98,102,0,
|
|
106,13,102,107,95,99,104,105,108,100,46,102,115,99,
|
|
0,106,13,102,107,95,99,104,105,108,100,46,110,116,
|
|
120,0,106,15,116,97,114,103,101,116,95,116,98,108,
|
|
46,100,98,102,0,106,15,116,97,114,103,101,116,95,
|
|
116,98,108,46,110,116,120,0,106,15,115,111,117,114,
|
|
99,101,95,116,98,108,46,100,98,102,0,106,15,115,
|
|
111,117,114,99,101,95,116,98,108,46,110,116,120,0,
|
|
106,14,116,101,109,112,95,100,97,116,97,46,100,98,
|
|
102,0,106,14,116,101,109,112,95,100,97,116,97,46,
|
|
110,116,120,0,4,30,0,80,1,36,22,1,122,165,
|
|
80,2,25,36,36,23,1,176,30,0,95,1,95,2,
|
|
1,12,1,28,15,36,24,1,176,31,0,95,1,95,
|
|
2,1,20,1,36,22,1,175,2,0,176,23,0,95,
|
|
1,12,1,15,28,214,36,29,1,176,31,0,106,23,
|
|
95,95,99,116,101,95,104,105,103,104,95,101,97,114,
|
|
110,101,114,115,46,100,98,102,0,20,1,36,30,1,
|
|
176,31,0,106,21,95,95,99,116,101,95,100,101,112,
|
|
116,95,115,116,97,116,115,46,100,98,102,0,20,1,
|
|
36,31,1,176,31,0,106,14,95,95,99,116,101,95,
|
|
101,110,103,46,100,98,102,0,20,1,36,32,1,176,
|
|
31,0,106,16,95,95,99,116,101,95,115,97,108,101,
|
|
115,46,100,98,102,0,20,1,36,33,1,176,31,0,
|
|
106,19,95,95,99,116,101,95,116,111,112,95,101,109,
|
|
112,115,46,100,98,102,0,20,1,36,34,1,176,31,
|
|
0,106,17,95,95,99,116,101,95,97,99,116,105,118,
|
|
101,46,100,98,102,0,20,1,36,35,1,176,31,0,
|
|
106,19,95,95,99,116,101,95,100,101,112,116,95,97,
|
|
118,103,46,100,98,102,0,20,1,36,36,1,176,31,
|
|
0,106,15,95,95,99,116,101,95,110,117,109,115,46,
|
|
100,98,102,0,20,1,36,37,1,176,31,0,106,17,
|
|
95,95,99,116,101,95,112,111,119,101,114,115,46,100,
|
|
98,102,0,20,1,36,38,1,176,31,0,106,14,95,
|
|
95,99,116,101,95,102,105,98,46,100,98,102,0,20,
|
|
1,36,39,1,176,31,0,106,14,95,95,99,116,101,
|
|
95,111,114,103,46,100,98,102,0,20,1,36,40,1,
|
|
176,31,0,106,17,95,95,99,116,101,95,114,97,110,
|
|
107,101,100,46,100,98,102,0,20,1,36,41,1,176,
|
|
31,0,106,23,95,95,99,116,101,95,111,114,100,101,
|
|
114,95,116,111,116,97,108,115,46,100,98,102,0,20,
|
|
1,36,42,1,176,31,0,106,23,95,95,99,116,101,
|
|
95,100,101,112,116,95,115,117,109,109,97,114,121,46,
|
|
100,98,102,0,20,1,36,43,1,176,31,0,106,15,
|
|
95,95,99,116,101,95,104,105,101,114,46,100,98,102,
|
|
0,20,1,36,45,1,100,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( TESTCTE )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,47,0,36,56,1,113,234,0,0,36,
|
|
59,1,176,20,0,106,126,87,73,84,72,32,104,105,
|
|
103,104,95,101,97,114,110,101,114,115,32,65,83,32,
|
|
40,83,69,76,69,67,84,32,42,32,70,82,79,77,
|
|
32,101,109,112,108,111,121,101,101,115,32,87,72,69,
|
|
82,69,32,115,97,108,97,114,121,32,62,32,54,48,
|
|
48,48,41,32,83,69,76,69,67,84,32,110,97,109,
|
|
101,44,32,115,97,108,97,114,121,32,70,82,79,77,
|
|
32,104,105,103,104,95,101,97,114,110,101,114,115,32,
|
|
79,82,68,69,82,32,66,89,32,115,97,108,97,114,
|
|
121,32,68,69,83,67,0,12,1,80,1,36,62,1,
|
|
176,18,0,106,42,49,97,32,67,84,69,32,115,105,
|
|
109,112,108,101,58,32,104,105,103,104,32,101,97,114,
|
|
110,101,114,115,32,40,115,97,108,97,114,121,62,54,
|
|
48,48,48,41,0,176,21,0,95,1,12,1,92,4,
|
|
8,21,28,25,73,176,26,0,95,1,122,92,2,12,
|
|
3,176,26,0,95,1,92,2,92,2,12,3,16,20,
|
|
2,114,61,0,0,36,63,1,115,73,36,64,1,104,
|
|
3,0,170,104,2,0,170,176,2,0,106,34,32,32,
|
|
70,65,73,76,58,32,49,97,32,67,84,69,32,115,
|
|
105,109,112,108,101,32,40,101,120,99,101,112,116,105,
|
|
111,110,41,0,20,1,36,68,1,113,241,0,0,36,
|
|
72,1,176,20,0,106,159,87,73,84,72,32,100,101,
|
|
112,116,95,115,116,97,116,115,32,65,83,32,40,83,
|
|
69,76,69,67,84,32,100,101,112,116,44,32,67,79,
|
|
85,78,84,40,42,41,32,65,83,32,99,110,116,44,
|
|
32,65,86,71,40,115,97,108,97,114,121,41,32,65,
|
|
83,32,97,118,103,95,115,97,108,32,70,82,79,77,
|
|
32,101,109,112,108,111,121,101,101,115,32,71,82,79,
|
|
85,80,32,66,89,32,100,101,112,116,41,32,83,69,
|
|
76,69,67,84,32,100,101,112,116,44,32,99,110,116,
|
|
44,32,97,118,103,95,115,97,108,32,70,82,79,77,
|
|
32,100,101,112,116,95,115,116,97,116,115,32,87,72,
|
|
69,82,69,32,99,110,116,32,62,32,49,0,12,1,
|
|
80,1,36,74,1,176,18,0,106,42,49,98,32,67,
|
|
84,69,32,119,105,116,104,32,97,103,103,114,101,103,
|
|
97,116,105,111,110,58,32,100,101,112,116,32,115,116,
|
|
97,116,115,32,99,110,116,62,49,0,176,21,0,95,
|
|
1,12,1,92,2,16,20,2,114,71,0,0,36,75,
|
|
1,115,73,36,76,1,104,3,0,170,104,2,0,170,
|
|
176,2,0,106,44,32,32,70,65,73,76,58,32,49,
|
|
98,32,67,84,69,32,119,105,116,104,32,97,103,103,
|
|
114,101,103,97,116,105,111,110,32,40,101,120,99,101,
|
|
112,116,105,111,110,41,0,20,1,36,80,1,113,0,
|
|
1,0,36,84,1,176,20,0,106,176,87,73,84,72,
|
|
32,101,110,103,32,65,83,32,40,83,69,76,69,67,
|
|
84,32,42,32,70,82,79,77,32,101,109,112,108,111,
|
|
121,101,101,115,32,87,72,69,82,69,32,100,101,112,
|
|
116,32,61,32,39,69,110,103,105,110,101,101,114,105,
|
|
110,103,39,41,44,32,115,97,108,101,115,32,65,83,
|
|
32,40,83,69,76,69,67,84,32,42,32,70,82,79,
|
|
77,32,101,109,112,108,111,121,101,101,115,32,87,72,
|
|
69,82,69,32,100,101,112,116,32,61,32,39,83,97,
|
|
108,101,115,39,41,32,83,69,76,69,67,84,32,110,
|
|
97,109,101,32,70,82,79,77,32,101,110,103,32,85,
|
|
78,73,79,78,32,65,76,76,32,83,69,76,69,67,
|
|
84,32,110,97,109,101,32,70,82,79,77,32,115,97,
|
|
108,101,115,0,12,1,80,1,36,86,1,176,18,0,
|
|
106,40,49,99,32,77,117,108,116,105,112,108,101,32,
|
|
67,84,69,115,58,32,101,110,103,32,43,32,115,97,
|
|
108,101,115,32,85,78,73,79,78,32,65,76,76,0,
|
|
176,21,0,95,1,12,1,92,6,8,20,2,114,64,
|
|
0,0,36,87,1,115,73,36,88,1,104,3,0,170,
|
|
104,2,0,170,176,2,0,106,37,32,32,70,65,73,
|
|
76,58,32,49,99,32,77,117,108,116,105,112,108,101,
|
|
32,67,84,69,115,32,40,101,120,99,101,112,116,105,
|
|
111,110,41,0,20,1,36,92,1,113,213,0,0,36,
|
|
95,1,176,20,0,106,137,87,73,84,72,32,116,111,
|
|
112,95,101,109,112,115,32,65,83,32,40,83,69,76,
|
|
69,67,84,32,42,32,70,82,79,77,32,101,109,112,
|
|
108,111,121,101,101,115,32,87,72,69,82,69,32,115,
|
|
97,108,97,114,121,32,62,32,54,48,48,48,41,32,
|
|
83,69,76,69,67,84,32,116,46,110,97,109,101,44,
|
|
32,111,46,112,114,111,100,117,99,116,32,70,82,79,
|
|
77,32,116,111,112,95,101,109,112,115,32,116,32,74,
|
|
79,73,78,32,111,114,100,101,114,115,32,111,32,79,
|
|
78,32,116,46,105,100,32,61,32,111,46,101,109,112,
|
|
95,105,100,0,12,1,80,1,36,97,1,176,18,0,
|
|
106,37,49,100,32,67,84,69,32,105,110,32,74,79,
|
|
73,78,58,32,116,111,112,95,101,109,112,115,32,74,
|
|
79,73,78,32,111,114,100,101,114,115,0,176,21,0,
|
|
95,1,12,1,122,16,20,2,114,62,0,0,36,98,
|
|
1,115,73,36,99,1,104,3,0,170,104,2,0,170,
|
|
176,2,0,106,35,32,32,70,65,73,76,58,32,49,
|
|
100,32,67,84,69,32,105,110,32,74,79,73,78,32,
|
|
40,101,120,99,101,112,116,105,111,110,41,0,20,1,
|
|
36,103,1,113,190,0,0,36,106,1,176,20,0,106,
|
|
111,87,73,84,72,32,97,99,116,105,118,101,32,65,
|
|
83,32,40,83,69,76,69,67,84,32,42,32,70,82,
|
|
79,77,32,101,109,112,108,111,121,101,101,115,32,87,
|
|
72,69,82,69,32,105,100,32,73,78,32,40,83,69,
|
|
76,69,67,84,32,101,109,112,95,105,100,32,70,82,
|
|
79,77,32,111,114,100,101,114,115,41,41,32,83,69,
|
|
76,69,67,84,32,110,97,109,101,44,32,100,101,112,
|
|
116,32,70,82,79,77,32,97,99,116,105,118,101,0,
|
|
12,1,80,1,36,108,1,176,18,0,106,39,49,101,
|
|
32,67,84,69,32,119,105,116,104,32,115,117,98,113,
|
|
117,101,114,121,58,32,97,99,116,105,118,101,32,101,
|
|
109,112,108,111,121,101,101,115,0,176,21,0,95,1,
|
|
12,1,92,5,16,20,2,114,68,0,0,36,109,1,
|
|
115,73,36,110,1,104,3,0,170,104,2,0,170,176,
|
|
2,0,106,41,32,32,70,65,73,76,58,32,49,101,
|
|
32,67,84,69,32,119,105,116,104,32,115,117,98,113,
|
|
117,101,114,121,32,40,101,120,99,101,112,116,105,111,
|
|
110,41,0,20,1,36,114,1,113,31,1,0,36,118,
|
|
1,176,20,0,106,198,87,73,84,72,32,100,101,112,
|
|
116,95,97,118,103,32,65,83,32,40,83,69,76,69,
|
|
67,84,32,100,101,112,116,44,32,65,86,71,40,115,
|
|
97,108,97,114,121,41,32,65,83,32,97,118,103,95,
|
|
115,97,108,32,70,82,79,77,32,101,109,112,108,111,
|
|
121,101,101,115,32,71,82,79,85,80,32,66,89,32,
|
|
100,101,112,116,41,32,83,69,76,69,67,84,32,101,
|
|
46,110,97,109,101,44,32,101,46,115,97,108,97,114,
|
|
121,44,32,100,46,97,118,103,95,115,97,108,32,70,
|
|
82,79,77,32,101,109,112,108,111,121,101,101,115,32,
|
|
101,32,74,79,73,78,32,100,101,112,116,95,97,118,
|
|
103,32,100,32,79,78,32,101,46,100,101,112,116,32,
|
|
61,32,100,46,100,101,112,116,32,87,72,69,82,69,
|
|
32,101,46,115,97,108,97,114,121,32,62,32,100,46,
|
|
97,118,103,95,115,97,108,0,12,1,80,1,36,120,
|
|
1,176,18,0,106,38,49,102,32,67,84,69,32,43,
|
|
32,87,72,69,82,69,58,32,115,97,108,97,114,121,
|
|
32,62,32,100,101,112,116,32,97,118,101,114,97,103,
|
|
101,0,176,25,0,95,1,12,1,68,21,28,12,73,
|
|
176,21,0,95,1,12,1,122,16,20,2,114,73,0,
|
|
0,36,121,1,115,73,36,122,1,104,3,0,170,104,
|
|
2,0,170,176,2,0,106,46,32,32,70,65,73,76,
|
|
58,32,49,102,32,67,84,69,32,43,32,87,72,69,
|
|
82,69,32,99,111,109,112,97,114,105,115,111,110,32,
|
|
40,101,120,99,101,112,116,105,111,110,41,0,20,1,
|
|
36,125,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( TESTRECURSIVECTE )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,47,0,36,136,1,113,204,0,0,36,
|
|
142,1,176,20,0,106,104,87,73,84,72,32,82,69,
|
|
67,85,82,83,73,86,69,32,110,117,109,115,32,65,
|
|
83,32,40,83,69,76,69,67,84,32,49,32,65,83,
|
|
32,110,32,85,78,73,79,78,32,65,76,76,32,83,
|
|
69,76,69,67,84,32,110,32,43,32,49,32,70,82,
|
|
79,77,32,110,117,109,115,32,87,72,69,82,69,32,
|
|
110,32,60,32,49,48,41,32,83,69,76,69,67,84,
|
|
32,42,32,70,82,79,77,32,110,117,109,115,0,12,
|
|
1,80,1,36,145,1,176,18,0,106,28,50,97,32,
|
|
82,69,67,85,82,83,73,86,69,58,32,115,101,113,
|
|
117,101,110,99,101,32,49,45,49,48,0,176,21,0,
|
|
95,1,12,1,92,10,8,21,28,31,73,176,26,0,
|
|
95,1,122,122,12,3,122,8,21,28,16,73,176,26,
|
|
0,95,1,92,10,122,12,3,92,10,8,20,2,114,
|
|
69,0,0,36,146,1,115,73,36,147,1,104,3,0,
|
|
170,104,2,0,170,176,2,0,106,42,32,32,70,65,
|
|
73,76,58,32,50,97,32,82,69,67,85,82,83,73,
|
|
86,69,32,115,101,113,117,101,110,99,101,32,40,101,
|
|
120,99,101,112,116,105,111,110,41,0,20,1,36,151,
|
|
1,113,234,0,0,36,157,1,176,20,0,106,133,87,
|
|
73,84,72,32,82,69,67,85,82,83,73,86,69,32,
|
|
112,111,119,101,114,115,32,65,83,32,40,83,69,76,
|
|
69,67,84,32,49,32,65,83,32,110,44,32,49,32,
|
|
65,83,32,118,97,108,32,85,78,73,79,78,32,65,
|
|
76,76,32,83,69,76,69,67,84,32,110,32,43,32,
|
|
49,44,32,118,97,108,32,42,32,50,32,70,82,79,
|
|
77,32,112,111,119,101,114,115,32,87,72,69,82,69,
|
|
32,110,32,60,32,56,41,32,83,69,76,69,67,84,
|
|
32,110,44,32,118,97,108,32,70,82,79,77,32,112,
|
|
111,119,101,114,115,0,12,1,80,1,36,160,1,176,
|
|
18,0,106,26,50,98,32,82,69,67,85,82,83,73,
|
|
86,69,58,32,112,111,119,101,114,115,32,111,102,32,
|
|
50,0,176,21,0,95,1,12,1,92,8,8,21,28,
|
|
34,73,176,26,0,95,1,122,92,2,12,3,122,8,
|
|
21,28,18,73,176,26,0,95,1,92,8,92,2,12,
|
|
3,93,128,0,8,20,2,114,72,0,0,36,161,1,
|
|
115,73,36,162,1,104,3,0,170,104,2,0,170,176,
|
|
2,0,106,45,32,32,70,65,73,76,58,32,50,98,
|
|
32,82,69,67,85,82,83,73,86,69,32,112,111,119,
|
|
101,114,115,32,111,102,32,50,32,40,101,120,99,101,
|
|
112,116,105,111,110,41,0,20,1,36,166,1,113,223,
|
|
0,0,36,172,1,176,20,0,106,129,87,73,84,72,
|
|
32,82,69,67,85,82,83,73,86,69,32,102,105,98,
|
|
32,65,83,32,40,83,69,76,69,67,84,32,49,32,
|
|
65,83,32,110,44,32,49,32,65,83,32,97,44,32,
|
|
48,32,65,83,32,98,32,85,78,73,79,78,32,65,
|
|
76,76,32,83,69,76,69,67,84,32,110,32,43,32,
|
|
49,44,32,97,32,43,32,98,44,32,97,32,70,82,
|
|
79,77,32,102,105,98,32,87,72,69,82,69,32,110,
|
|
32,60,32,56,41,32,83,69,76,69,67,84,32,110,
|
|
44,32,97,32,70,82,79,77,32,102,105,98,0,12,
|
|
1,80,1,36,175,1,176,18,0,106,38,50,99,32,
|
|
82,69,67,85,82,83,73,86,69,58,32,102,105,98,
|
|
111,110,97,99,99,105,45,108,105,107,101,32,115,101,
|
|
113,117,101,110,99,101,0,176,21,0,95,1,12,1,
|
|
92,8,8,21,28,15,73,176,26,0,95,1,122,92,
|
|
2,12,3,122,8,20,2,114,70,0,0,36,176,1,
|
|
115,73,36,177,1,104,3,0,170,104,2,0,170,176,
|
|
2,0,106,43,32,32,70,65,73,76,58,32,50,99,
|
|
32,82,69,67,85,82,83,73,86,69,32,102,105,98,
|
|
111,110,97,99,99,105,32,40,101,120,99,101,112,116,
|
|
105,111,110,41,0,20,1,36,181,1,113,245,0,0,
|
|
36,188,1,176,20,0,106,167,87,73,84,72,32,82,
|
|
69,67,85,82,83,73,86,69,32,111,114,103,32,65,
|
|
83,32,40,83,69,76,69,67,84,32,105,100,44,32,
|
|
110,97,109,101,32,70,82,79,77,32,101,109,112,108,
|
|
111,121,101,101,115,32,87,72,69,82,69,32,109,103,
|
|
114,95,105,100,32,61,32,48,32,85,78,73,79,78,
|
|
32,65,76,76,32,83,69,76,69,67,84,32,101,46,
|
|
105,100,44,32,101,46,110,97,109,101,32,70,82,79,
|
|
77,32,101,109,112,108,111,121,101,101,115,32,101,32,
|
|
74,79,73,78,32,111,114,103,32,111,32,79,78,32,
|
|
101,46,109,103,114,95,105,100,32,61,32,111,46,105,
|
|
100,41,32,83,69,76,69,67,84,32,42,32,70,82,
|
|
79,77,32,111,114,103,0,12,1,80,1,36,190,1,
|
|
176,18,0,106,38,50,100,32,82,69,67,85,82,83,
|
|
73,86,69,58,32,111,114,103,32,104,105,101,114,97,
|
|
114,99,104,121,32,116,114,97,118,101,114,115,97,108,
|
|
0,176,21,0,95,1,12,1,92,10,8,20,2,114,
|
|
74,0,0,36,191,1,115,73,36,192,1,104,3,0,
|
|
170,104,2,0,170,176,2,0,106,47,32,32,70,65,
|
|
73,76,58,32,50,100,32,82,69,67,85,82,83,73,
|
|
86,69,32,111,114,103,32,104,105,101,114,97,114,99,
|
|
104,121,32,40,101,120,99,101,112,116,105,111,110,41,
|
|
0,20,1,36,195,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( TESTWINDOWFUNCTIONS )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,47,0,36,206,1,113,163,0,0,36,
|
|
208,1,176,20,0,106,85,83,69,76,69,67,84,32,
|
|
110,97,109,101,44,32,115,97,108,97,114,121,44,32,
|
|
82,79,87,95,78,85,77,66,69,82,40,41,32,79,
|
|
86,69,82,32,40,79,82,68,69,82,32,66,89,32,
|
|
115,97,108,97,114,121,32,68,69,83,67,41,32,65,
|
|
83,32,114,97,110,107,32,70,82,79,77,32,101,109,
|
|
112,108,111,121,101,101,115,0,12,1,80,1,36,210,
|
|
1,176,18,0,106,22,51,97,32,82,79,87,95,78,
|
|
85,77,66,69,82,40,41,32,98,97,115,105,99,0,
|
|
176,21,0,95,1,12,1,92,10,8,21,28,15,73,
|
|
176,26,0,95,1,122,92,3,12,3,122,8,20,2,
|
|
114,69,0,0,36,211,1,115,73,36,212,1,104,3,
|
|
0,170,104,2,0,170,176,2,0,106,42,32,32,70,
|
|
65,73,76,58,32,51,97,32,82,79,87,95,78,85,
|
|
77,66,69,82,40,41,32,98,97,115,105,99,32,40,
|
|
101,120,99,101,112,116,105,111,110,41,0,20,1,36,
|
|
216,1,113,188,0,0,36,218,1,176,20,0,106,114,
|
|
83,69,76,69,67,84,32,110,97,109,101,44,32,100,
|
|
101,112,116,44,32,115,97,108,97,114,121,44,32,82,
|
|
79,87,95,78,85,77,66,69,82,40,41,32,79,86,
|
|
69,82,32,40,80,65,82,84,73,84,73,79,78,32,
|
|
66,89,32,100,101,112,116,32,79,82,68,69,82,32,
|
|
66,89,32,115,97,108,97,114,121,32,68,69,83,67,
|
|
41,32,65,83,32,100,101,112,116,95,114,97,110,107,
|
|
32,70,82,79,77,32,101,109,112,108,111,121,101,101,
|
|
115,0,12,1,80,1,36,220,1,176,18,0,106,34,
|
|
51,98,32,82,79,87,95,78,85,77,66,69,82,40,
|
|
41,32,80,65,82,84,73,84,73,79,78,32,66,89,
|
|
32,100,101,112,116,0,176,21,0,95,1,12,1,92,
|
|
10,8,20,2,114,76,0,0,36,221,1,115,73,36,
|
|
222,1,104,3,0,170,104,2,0,170,176,2,0,106,
|
|
49,32,32,70,65,73,76,58,32,51,98,32,82,79,
|
|
87,95,78,85,77,66,69,82,40,41,32,80,65,82,
|
|
84,73,84,73,79,78,32,66,89,32,40,101,120,99,
|
|
101,112,116,105,111,110,41,0,20,1,36,226,1,113,
|
|
155,0,0,36,228,1,176,20,0,106,79,83,69,76,
|
|
69,67,84,32,110,97,109,101,44,32,115,97,108,97,
|
|
114,121,44,32,82,65,78,75,40,41,32,79,86,69,
|
|
82,32,40,79,82,68,69,82,32,66,89,32,115,97,
|
|
108,97,114,121,32,68,69,83,67,41,32,65,83,32,
|
|
114,97,110,107,32,70,82,79,77,32,101,109,112,108,
|
|
111,121,101,101,115,0,12,1,80,1,36,230,1,176,
|
|
18,0,106,20,51,99,32,82,65,78,75,40,41,32,
|
|
119,105,116,104,32,116,105,101,115,0,176,21,0,95,
|
|
1,12,1,92,10,8,21,28,15,73,176,26,0,95,
|
|
1,122,92,3,12,3,122,8,20,2,114,67,0,0,
|
|
36,231,1,115,73,36,232,1,104,3,0,170,104,2,
|
|
0,170,176,2,0,106,40,32,32,70,65,73,76,58,
|
|
32,51,99,32,82,65,78,75,40,41,32,119,105,116,
|
|
104,32,116,105,101,115,32,40,101,120,99,101,112,116,
|
|
105,111,110,41,0,20,1,36,236,1,113,166,0,0,
|
|
36,238,1,176,20,0,106,86,83,69,76,69,67,84,
|
|
32,110,97,109,101,44,32,115,97,108,97,114,121,44,
|
|
32,68,69,78,83,69,95,82,65,78,75,40,41,32,
|
|
79,86,69,82,32,40,79,82,68,69,82,32,66,89,
|
|
32,115,97,108,97,114,121,32,68,69,83,67,41,32,
|
|
65,83,32,100,114,97,110,107,32,70,82,79,77,32,
|
|
101,109,112,108,111,121,101,101,115,0,12,1,80,1,
|
|
36,240,1,176,18,0,106,24,51,100,32,68,69,78,
|
|
83,69,95,82,65,78,75,40,41,32,110,111,32,103,
|
|
97,112,115,0,176,21,0,95,1,12,1,92,10,8,
|
|
21,28,15,73,176,26,0,95,1,122,92,3,12,3,
|
|
122,8,20,2,114,63,0,0,36,241,1,115,73,36,
|
|
242,1,104,3,0,170,104,2,0,170,176,2,0,106,
|
|
36,32,32,70,65,73,76,58,32,51,100,32,68,69,
|
|
78,83,69,95,82,65,78,75,40,41,32,40,101,120,
|
|
99,101,112,116,105,111,110,41,0,20,1,36,246,1,
|
|
113,175,0,0,36,248,1,176,20,0,106,94,83,69,
|
|
76,69,67,84,32,110,97,109,101,44,32,115,97,108,
|
|
97,114,121,44,32,76,65,71,40,115,97,108,97,114,
|
|
121,44,32,49,41,32,79,86,69,82,32,40,79,82,
|
|
68,69,82,32,66,89,32,115,97,108,97,114,121,32,
|
|
68,69,83,67,41,32,65,83,32,112,114,101,118,95,
|
|
115,97,108,97,114,121,32,70,82,79,77,32,101,109,
|
|
112,108,111,121,101,101,115,0,12,1,80,1,36,250,
|
|
1,176,18,0,106,25,51,101,32,76,65,71,40,41,
|
|
32,112,114,101,118,105,111,117,115,32,115,97,108,97,
|
|
114,121,0,176,21,0,95,1,12,1,92,10,8,21,
|
|
28,15,73,176,26,0,95,1,122,92,3,12,3,100,
|
|
8,20,2,114,56,0,0,36,251,1,115,73,36,252,
|
|
1,104,3,0,170,104,2,0,170,176,2,0,106,29,
|
|
32,32,70,65,73,76,58,32,51,101,32,76,65,71,
|
|
40,41,32,40,101,120,99,101,112,116,105,111,110,41,
|
|
0,20,1,36,0,2,113,157,0,0,36,2,2,176,
|
|
20,0,106,95,83,69,76,69,67,84,32,110,97,109,
|
|
101,44,32,115,97,108,97,114,121,44,32,76,69,65,
|
|
68,40,115,97,108,97,114,121,44,32,49,41,32,79,
|
|
86,69,82,32,40,79,82,68,69,82,32,66,89,32,
|
|
115,97,108,97,114,121,32,68,69,83,67,41,32,65,
|
|
83,32,110,101,120,116,95,115,97,108,97,114,121,32,
|
|
70,82,79,77,32,101,109,112,108,111,121,101,101,115,
|
|
0,12,1,80,1,36,4,2,176,18,0,106,22,51,
|
|
102,32,76,69,65,68,40,41,32,110,101,120,116,32,
|
|
115,97,108,97,114,121,0,176,21,0,95,1,12,1,
|
|
92,10,8,20,2,114,57,0,0,36,5,2,115,73,
|
|
36,6,2,104,3,0,170,104,2,0,170,176,2,0,
|
|
106,30,32,32,70,65,73,76,58,32,51,102,32,76,
|
|
69,65,68,40,41,32,40,101,120,99,101,112,116,105,
|
|
111,110,41,0,20,1,36,10,2,113,173,0,0,36,
|
|
12,2,176,20,0,106,93,83,69,76,69,67,84,32,
|
|
110,97,109,101,44,32,100,101,112,116,44,32,115,97,
|
|
108,97,114,121,44,32,83,85,77,40,115,97,108,97,
|
|
114,121,41,32,79,86,69,82,32,40,80,65,82,84,
|
|
73,84,73,79,78,32,66,89,32,100,101,112,116,41,
|
|
32,65,83,32,100,101,112,116,95,116,111,116,97,108,
|
|
32,70,82,79,77,32,101,109,112,108,111,121,101,101,
|
|
115,0,12,1,80,1,36,14,2,176,18,0,106,40,
|
|
51,103,32,83,85,77,40,41,32,79,86,69,82,32,
|
|
80,65,82,84,73,84,73,79,78,32,66,89,58,32,
|
|
100,101,112,116,32,116,111,116,97,108,115,0,176,21,
|
|
0,95,1,12,1,92,10,8,20,2,114,74,0,0,
|
|
36,15,2,115,73,36,16,2,104,3,0,170,104,2,
|
|
0,170,176,2,0,106,47,32,32,70,65,73,76,58,
|
|
32,51,103,32,83,85,77,40,41,32,79,86,69,82,
|
|
32,80,65,82,84,73,84,73,79,78,32,66,89,32,
|
|
40,101,120,99,101,112,116,105,111,110,41,0,20,1,
|
|
36,20,2,113,173,0,0,36,22,2,176,20,0,106,
|
|
91,83,69,76,69,67,84,32,110,97,109,101,44,32,
|
|
100,101,112,116,44,32,115,97,108,97,114,121,44,32,
|
|
65,86,71,40,115,97,108,97,114,121,41,32,79,86,
|
|
69,82,32,40,80,65,82,84,73,84,73,79,78,32,
|
|
66,89,32,100,101,112,116,41,32,65,83,32,100,101,
|
|
112,116,95,97,118,103,32,70,82,79,77,32,101,109,
|
|
112,108,111,121,101,101,115,0,12,1,80,1,36,24,
|
|
2,176,18,0,106,42,51,104,32,65,86,71,40,41,
|
|
32,79,86,69,82,32,80,65,82,84,73,84,73,79,
|
|
78,32,66,89,58,32,100,101,112,116,32,97,118,101,
|
|
114,97,103,101,115,0,176,21,0,95,1,12,1,92,
|
|
10,8,20,2,114,74,0,0,36,25,2,115,73,36,
|
|
26,2,104,3,0,170,104,2,0,170,176,2,0,106,
|
|
47,32,32,70,65,73,76,58,32,51,104,32,65,86,
|
|
71,40,41,32,79,86,69,82,32,80,65,82,84,73,
|
|
84,73,79,78,32,66,89,32,40,101,120,99,101,112,
|
|
116,105,111,110,41,0,20,1,36,30,2,113,165,0,
|
|
0,36,32,2,176,20,0,106,82,83,69,76,69,67,
|
|
84,32,110,97,109,101,44,32,100,101,112,116,44,32,
|
|
67,79,85,78,84,40,42,41,32,79,86,69,82,32,
|
|
40,80,65,82,84,73,84,73,79,78,32,66,89,32,
|
|
100,101,112,116,41,32,65,83,32,100,101,112,116,95,
|
|
99,111,117,110,116,32,70,82,79,77,32,101,109,112,
|
|
108,111,121,101,101,115,0,12,1,80,1,36,34,2,
|
|
176,18,0,106,43,51,105,32,67,79,85,78,84,40,
|
|
42,41,32,79,86,69,82,32,80,65,82,84,73,84,
|
|
73,79,78,32,66,89,58,32,100,101,112,116,32,99,
|
|
111,117,110,116,115,0,176,21,0,95,1,12,1,92,
|
|
10,8,20,2,114,77,0,0,36,35,2,115,73,36,
|
|
36,2,104,3,0,170,104,2,0,170,176,2,0,106,
|
|
50,32,32,70,65,73,76,58,32,51,105,32,67,79,
|
|
85,78,84,40,42,41,32,79,86,69,82,32,80,65,
|
|
82,84,73,84,73,79,78,32,66,89,32,40,101,120,
|
|
99,101,112,116,105,111,110,41,0,20,1,36,40,2,
|
|
113,196,0,0,36,42,2,176,20,0,106,112,83,69,
|
|
76,69,67,84,32,110,97,109,101,44,32,100,101,112,
|
|
116,44,32,115,97,108,97,114,121,44,32,83,85,77,
|
|
40,115,97,108,97,114,121,41,32,79,86,69,82,32,
|
|
40,80,65,82,84,73,84,73,79,78,32,66,89,32,
|
|
100,101,112,116,32,79,82,68,69,82,32,66,89,32,
|
|
115,97,108,97,114,121,41,32,65,83,32,114,117,110,
|
|
110,105,110,103,95,116,111,116,97,108,32,70,82,79,
|
|
77,32,101,109,112,108,111,121,101,101,115,0,12,1,
|
|
80,1,36,44,2,176,18,0,106,44,51,106,32,82,
|
|
117,110,110,105,110,103,32,83,85,77,58,32,99,117,
|
|
109,117,108,97,116,105,118,101,32,119,105,116,104,105,
|
|
110,32,112,97,114,116,105,116,105,111,110,0,176,21,
|
|
0,95,1,12,1,92,10,8,20,2,114,62,0,0,
|
|
36,45,2,115,73,36,46,2,104,3,0,170,104,2,
|
|
0,170,176,2,0,106,35,32,32,70,65,73,76,58,
|
|
32,51,106,32,82,117,110,110,105,110,103,32,83,85,
|
|
77,32,40,101,120,99,101,112,116,105,111,110,41,0,
|
|
20,1,36,50,2,113,250,0,0,36,56,2,176,20,
|
|
0,106,156,83,69,76,69,67,84,32,110,97,109,101,
|
|
44,32,115,97,108,97,114,121,44,32,82,79,87,95,
|
|
78,85,77,66,69,82,40,41,32,79,86,69,82,32,
|
|
40,79,82,68,69,82,32,66,89,32,115,97,108,97,
|
|
114,121,32,68,69,83,67,41,32,65,83,32,114,110,
|
|
44,32,82,65,78,75,40,41,32,79,86,69,82,32,
|
|
40,79,82,68,69,82,32,66,89,32,115,97,108,97,
|
|
114,121,32,68,69,83,67,41,32,65,83,32,114,110,
|
|
107,44,32,83,85,77,40,115,97,108,97,114,121,41,
|
|
32,79,86,69,82,32,40,41,32,65,83,32,116,111,
|
|
116,97,108,32,70,82,79,77,32,101,109,112,108,111,
|
|
121,101,101,115,0,12,1,80,1,36,58,2,176,18,
|
|
0,106,38,51,107,32,77,117,108,116,105,112,108,101,
|
|
32,119,105,110,100,111,119,32,102,117,110,99,115,32,
|
|
105,110,32,111,110,101,32,113,117,101,114,121,0,176,
|
|
21,0,95,1,12,1,92,10,8,21,28,15,73,176,
|
|
26,0,95,1,122,92,3,12,3,122,8,20,2,114,
|
|
72,0,0,36,59,2,115,73,36,60,2,104,3,0,
|
|
170,104,2,0,170,176,2,0,106,45,32,32,70,65,
|
|
73,76,58,32,51,107,32,77,117,108,116,105,112,108,
|
|
101,32,119,105,110,100,111,119,32,102,117,110,99,115,
|
|
32,40,101,120,99,101,112,116,105,111,110,41,0,20,
|
|
1,36,64,2,113,218,0,0,36,68,2,176,20,0,
|
|
106,116,83,69,76,69,67,84,32,110,97,109,101,44,
|
|
32,100,101,112,116,44,32,115,97,108,97,114,121,44,
|
|
32,82,79,87,95,78,85,77,66,69,82,40,41,32,
|
|
79,86,69,82,32,40,79,82,68,69,82,32,66,89,
|
|
32,115,97,108,97,114,121,32,68,69,83,67,41,32,
|
|
65,83,32,114,110,32,70,82,79,77,32,101,109,112,
|
|
108,111,121,101,101,115,32,87,72,69,82,69,32,100,
|
|
101,112,116,32,61,32,39,69,110,103,105,110,101,101,
|
|
114,105,110,103,39,0,12,1,80,1,36,70,2,176,
|
|
18,0,106,44,51,108,32,87,105,110,100,111,119,32,
|
|
102,117,110,99,32,119,105,116,104,32,87,72,69,82,
|
|
69,58,32,69,110,103,105,110,101,101,114,105,110,103,
|
|
32,111,110,108,121,0,176,21,0,95,1,12,1,92,
|
|
3,8,21,28,17,73,176,26,0,95,1,122,92,3,
|
|
12,3,93,64,31,8,20,2,114,73,0,0,36,71,
|
|
2,115,73,36,72,2,104,3,0,170,104,2,0,170,
|
|
176,2,0,106,46,32,32,70,65,73,76,58,32,51,
|
|
108,32,87,105,110,100,111,119,32,102,117,110,99,32,
|
|
119,105,116,104,32,87,72,69,82,69,32,40,101,120,
|
|
99,101,112,116,105,111,110,41,0,20,1,36,75,2,
|
|
7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( TESTSQL92FULL )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,3,0,116,47,0,36,86,2,113,166,0,0,36,
|
|
87,2,176,20,0,106,62,83,69,76,69,67,84,32,
|
|
42,32,70,82,79,77,32,112,114,111,100,117,99,116,
|
|
115,32,87,72,69,82,69,32,110,97,109,101,32,76,
|
|
73,75,69,32,39,49,48,92,37,32,79,102,102,37,
|
|
39,32,69,83,67,65,80,69,32,39,92,39,0,12,
|
|
1,80,1,36,90,2,176,18,0,106,39,52,97,32,
|
|
76,73,75,69,32,69,83,67,65,80,69,58,32,102,
|
|
105,110,100,32,108,105,116,101,114,97,108,32,37,32,
|
|
105,110,32,110,97,109,101,0,176,21,0,95,1,12,
|
|
1,122,8,21,28,25,73,106,4,49,48,37,0,176,
|
|
29,0,176,26,0,95,1,122,92,2,12,3,12,1,
|
|
24,20,2,114,62,0,0,36,91,2,115,73,36,92,
|
|
2,104,3,0,170,104,2,0,170,176,2,0,106,35,
|
|
32,32,70,65,73,76,58,32,52,97,32,76,73,75,
|
|
69,32,69,83,67,65,80,69,32,40,101,120,99,101,
|
|
112,116,105,111,110,41,0,20,1,36,96,2,113,207,
|
|
1,0,36,97,2,176,41,0,20,0,36,98,2,176,
|
|
20,0,106,42,83,69,76,69,67,84,32,115,97,108,
|
|
97,114,121,32,70,82,79,77,32,101,109,112,108,111,
|
|
121,101,101,115,32,87,72,69,82,69,32,105,100,32,
|
|
61,32,49,0,12,1,80,1,36,99,2,176,20,0,
|
|
106,6,66,69,71,73,78,0,20,1,36,100,2,176,
|
|
20,0,106,57,85,80,68,65,84,69,32,101,109,112,
|
|
108,111,121,101,101,115,32,83,69,84,32,115,97,108,
|
|
97,114,121,32,61,32,115,97,108,97,114,121,32,43,
|
|
32,49,48,48,48,32,87,72,69,82,69,32,105,100,
|
|
32,61,32,49,0,20,1,36,101,2,176,20,0,106,
|
|
14,83,65,86,69,80,79,73,78,84,32,115,112,49,
|
|
0,20,1,36,102,2,176,20,0,106,45,85,80,68,
|
|
65,84,69,32,101,109,112,108,111,121,101,101,115,32,
|
|
83,69,84,32,115,97,108,97,114,121,32,61,32,48,
|
|
32,87,72,69,82,69,32,105,100,32,61,32,49,0,
|
|
20,1,36,103,2,176,20,0,106,16,82,79,76,76,
|
|
66,65,67,75,32,84,79,32,115,112,49,0,20,1,
|
|
36,104,2,176,20,0,106,7,67,79,77,77,73,84,
|
|
0,20,1,36,105,2,176,20,0,106,42,83,69,76,
|
|
69,67,84,32,115,97,108,97,114,121,32,70,82,79,
|
|
77,32,101,109,112,108,111,121,101,101,115,32,87,72,
|
|
69,82,69,32,105,100,32,61,32,49,0,12,1,80,
|
|
1,36,107,2,176,18,0,106,53,52,98,32,83,65,
|
|
86,69,80,79,73,78,84,32,43,32,82,79,76,76,
|
|
66,65,67,75,32,84,79,58,32,115,97,108,97,114,
|
|
121,32,61,32,111,114,105,103,105,110,97,108,32,43,
|
|
32,49,48,48,48,0,176,26,0,95,1,122,122,12,
|
|
3,93,40,35,8,20,2,36,109,2,176,20,0,106,
|
|
48,85,80,68,65,84,69,32,101,109,112,108,111,121,
|
|
101,101,115,32,83,69,84,32,115,97,108,97,114,121,
|
|
32,61,32,56,48,48,48,32,87,72,69,82,69,32,
|
|
105,100,32,61,32,49,0,20,1,114,74,0,0,36,
|
|
110,2,115,73,36,111,2,104,3,0,170,104,2,0,
|
|
170,176,2,0,106,47,32,32,70,65,73,76,58,32,
|
|
52,98,32,83,65,86,69,80,79,73,78,84,32,43,
|
|
32,82,79,76,76,66,65,67,75,32,84,79,32,40,
|
|
101,120,99,101,112,116,105,111,110,41,0,20,1,36,
|
|
115,2,113,178,1,0,36,116,2,176,20,0,106,50,
|
|
67,82,69,65,84,69,32,84,65,66,76,69,32,116,
|
|
101,109,112,95,100,97,116,97,32,40,105,100,32,73,
|
|
78,84,69,71,69,82,44,32,118,97,108,32,67,72,
|
|
65,82,40,49,48,41,41,0,20,1,36,117,2,176,
|
|
20,0,106,51,73,78,83,69,82,84,32,73,78,84,
|
|
79,32,116,101,109,112,95,100,97,116,97,32,40,105,
|
|
100,44,32,118,97,108,41,32,86,65,76,85,69,83,
|
|
32,40,49,44,32,39,116,101,115,116,39,41,0,20,
|
|
1,36,118,2,176,20,0,106,51,73,78,83,69,82,
|
|
84,32,73,78,84,79,32,116,101,109,112,95,100,97,
|
|
116,97,32,40,105,100,44,32,118,97,108,41,32,86,
|
|
65,76,85,69,83,32,40,50,44,32,39,100,97,116,
|
|
97,39,41,0,20,1,36,119,2,176,20,0,106,38,
|
|
83,69,76,69,67,84,32,67,79,85,78,84,40,42,
|
|
41,32,65,83,32,99,110,116,32,70,82,79,77,32,
|
|
116,101,109,112,95,100,97,116,97,0,12,1,80,1,
|
|
36,121,2,176,18,0,106,32,52,99,45,112,114,101,
|
|
32,84,82,85,78,67,65,84,69,58,32,116,97,98,
|
|
108,101,32,104,97,115,32,114,111,119,115,0,176,26,
|
|
0,95,1,122,122,12,3,92,2,8,20,2,36,123,
|
|
2,176,20,0,106,25,84,82,85,78,67,65,84,69,
|
|
32,84,65,66,76,69,32,116,101,109,112,95,100,97,
|
|
116,97,0,20,1,36,124,2,176,20,0,106,38,83,
|
|
69,76,69,67,84,32,67,79,85,78,84,40,42,41,
|
|
32,65,83,32,99,110,116,32,70,82,79,77,32,116,
|
|
101,109,112,95,100,97,116,97,0,12,1,80,1,36,
|
|
126,2,176,18,0,106,34,52,99,32,84,82,85,78,
|
|
67,65,84,69,32,84,65,66,76,69,58,32,116,97,
|
|
98,108,101,32,105,115,32,101,109,112,116,121,0,176,
|
|
26,0,95,1,122,122,12,3,121,8,20,2,114,69,
|
|
0,0,36,127,2,115,73,36,128,2,104,3,0,92,
|
|
2,135,104,2,0,92,2,135,176,2,0,106,38,32,
|
|
32,70,65,73,76,58,32,52,99,32,84,82,85,78,
|
|
67,65,84,69,32,84,65,66,76,69,32,40,101,120,
|
|
99,101,112,116,105,111,110,41,0,20,1,36,132,2,
|
|
113,179,1,0,36,133,2,176,20,0,106,77,67,82,
|
|
69,65,84,69,32,84,65,66,76,69,32,99,107,116,
|
|
98,108,32,40,105,100,32,73,78,84,69,71,69,82,
|
|
44,32,97,103,101,32,73,78,84,69,71,69,82,44,
|
|
32,67,72,69,67,75,40,97,103,101,32,62,61,32,
|
|
48,32,65,78,68,32,97,103,101,32,60,61,32,49,
|
|
53,48,41,41,0,12,1,80,1,36,134,2,176,42,
|
|
0,106,6,99,107,116,98,108,0,12,1,80,2,36,
|
|
136,2,176,18,0,106,37,52,100,32,67,72,69,67,
|
|
75,32,99,111,110,115,116,114,97,105,110,116,58,32,
|
|
109,101,116,97,100,97,116,97,32,115,116,111,114,101,
|
|
100,0,176,23,0,95,2,106,6,99,104,101,99,107,
|
|
0,1,12,1,122,16,20,2,36,138,2,176,19,0,
|
|
106,43,73,78,83,69,82,84,32,73,78,84,79,32,
|
|
99,107,116,98,108,32,40,105,100,44,32,97,103,101,
|
|
41,32,86,65,76,85,69,83,32,40,49,44,32,50,
|
|
53,41,0,12,1,80,1,36,140,2,176,18,0,106,
|
|
41,52,100,32,67,72,69,67,75,58,32,118,97,108,
|
|
105,100,32,105,110,115,101,114,116,32,40,97,103,101,
|
|
61,50,53,41,32,115,117,99,99,101,101,100,115,0,
|
|
176,25,0,95,1,12,1,68,20,2,36,142,2,176,
|
|
19,0,106,43,73,78,83,69,82,84,32,73,78,84,
|
|
79,32,99,107,116,98,108,32,40,105,100,44,32,97,
|
|
103,101,41,32,86,65,76,85,69,83,32,40,50,44,
|
|
32,45,53,41,0,12,1,80,1,36,144,2,176,18,
|
|
0,106,43,52,100,32,67,72,69,67,75,58,32,105,
|
|
110,118,97,108,105,100,32,105,110,115,101,114,116,32,
|
|
40,97,103,101,61,45,53,41,32,114,101,106,101,99,
|
|
116,101,100,0,176,25,0,95,1,12,1,21,31,25,
|
|
73,176,24,0,95,1,12,1,121,8,21,31,12,73,
|
|
176,24,0,95,1,12,1,100,8,20,2,114,71,0,
|
|
0,36,145,2,115,73,36,146,2,104,3,0,92,3,
|
|
135,104,2,0,92,3,135,176,2,0,106,40,32,32,
|
|
70,65,73,76,58,32,52,100,32,67,72,69,67,75,
|
|
32,99,111,110,115,116,114,97,105,110,116,32,40,101,
|
|
120,99,101,112,116,105,111,110,41,0,20,1,36,150,
|
|
2,113,176,1,0,36,151,2,176,20,0,106,63,67,
|
|
82,69,65,84,69,32,84,65,66,76,69,32,117,113,
|
|
116,98,108,32,40,105,100,32,73,78,84,69,71,69,
|
|
82,44,32,101,109,97,105,108,32,67,72,65,82,40,
|
|
52,48,41,44,32,85,78,73,81,85,69,40,101,109,
|
|
97,105,108,41,41,0,12,1,80,1,36,152,2,176,
|
|
42,0,106,6,117,113,116,98,108,0,12,1,80,2,
|
|
36,154,2,176,18,0,106,38,52,101,32,85,78,73,
|
|
81,85,69,32,99,111,110,115,116,114,97,105,110,116,
|
|
58,32,109,101,116,97,100,97,116,97,32,115,116,111,
|
|
114,101,100,0,176,23,0,95,2,106,7,117,110,105,
|
|
113,117,101,0,1,12,1,122,16,20,2,36,156,2,
|
|
176,20,0,106,52,73,78,83,69,82,84,32,73,78,
|
|
84,79,32,117,113,116,98,108,32,40,105,100,44,32,
|
|
101,109,97,105,108,41,32,86,65,76,85,69,83,32,
|
|
40,49,44,32,39,97,64,98,46,99,111,109,39,41,
|
|
0,20,1,36,157,2,176,33,0,120,100,106,10,117,
|
|
113,116,98,108,46,100,98,102,0,100,120,9,20,6,
|
|
36,158,2,176,43,0,106,6,117,113,116,98,108,0,
|
|
106,6,101,109,97,105,108,0,106,8,98,64,99,46,
|
|
99,111,109,0,121,12,4,80,3,36,159,2,176,18,
|
|
0,106,29,52,101,32,85,78,73,81,85,69,58,32,
|
|
110,101,119,32,101,109,97,105,108,32,97,108,108,111,
|
|
119,101,100,0,95,3,20,2,36,161,2,176,43,0,
|
|
106,6,117,113,116,98,108,0,106,6,101,109,97,105,
|
|
108,0,106,8,97,64,98,46,99,111,109,0,121,12,
|
|
4,80,3,36,162,2,176,18,0,106,36,52,101,32,
|
|
85,78,73,81,85,69,58,32,100,117,112,108,105,99,
|
|
97,116,101,32,101,109,97,105,108,32,114,101,106,101,
|
|
99,116,101,100,0,95,3,68,20,2,36,163,2,85,
|
|
108,44,74,176,38,0,20,0,74,114,72,0,0,36,
|
|
164,2,115,73,36,165,2,104,3,0,92,3,135,104,
|
|
2,0,92,3,135,176,2,0,106,41,32,32,70,65,
|
|
73,76,58,32,52,101,32,85,78,73,81,85,69,32,
|
|
99,111,110,115,116,114,97,105,110,116,32,40,101,120,
|
|
99,101,112,116,105,111,110,41,0,20,1,36,169,2,
|
|
113,114,2,0,36,170,2,176,41,0,20,0,36,171,
|
|
2,176,20,0,106,53,67,82,69,65,84,69,32,84,
|
|
65,66,76,69,32,102,107,95,112,97,114,101,110,116,
|
|
32,40,105,100,32,73,78,84,69,71,69,82,44,32,
|
|
80,82,73,77,65,82,89,32,75,69,89,40,105,100,
|
|
41,41,0,20,1,36,172,2,176,20,0,106,38,73,
|
|
78,83,69,82,84,32,73,78,84,79,32,102,107,95,
|
|
112,97,114,101,110,116,32,40,105,100,41,32,86,65,
|
|
76,85,69,83,32,40,49,41,0,20,1,36,173,2,
|
|
176,20,0,106,38,73,78,83,69,82,84,32,73,78,
|
|
84,79,32,102,107,95,112,97,114,101,110,116,32,40,
|
|
105,100,41,32,86,65,76,85,69,83,32,40,50,41,
|
|
0,20,1,36,175,2,176,20,0,106,103,67,82,69,
|
|
65,84,69,32,84,65,66,76,69,32,102,107,95,99,
|
|
104,105,108,100,32,40,105,100,32,73,78,84,69,71,
|
|
69,82,44,32,112,97,114,101,110,116,95,105,100,32,
|
|
73,78,84,69,71,69,82,44,32,70,79,82,69,73,
|
|
71,78,32,75,69,89,40,112,97,114,101,110,116,95,
|
|
105,100,41,32,82,69,70,69,82,69,78,67,69,83,
|
|
32,102,107,95,112,97,114,101,110,116,40,105,100,41,
|
|
41,0,12,1,80,1,36,176,2,176,42,0,106,9,
|
|
102,107,95,99,104,105,108,100,0,12,1,80,2,36,
|
|
178,2,176,18,0,106,32,52,102,32,70,79,82,69,
|
|
73,71,78,32,75,69,89,58,32,109,101,116,97,100,
|
|
97,116,97,32,115,116,111,114,101,100,0,176,23,0,
|
|
95,2,106,3,102,107,0,1,12,1,122,16,20,2,
|
|
36,180,2,176,41,0,20,0,36,182,2,176,19,0,
|
|
106,52,73,78,83,69,82,84,32,73,78,84,79,32,
|
|
102,107,95,99,104,105,108,100,32,40,105,100,44,32,
|
|
112,97,114,101,110,116,95,105,100,41,32,86,65,76,
|
|
85,69,83,32,40,49,48,44,32,49,41,0,12,1,
|
|
80,1,36,183,2,176,18,0,106,41,52,102,32,70,
|
|
75,58,32,118,97,108,105,100,32,114,101,102,101,114,
|
|
101,110,99,101,32,40,112,97,114,101,110,116,61,49,
|
|
41,32,112,97,115,115,101,115,0,176,25,0,95,1,
|
|
12,1,68,20,2,36,185,2,176,19,0,106,54,73,
|
|
78,83,69,82,84,32,73,78,84,79,32,102,107,95,
|
|
99,104,105,108,100,32,40,105,100,44,32,112,97,114,
|
|
101,110,116,95,105,100,41,32,86,65,76,85,69,83,
|
|
32,40,50,48,44,32,57,57,57,41,0,12,1,80,
|
|
1,36,186,2,176,18,0,106,44,52,102,32,70,75,
|
|
58,32,105,110,118,97,108,105,100,32,114,101,102,101,
|
|
114,101,110,99,101,32,40,112,97,114,101,110,116,61,
|
|
57,57,57,41,32,102,97,105,108,115,0,176,25,0,
|
|
95,1,12,1,20,2,114,66,0,0,36,187,2,115,
|
|
73,36,188,2,104,3,0,92,3,135,104,2,0,92,
|
|
3,135,176,2,0,106,35,32,32,70,65,73,76,58,
|
|
32,52,102,32,70,79,82,69,73,71,78,32,75,69,
|
|
89,32,40,101,120,99,101,112,116,105,111,110,41,0,
|
|
20,1,36,191,2,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( TESTMERGE )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,47,0,36,202,2,113,46,1,0,36,
|
|
203,2,176,20,0,106,65,67,82,69,65,84,69,32,
|
|
84,65,66,76,69,32,116,97,114,103,101,116,95,116,
|
|
98,108,32,40,105,100,32,73,78,84,69,71,69,82,
|
|
44,32,110,97,109,101,32,67,72,65,82,40,50,48,
|
|
41,44,32,118,97,108,32,73,78,84,69,71,69,82,
|
|
41,0,20,1,36,204,2,176,20,0,106,62,73,78,
|
|
83,69,82,84,32,73,78,84,79,32,116,97,114,103,
|
|
101,116,95,116,98,108,32,40,105,100,44,32,110,97,
|
|
109,101,44,32,118,97,108,41,32,86,65,76,85,69,
|
|
83,32,40,49,44,32,39,79,108,100,39,44,32,49,
|
|
48,48,41,0,20,1,36,206,2,176,20,0,106,65,
|
|
67,82,69,65,84,69,32,84,65,66,76,69,32,115,
|
|
111,117,114,99,101,95,116,98,108,32,40,105,100,32,
|
|
73,78,84,69,71,69,82,44,32,110,97,109,101,32,
|
|
67,72,65,82,40,50,48,41,44,32,118,97,108,32,
|
|
73,78,84,69,71,69,82,41,0,20,1,36,207,2,
|
|
176,20,0,106,62,73,78,83,69,82,84,32,73,78,
|
|
84,79,32,115,111,117,114,99,101,95,116,98,108,32,
|
|
40,105,100,44,32,110,97,109,101,44,32,118,97,108,
|
|
41,32,86,65,76,85,69,83,32,40,49,44,32,39,
|
|
78,101,119,39,44,32,50,48,48,41,0,20,1,114,
|
|
53,0,0,36,208,2,115,73,36,209,2,176,2,0,
|
|
106,34,32,32,40,77,69,82,71,69,32,115,101,116,
|
|
117,112,32,101,114,114,111,114,44,32,99,111,110,116,
|
|
105,110,117,105,110,103,41,0,20,1,36,213,2,113,
|
|
171,1,0,36,217,2,176,20,0,106,247,77,69,82,
|
|
71,69,32,73,78,84,79,32,116,97,114,103,101,116,
|
|
95,116,98,108,32,85,83,73,78,71,32,115,111,117,
|
|
114,99,101,95,116,98,108,32,79,78,32,116,97,114,
|
|
103,101,116,95,116,98,108,46,105,100,32,61,32,115,
|
|
111,117,114,99,101,95,116,98,108,46,105,100,32,87,
|
|
72,69,78,32,77,65,84,67,72,69,68,32,84,72,
|
|
69,78,32,85,80,68,65,84,69,32,83,69,84,32,
|
|
110,97,109,101,32,61,32,115,111,117,114,99,101,95,
|
|
116,98,108,46,110,97,109,101,44,32,118,97,108,32,
|
|
61,32,115,111,117,114,99,101,95,116,98,108,46,118,
|
|
97,108,32,87,72,69,78,32,78,79,84,32,77,65,
|
|
84,67,72,69,68,32,84,72,69,78,32,73,78,83,
|
|
69,82,84,32,40,105,100,44,32,110,97,109,101,44,
|
|
32,118,97,108,41,32,86,65,76,85,69,83,32,40,
|
|
115,111,117,114,99,101,95,116,98,108,46,105,100,44,
|
|
32,115,111,117,114,99,101,95,116,98,108,46,110,97,
|
|
109,101,44,32,115,111,117,114,99,101,95,116,98,108,
|
|
46,118,97,108,41,0,12,1,80,1,36,219,2,176,
|
|
20,0,106,46,83,69,76,69,67,84,32,110,97,109,
|
|
101,44,32,118,97,108,32,70,82,79,77,32,116,97,
|
|
114,103,101,116,95,116,98,108,32,87,72,69,82,69,
|
|
32,105,100,32,61,32,49,0,12,1,80,1,36,222,
|
|
2,176,18,0,106,48,53,97,32,77,69,82,71,69,
|
|
32,117,112,100,97,116,101,32,101,120,105,115,116,105,
|
|
110,103,58,32,105,100,61,49,32,110,97,109,101,61,
|
|
78,101,119,32,118,97,108,61,50,48,48,0,176,28,
|
|
0,176,29,0,176,26,0,95,1,122,122,12,3,12,
|
|
1,12,1,106,4,78,69,87,0,8,21,28,17,73,
|
|
176,26,0,95,1,122,92,2,12,3,93,200,0,8,
|
|
20,2,114,72,0,0,36,223,2,115,73,36,224,2,
|
|
104,3,0,170,104,2,0,170,176,2,0,106,45,32,
|
|
32,70,65,73,76,58,32,53,97,32,77,69,82,71,
|
|
69,32,117,112,100,97,116,101,32,101,120,105,115,116,
|
|
105,110,103,32,40,101,120,99,101,112,116,105,111,110,
|
|
41,0,20,1,36,228,2,113,229,1,0,36,229,2,
|
|
176,41,0,20,0,36,230,2,176,20,0,106,64,73,
|
|
78,83,69,82,84,32,73,78,84,79,32,115,111,117,
|
|
114,99,101,95,116,98,108,32,40,105,100,44,32,110,
|
|
97,109,101,44,32,118,97,108,41,32,86,65,76,85,
|
|
69,83,32,40,50,44,32,39,66,114,97,110,100,39,
|
|
44,32,51,48,48,41,0,20,1,36,234,2,176,20,
|
|
0,106,247,77,69,82,71,69,32,73,78,84,79,32,
|
|
116,97,114,103,101,116,95,116,98,108,32,85,83,73,
|
|
78,71,32,115,111,117,114,99,101,95,116,98,108,32,
|
|
79,78,32,116,97,114,103,101,116,95,116,98,108,46,
|
|
105,100,32,61,32,115,111,117,114,99,101,95,116,98,
|
|
108,46,105,100,32,87,72,69,78,32,77,65,84,67,
|
|
72,69,68,32,84,72,69,78,32,85,80,68,65,84,
|
|
69,32,83,69,84,32,110,97,109,101,32,61,32,115,
|
|
111,117,114,99,101,95,116,98,108,46,110,97,109,101,
|
|
44,32,118,97,108,32,61,32,115,111,117,114,99,101,
|
|
95,116,98,108,46,118,97,108,32,87,72,69,78,32,
|
|
78,79,84,32,77,65,84,67,72,69,68,32,84,72,
|
|
69,78,32,73,78,83,69,82,84,32,40,105,100,44,
|
|
32,110,97,109,101,44,32,118,97,108,41,32,86,65,
|
|
76,85,69,83,32,40,115,111,117,114,99,101,95,116,
|
|
98,108,46,105,100,44,32,115,111,117,114,99,101,95,
|
|
116,98,108,46,110,97,109,101,44,32,115,111,117,114,
|
|
99,101,95,116,98,108,46,118,97,108,41,0,12,1,
|
|
80,1,36,236,2,176,20,0,106,41,83,69,76,69,
|
|
67,84,32,110,97,109,101,32,70,82,79,77,32,116,
|
|
97,114,103,101,116,95,116,98,108,32,87,72,69,82,
|
|
69,32,105,100,32,61,32,50,0,12,1,80,1,36,
|
|
239,2,176,18,0,106,32,53,98,32,77,69,82,71,
|
|
69,32,105,110,115,101,114,116,32,110,101,119,58,32,
|
|
105,100,61,50,32,97,100,100,101,100,0,176,21,0,
|
|
95,1,12,1,122,8,21,28,31,73,176,28,0,176,
|
|
29,0,176,26,0,95,1,122,122,12,3,12,1,12,
|
|
1,106,6,66,82,65,78,68,0,8,20,2,114,67,
|
|
0,0,36,240,2,115,73,36,241,2,104,3,0,170,
|
|
104,2,0,170,176,2,0,106,40,32,32,70,65,73,
|
|
76,58,32,53,98,32,77,69,82,71,69,32,105,110,
|
|
115,101,114,116,32,110,101,119,32,40,101,120,99,101,
|
|
112,116,105,111,110,41,0,20,1,36,245,2,113,206,
|
|
1,0,36,246,2,176,41,0,20,0,36,247,2,176,
|
|
20,0,106,64,73,78,83,69,82,84,32,73,78,84,
|
|
79,32,115,111,117,114,99,101,95,116,98,108,32,40,
|
|
105,100,44,32,110,97,109,101,44,32,118,97,108,41,
|
|
32,86,65,76,85,69,83,32,40,51,44,32,39,84,
|
|
104,105,114,100,39,44,32,52,48,48,41,0,20,1,
|
|
36,251,2,176,20,0,106,247,77,69,82,71,69,32,
|
|
73,78,84,79,32,116,97,114,103,101,116,95,116,98,
|
|
108,32,85,83,73,78,71,32,115,111,117,114,99,101,
|
|
95,116,98,108,32,79,78,32,116,97,114,103,101,116,
|
|
95,116,98,108,46,105,100,32,61,32,115,111,117,114,
|
|
99,101,95,116,98,108,46,105,100,32,87,72,69,78,
|
|
32,77,65,84,67,72,69,68,32,84,72,69,78,32,
|
|
85,80,68,65,84,69,32,83,69,84,32,110,97,109,
|
|
101,32,61,32,115,111,117,114,99,101,95,116,98,108,
|
|
46,110,97,109,101,44,32,118,97,108,32,61,32,115,
|
|
111,117,114,99,101,95,116,98,108,46,118,97,108,32,
|
|
87,72,69,78,32,78,79,84,32,77,65,84,67,72,
|
|
69,68,32,84,72,69,78,32,73,78,83,69,82,84,
|
|
32,40,105,100,44,32,110,97,109,101,44,32,118,97,
|
|
108,41,32,86,65,76,85,69,83,32,40,115,111,117,
|
|
114,99,101,95,116,98,108,46,105,100,44,32,115,111,
|
|
117,114,99,101,95,116,98,108,46,110,97,109,101,44,
|
|
32,115,111,117,114,99,101,95,116,98,108,46,118,97,
|
|
108,41,0,12,1,80,1,36,253,2,176,20,0,106,
|
|
39,83,69,76,69,67,84,32,67,79,85,78,84,40,
|
|
42,41,32,65,83,32,99,110,116,32,70,82,79,77,
|
|
32,116,97,114,103,101,116,95,116,98,108,0,12,1,
|
|
80,1,36,255,2,176,18,0,106,40,53,99,32,77,
|
|
69,82,71,69,32,109,105,120,101,100,58,32,116,97,
|
|
114,103,101,116,32,104,97,115,32,51,32,114,111,119,
|
|
115,32,116,111,116,97,108,0,176,26,0,95,1,122,
|
|
122,12,3,92,3,8,20,2,114,62,0,0,36,0,
|
|
3,115,73,36,1,3,104,3,0,170,104,2,0,170,
|
|
176,2,0,106,35,32,32,70,65,73,76,58,32,53,
|
|
99,32,77,69,82,71,69,32,109,105,120,101,100,32,
|
|
40,101,120,99,101,112,116,105,111,110,41,0,20,1,
|
|
36,4,3,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( TESTCOMBINED )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,2,0,116,47,0,36,15,3,176,41,0,20,0,
|
|
36,16,3,176,31,0,106,17,95,95,99,116,101,95,
|
|
114,97,110,107,101,100,46,100,98,102,0,20,1,36,
|
|
17,3,176,31,0,106,23,95,95,99,116,101,95,111,
|
|
114,100,101,114,95,116,111,116,97,108,115,46,100,98,
|
|
102,0,20,1,36,18,3,176,31,0,106,23,95,95,
|
|
99,116,101,95,100,101,112,116,95,115,117,109,109,97,
|
|
114,121,46,100,98,102,0,20,1,36,19,3,176,31,
|
|
0,106,14,95,95,99,116,101,95,111,114,103,46,100,
|
|
98,102,0,20,1,36,22,3,113,6,1,0,36,28,
|
|
3,176,20,0,106,187,87,73,84,72,32,114,97,110,
|
|
107,101,100,32,65,83,32,40,83,69,76,69,67,84,
|
|
32,101,46,110,97,109,101,44,32,101,46,100,101,112,
|
|
116,44,32,101,46,115,97,108,97,114,121,44,32,82,
|
|
79,87,95,78,85,77,66,69,82,40,41,32,79,86,
|
|
69,82,32,40,80,65,82,84,73,84,73,79,78,32,
|
|
66,89,32,101,46,100,101,112,116,32,79,82,68,69,
|
|
82,32,66,89,32,101,46,115,97,108,97,114,121,32,
|
|
68,69,83,67,41,32,65,83,32,114,110,32,70,82,
|
|
79,77,32,101,109,112,108,111,121,101,101,115,32,101,
|
|
41,32,83,69,76,69,67,84,32,110,97,109,101,44,
|
|
32,100,101,112,116,44,32,115,97,108,97,114,121,32,
|
|
70,82,79,77,32,114,97,110,107,101,100,32,87,72,
|
|
69,82,69,32,114,110,32,61,32,49,0,12,1,80,
|
|
1,36,30,3,176,18,0,106,35,54,97,32,67,84,
|
|
69,43,87,105,110,100,111,119,58,32,116,111,112,32,
|
|
101,97,114,110,101,114,32,112,101,114,32,100,101,112,
|
|
116,0,176,21,0,95,1,12,1,92,4,8,20,2,
|
|
114,72,0,0,36,31,3,115,73,36,32,3,104,3,
|
|
0,170,104,2,0,170,176,2,0,106,45,32,32,70,
|
|
65,73,76,58,32,54,97,32,67,84,69,43,87,105,
|
|
110,100,111,119,32,116,111,112,32,101,97,114,110,101,
|
|
114,32,40,101,120,99,101,112,116,105,111,110,41,0,
|
|
20,1,36,37,3,176,45,0,106,7,82,65,78,75,
|
|
69,68,0,12,1,121,15,28,24,36,38,3,176,46,
|
|
0,106,7,82,65,78,75,69,68,0,20,1,176,38,
|
|
0,20,0,36,40,3,176,45,0,106,2,69,0,12,
|
|
1,121,15,28,19,36,41,3,176,46,0,106,2,69,
|
|
0,20,1,176,38,0,20,0,36,43,3,176,45,0,
|
|
106,13,79,82,68,69,82,95,84,79,84,65,76,83,
|
|
0,12,1,121,15,28,30,36,44,3,176,46,0,106,
|
|
13,79,82,68,69,82,95,84,79,84,65,76,83,0,
|
|
20,1,176,38,0,20,0,36,46,3,176,30,0,106,
|
|
17,95,95,99,116,101,95,114,97,110,107,101,100,46,
|
|
100,98,102,0,12,1,28,29,36,47,3,176,31,0,
|
|
106,17,95,95,99,116,101,95,114,97,110,107,101,100,
|
|
46,100,98,102,0,20,1,36,49,3,113,71,1,0,
|
|
36,55,3,176,20,0,106,209,87,73,84,72,32,111,
|
|
114,100,101,114,95,116,111,116,97,108,115,32,65,83,
|
|
32,40,83,69,76,69,67,84,32,101,109,112,95,105,
|
|
100,44,32,83,85,77,40,97,109,111,117,110,116,41,
|
|
32,65,83,32,116,111,116,97,108,32,70,82,79,77,
|
|
32,111,114,100,101,114,115,32,71,82,79,85,80,32,
|
|
66,89,32,101,109,112,95,105,100,41,32,83,69,76,
|
|
69,67,84,32,101,46,110,97,109,101,44,32,116,46,
|
|
116,111,116,97,108,32,70,82,79,77,32,101,109,112,
|
|
108,111,121,101,101,115,32,101,32,74,79,73,78,32,
|
|
111,114,100,101,114,95,116,111,116,97,108,115,32,116,
|
|
32,79,78,32,101,46,105,100,32,61,32,116,46,101,
|
|
109,112,95,105,100,32,87,72,69,82,69,32,116,46,
|
|
116,111,116,97,108,32,62,32,49,48,48,48,32,79,
|
|
82,68,69,82,32,66,89,32,116,46,116,111,116,97,
|
|
108,32,68,69,83,67,0,12,1,80,1,36,56,3,
|
|
176,2,0,106,20,32,32,32,32,54,98,32,100,101,
|
|
98,117,103,58,32,114,111,119,115,61,0,176,15,0,
|
|
176,21,0,95,1,12,1,12,1,72,20,1,36,58,
|
|
3,176,18,0,106,36,54,98,32,67,84,69,43,65,
|
|
103,103,58,32,101,109,112,32,111,114,100,101,114,32,
|
|
116,111,116,97,108,115,32,62,32,49,48,48,48,0,
|
|
176,21,0,95,1,12,1,122,16,20,2,114,80,0,
|
|
0,36,59,3,115,80,2,36,60,3,104,3,0,170,
|
|
104,2,0,170,176,2,0,106,21,32,32,70,65,73,
|
|
76,58,32,54,98,32,67,84,69,43,65,103,103,58,
|
|
32,0,95,2,100,69,28,11,48,3,0,95,2,112,
|
|
0,25,17,106,13,110,111,32,101,114,114,111,114,32,
|
|
111,98,106,0,72,20,1,36,64,3,113,196,0,0,
|
|
36,69,3,176,20,0,106,122,83,69,76,69,67,84,
|
|
32,110,97,109,101,44,32,115,97,108,97,114,121,44,
|
|
32,115,97,108,97,114,121,32,45,32,65,86,71,40,
|
|
115,97,108,97,114,121,41,32,79,86,69,82,32,40,
|
|
41,32,65,83,32,100,105,102,102,95,102,114,111,109,
|
|
95,97,118,103,32,70,82,79,77,32,101,109,112,108,
|
|
111,121,101,101,115,32,87,72,69,82,69,32,105,100,
|
|
32,73,78,32,40,83,69,76,69,67,84,32,101,109,
|
|
112,95,105,100,32,70,82,79,77,32,111,114,100,101,
|
|
114,115,41,0,12,1,80,1,36,71,3,176,18,0,
|
|
106,34,54,99,32,87,105,110,100,111,119,43,83,117,
|
|
98,113,117,101,114,121,58,32,100,105,102,102,32,102,
|
|
114,111,109,32,97,118,103,0,176,21,0,95,1,12,
|
|
1,92,5,16,20,2,114,66,0,0,36,72,3,115,
|
|
73,36,73,3,104,3,0,170,104,2,0,170,176,2,
|
|
0,106,39,32,32,70,65,73,76,58,32,54,99,32,
|
|
87,105,110,100,111,119,43,83,117,98,113,117,101,114,
|
|
121,32,40,101,120,99,101,112,116,105,111,110,41,0,
|
|
20,1,36,77,3,113,49,1,0,36,83,3,176,20,
|
|
0,106,215,87,73,84,72,32,82,69,67,85,82,83,
|
|
73,86,69,32,111,114,103,32,65,83,32,40,83,69,
|
|
76,69,67,84,32,105,100,44,32,110,97,109,101,44,
|
|
32,49,32,65,83,32,108,118,108,32,70,82,79,77,
|
|
32,101,109,112,108,111,121,101,101,115,32,87,72,69,
|
|
82,69,32,109,103,114,95,105,100,32,61,32,48,32,
|
|
85,78,73,79,78,32,65,76,76,32,83,69,76,69,
|
|
67,84,32,101,46,105,100,44,32,101,46,110,97,109,
|
|
101,44,32,111,46,108,118,108,32,43,32,49,32,70,
|
|
82,79,77,32,101,109,112,108,111,121,101,101,115,32,
|
|
101,32,74,79,73,78,32,111,114,103,32,111,32,79,
|
|
78,32,101,46,109,103,114,95,105,100,32,61,32,111,
|
|
46,105,100,41,32,83,69,76,69,67,84,32,110,97,
|
|
109,101,44,32,108,118,108,32,70,82,79,77,32,111,
|
|
114,103,32,79,82,68,69,82,32,66,89,32,108,118,
|
|
108,44,32,110,97,109,101,0,12,1,80,1,36,85,
|
|
3,176,18,0,106,34,54,100,32,82,69,67,85,82,
|
|
83,73,86,69,32,67,84,69,43,74,79,73,78,58,
|
|
32,111,114,103,32,108,101,118,101,108,115,0,176,21,
|
|
0,95,1,12,1,92,10,8,21,28,15,73,176,26,
|
|
0,95,1,122,92,2,12,3,122,8,20,2,114,75,
|
|
0,0,36,86,3,115,73,36,87,3,104,3,0,170,
|
|
104,2,0,170,176,2,0,106,48,32,32,70,65,73,
|
|
76,58,32,54,100,32,82,69,67,85,82,83,73,86,
|
|
69,32,67,84,69,32,111,114,103,32,108,101,118,101,
|
|
108,115,32,40,101,120,99,101,112,116,105,111,110,41,
|
|
0,20,1,36,91,3,113,32,1,0,36,97,3,176,
|
|
20,0,106,188,87,73,84,72,32,100,101,112,116,95,
|
|
115,117,109,109,97,114,121,32,65,83,32,40,83,69,
|
|
76,69,67,84,32,100,101,112,116,44,32,67,79,85,
|
|
78,84,40,42,41,32,65,83,32,99,110,116,44,32,
|
|
83,85,77,40,115,97,108,97,114,121,41,32,65,83,
|
|
32,116,111,116,97,108,32,70,82,79,77,32,101,109,
|
|
112,108,111,121,101,101,115,32,71,82,79,85,80,32,
|
|
66,89,32,100,101,112,116,41,32,83,69,76,69,67,
|
|
84,32,100,101,112,116,44,32,99,110,116,44,32,116,
|
|
111,116,97,108,44,32,82,65,78,75,40,41,32,79,
|
|
86,69,82,32,40,79,82,68,69,82,32,66,89,32,
|
|
116,111,116,97,108,32,68,69,83,67,41,32,65,83,
|
|
32,114,97,110,107,32,70,82,79,77,32,100,101,112,
|
|
116,95,115,117,109,109,97,114,121,0,12,1,80,1,
|
|
36,99,3,176,18,0,106,44,54,101,32,67,84,69,
|
|
43,87,105,110,100,111,119,58,32,100,101,112,116,32,
|
|
115,117,109,109,97,114,121,32,114,97,110,107,101,100,
|
|
32,98,121,32,116,111,116,97,108,0,176,21,0,95,
|
|
1,12,1,92,4,8,21,28,15,73,176,26,0,95,
|
|
1,122,92,4,12,3,122,8,20,2,114,74,0,0,
|
|
36,100,3,115,73,36,101,3,104,3,0,170,104,2,
|
|
0,170,176,2,0,106,47,32,32,70,65,73,76,58,
|
|
32,54,101,32,67,84,69,43,87,105,110,100,111,119,
|
|
32,100,101,112,116,32,115,117,109,109,97,114,121,32,
|
|
40,101,120,99,101,112,116,105,111,110,41,0,20,1,
|
|
36,104,3,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_INITSTATICS()
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
117,47,0,3,0,116,47,0,121,82,1,0,121,82,
|
|
2,0,121,82,3,0,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|