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>
935 lines
36 KiB
C
935 lines
36 KiB
C
/*
|
|
* Harbour 3.2.0dev (r2510040809)
|
|
* GNU C 13.3 (64-bit)
|
|
* Generated C source from "test/test_sql_challenge.prg"
|
|
*/
|
|
|
|
#include "hbvmpub.h"
|
|
#include "hbinit.h"
|
|
|
|
|
|
HB_FUNC( MAIN );
|
|
HB_FUNC_EXTERN( QOUT );
|
|
HB_FUNC_STATIC( SETUPDATA );
|
|
HB_FUNC_STATIC( CHALLENGE01_SECONDHIGHESTSALARY );
|
|
HB_FUNC_STATIC( CHALLENGE02_NTHHIGHESTPERDEPT );
|
|
HB_FUNC_STATIC( CHALLENGE03_CONSECUTIVENUMBERS );
|
|
HB_FUNC_STATIC( CHALLENGE04_DEPTVSCOMPANYAVG );
|
|
HB_FUNC_STATIC( CHALLENGE05_EMPLOYEEMANAGERSALARY );
|
|
HB_FUNC_STATIC( CHALLENGE06_CUMULATIVESUM );
|
|
HB_FUNC_STATIC( CHALLENGE07_GAPANALYSIS );
|
|
HB_FUNC_STATIC( CHALLENGE08_PIVOTSIMULATION );
|
|
HB_FUNC_STATIC( CHALLENGE09_SELFJOINHIERARCHY );
|
|
HB_FUNC_STATIC( CHALLENGE10_TOPNPERGROUP );
|
|
HB_FUNC_STATIC( CHALLENGE11_RUNNINGRANK );
|
|
HB_FUNC_STATIC( CHALLENGE12_YOYGROWTH );
|
|
HB_FUNC_STATIC( CHALLENGE13_ISLANDGAP );
|
|
HB_FUNC_STATIC( CHALLENGE14_MEDIANAPPROX );
|
|
HB_FUNC_STATIC( CHALLENGE15_TRIPLENESTED );
|
|
HB_FUNC_STATIC( CLEANUPDATA );
|
|
HB_FUNC_EXTERN( HB_NTOS );
|
|
HB_FUNC_EXTERN( INT );
|
|
HB_FUNC_EXTERN( MAX );
|
|
HB_FUNC_STATIC( ASSERT );
|
|
HB_FUNC_STATIC( ROWS );
|
|
HB_FUNC_EXTERN( VALTYPE );
|
|
HB_FUNC_EXTERN( LEN );
|
|
HB_FUNC_STATIC( CELL );
|
|
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( DBCLOSEALL );
|
|
HB_FUNC_EXTERN( DBSELECTAREA );
|
|
HB_FUNC_EXTERN( __SETFORMAT );
|
|
HB_FUNC_EXTERN( FIVE_SQL );
|
|
HB_FUNC_INITSTATICS();
|
|
|
|
|
|
HB_INIT_SYMBOLS_BEGIN( hb_vm_SymbolInit_TEST_SQL_CHALLENGE )
|
|
{ "MAIN", {HB_FS_PUBLIC | HB_FS_FIRST | HB_FS_LOCAL}, {HB_FUNCNAME( MAIN )}, NULL },
|
|
{ "QOUT", {HB_FS_PUBLIC}, {HB_FUNCNAME( QOUT )}, NULL },
|
|
{ "SETUPDATA", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( SETUPDATA )}, NULL },
|
|
{ "CHALLENGE01_SECONDHIGHESTSALARY", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE01_SECONDHIGHESTSALARY )}, NULL },
|
|
{ "CHALLENGE02_NTHHIGHESTPERDEPT", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE02_NTHHIGHESTPERDEPT )}, NULL },
|
|
{ "CHALLENGE03_CONSECUTIVENUMBERS", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE03_CONSECUTIVENUMBERS )}, NULL },
|
|
{ "CHALLENGE04_DEPTVSCOMPANYAVG", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE04_DEPTVSCOMPANYAVG )}, NULL },
|
|
{ "CHALLENGE05_EMPLOYEEMANAGERSALARY", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE05_EMPLOYEEMANAGERSALARY )}, NULL },
|
|
{ "CHALLENGE06_CUMULATIVESUM", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE06_CUMULATIVESUM )}, NULL },
|
|
{ "CHALLENGE07_GAPANALYSIS", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE07_GAPANALYSIS )}, NULL },
|
|
{ "CHALLENGE08_PIVOTSIMULATION", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE08_PIVOTSIMULATION )}, NULL },
|
|
{ "CHALLENGE09_SELFJOINHIERARCHY", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE09_SELFJOINHIERARCHY )}, NULL },
|
|
{ "CHALLENGE10_TOPNPERGROUP", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE10_TOPNPERGROUP )}, NULL },
|
|
{ "CHALLENGE11_RUNNINGRANK", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE11_RUNNINGRANK )}, NULL },
|
|
{ "CHALLENGE12_YOYGROWTH", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE12_YOYGROWTH )}, NULL },
|
|
{ "CHALLENGE13_ISLANDGAP", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE13_ISLANDGAP )}, NULL },
|
|
{ "CHALLENGE14_MEDIANAPPROX", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE14_MEDIANAPPROX )}, NULL },
|
|
{ "CHALLENGE15_TRIPLENESTED", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CHALLENGE15_TRIPLENESTED )}, 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 },
|
|
{ "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 },
|
|
{ "CELL", {HB_FS_STATIC | HB_FS_LOCAL}, {HB_FUNCNAME( CELL )}, 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 },
|
|
{ "DBCLOSEALL", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBCLOSEALL )}, NULL },
|
|
{ "DBSELECTAREA", {HB_FS_PUBLIC}, {HB_FUNCNAME( DBSELECTAREA )}, NULL },
|
|
{ "__SETFORMAT", {HB_FS_PUBLIC}, {HB_FUNCNAME( __SETFORMAT )}, NULL },
|
|
{ "FIVE_SQL", {HB_FS_PUBLIC}, {HB_FUNCNAME( FIVE_SQL )}, NULL },
|
|
{ "(_INITSTATICS00003)", {HB_FS_INITEXIT | HB_FS_LOCAL}, {hb_INITSTATICS}, NULL }
|
|
HB_INIT_SYMBOLS_EX_END( hb_vm_SymbolInit_TEST_SQL_CHALLENGE, "test/test_sql_challenge.prg", 0x0, 0x0003 )
|
|
|
|
#if defined( HB_PRAGMA_STARTUP )
|
|
#pragma startup hb_vm_SymbolInit_TEST_SQL_CHALLENGE
|
|
#elif defined( HB_DATASEG_STARTUP )
|
|
#define HB_DATASEG_BODY HB_DATASEG_FUNC( hb_vm_SymbolInit_TEST_SQL_CHALLENGE )
|
|
#include "hbiniseg.h"
|
|
#endif
|
|
|
|
HB_FUNC( MAIN )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
116,37,0,36,22,0,176,1,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,23,0,176,1,0,
|
|
106,51,32,32,83,81,76,32,67,104,97,108,108,101,
|
|
110,103,101,32,81,117,101,114,105,101,115,32,226,128,
|
|
148,32,82,101,97,108,45,119,111,114,108,100,32,83,
|
|
116,114,101,115,115,32,84,101,115,116,0,20,1,36,
|
|
24,0,176,1,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,25,0,176,1,0,20,0,36,27,
|
|
0,176,2,0,20,0,36,29,0,176,3,0,20,0,
|
|
36,30,0,176,4,0,20,0,36,31,0,176,5,0,
|
|
20,0,36,32,0,176,6,0,20,0,36,33,0,176,
|
|
7,0,20,0,36,34,0,176,8,0,20,0,36,35,
|
|
0,176,9,0,20,0,36,36,0,176,10,0,20,0,
|
|
36,37,0,176,11,0,20,0,36,38,0,176,12,0,
|
|
20,0,36,39,0,176,13,0,20,0,36,40,0,176,
|
|
14,0,20,0,36,41,0,176,15,0,20,0,36,42,
|
|
0,176,16,0,20,0,36,43,0,176,17,0,20,0,
|
|
36,45,0,176,18,0,20,0,36,47,0,176,1,0,
|
|
20,0,36,48,0,176,1,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,49,0,176,1,0,106,
|
|
10,32,32,80,97,115,115,58,32,32,0,176,19,0,
|
|
103,1,0,12,1,72,20,1,36,50,0,176,1,0,
|
|
106,10,32,32,70,97,105,108,58,32,32,0,176,19,
|
|
0,103,2,0,12,1,72,20,1,36,51,0,176,1,
|
|
0,106,10,32,32,84,111,116,97,108,58,32,0,176,
|
|
19,0,103,3,0,12,1,72,20,1,36,52,0,176,
|
|
1,0,106,10,32,32,82,97,116,101,58,32,32,0,
|
|
176,19,0,176,20,0,103,1,0,92,100,65,176,21,
|
|
0,103,3,0,122,12,2,18,12,1,12,1,72,106,
|
|
2,37,0,72,20,1,36,53,0,176,1,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,55,0,
|
|
7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( ASSERT )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,2,116,37,0,36,60,0,104,3,0,170,36,
|
|
61,0,95,2,28,33,36,62,0,104,1,0,170,36,
|
|
63,0,176,1,0,106,9,32,32,80,65,83,83,58,
|
|
32,0,95,1,72,20,1,25,31,36,65,0,104,2,
|
|
0,170,36,66,0,176,1,0,106,9,32,32,70,65,
|
|
73,76,58,32,0,95,1,72,20,1,36,69,0,95,
|
|
2,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( ROWS )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,1,36,73,0,176,24,0,95,1,12,1,106,
|
|
2,65,0,8,28,45,176,25,0,95,1,12,1,92,
|
|
2,16,28,33,176,24,0,95,1,92,2,1,12,1,
|
|
106,2,65,0,8,28,16,36,74,0,176,25,0,95,
|
|
1,92,2,1,20,1,7,36,77,0,121,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CELL )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,0,3,36,82,0,176,24,0,95,1,12,1,106,
|
|
2,65,0,8,28,63,176,25,0,95,1,12,1,92,
|
|
2,16,28,51,95,2,176,25,0,95,1,92,2,1,
|
|
12,1,34,28,36,95,3,176,25,0,95,1,92,2,
|
|
1,95,2,1,12,1,34,28,18,36,83,0,95,1,
|
|
92,2,1,95,2,1,95,3,1,110,7,36,86,0,
|
|
100,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( SETUPDATA )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
36,92,0,176,27,0,106,14,101,109,112,108,111,121,
|
|
101,101,115,46,100,98,102,0,20,1,36,100,0,176,
|
|
28,0,106,14,101,109,112,108,111,121,101,101,115,46,
|
|
100,98,102,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,20,121,4,4,0,106,5,68,69,80,84,
|
|
0,106,2,67,0,92,15,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,106,10,72,73,82,69,
|
|
95,89,69,65,82,0,106,2,78,0,92,4,121,4,
|
|
4,0,4,6,0,20,2,36,101,0,176,29,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,102,0,176,30,0,
|
|
20,0,176,31,0,122,122,20,2,176,31,0,92,2,
|
|
106,6,65,108,105,99,101,0,20,2,176,31,0,92,
|
|
3,106,4,69,110,103,0,20,2,176,31,0,92,4,
|
|
93,40,35,20,2,176,31,0,92,5,121,20,2,176,
|
|
31,0,92,6,93,228,7,20,2,36,103,0,176,30,
|
|
0,20,0,176,31,0,122,92,2,20,2,176,31,0,
|
|
92,2,106,4,66,111,98,0,20,2,176,31,0,92,
|
|
3,106,4,69,110,103,0,20,2,176,31,0,92,4,
|
|
93,64,31,20,2,176,31,0,92,5,122,20,2,176,
|
|
31,0,92,6,93,228,7,20,2,36,104,0,176,30,
|
|
0,20,0,176,31,0,122,92,3,20,2,176,31,0,
|
|
92,2,106,8,67,104,97,114,108,105,101,0,20,2,
|
|
176,31,0,92,3,106,4,69,110,103,0,20,2,176,
|
|
31,0,92,4,93,64,31,20,2,176,31,0,92,5,
|
|
122,20,2,176,31,0,92,6,93,229,7,20,2,36,
|
|
105,0,176,30,0,20,0,176,31,0,122,92,4,20,
|
|
2,176,31,0,92,2,106,6,68,105,97,110,97,0,
|
|
20,2,176,31,0,92,3,106,6,83,97,108,101,115,
|
|
0,20,2,176,31,0,92,4,93,76,29,20,2,176,
|
|
31,0,92,5,121,20,2,176,31,0,92,6,93,227,
|
|
7,20,2,36,106,0,176,30,0,20,0,176,31,0,
|
|
122,92,5,20,2,176,31,0,92,2,106,4,69,118,
|
|
101,0,20,2,176,31,0,92,3,106,6,83,97,108,
|
|
101,115,0,20,2,176,31,0,92,4,93,112,23,20,
|
|
2,176,31,0,92,5,92,4,20,2,176,31,0,92,
|
|
6,93,229,7,20,2,36,107,0,176,30,0,20,0,
|
|
176,31,0,122,92,6,20,2,176,31,0,92,2,106,
|
|
6,70,114,97,110,107,0,20,2,176,31,0,92,3,
|
|
106,6,83,97,108,101,115,0,20,2,176,31,0,92,
|
|
4,93,124,21,20,2,176,31,0,92,5,92,4,20,
|
|
2,176,31,0,92,6,93,230,7,20,2,36,108,0,
|
|
176,30,0,20,0,176,31,0,122,92,7,20,2,176,
|
|
31,0,92,2,106,6,71,114,97,99,101,0,20,2,
|
|
176,31,0,92,3,106,5,77,107,116,103,0,20,2,
|
|
176,31,0,92,4,93,88,27,20,2,176,31,0,92,
|
|
5,121,20,2,176,31,0,92,6,93,228,7,20,2,
|
|
36,109,0,176,30,0,20,0,176,31,0,122,92,8,
|
|
20,2,176,31,0,92,2,106,6,72,101,110,114,121,
|
|
0,20,2,176,31,0,92,3,106,5,77,107,116,103,
|
|
0,20,2,176,31,0,92,4,93,100,25,20,2,176,
|
|
31,0,92,5,92,7,20,2,176,31,0,92,6,93,
|
|
229,7,20,2,36,110,0,176,30,0,20,0,176,31,
|
|
0,122,92,9,20,2,176,31,0,92,2,106,4,73,
|
|
118,121,0,20,2,176,31,0,92,3,106,3,72,82,
|
|
0,20,2,176,31,0,92,4,93,112,23,20,2,176,
|
|
31,0,92,5,121,20,2,176,31,0,92,6,93,227,
|
|
7,20,2,36,111,0,176,30,0,20,0,176,31,0,
|
|
122,92,10,20,2,176,31,0,92,2,106,5,74,97,
|
|
99,107,0,20,2,176,31,0,92,3,106,3,72,82,
|
|
0,20,2,176,31,0,92,4,93,136,19,20,2,176,
|
|
31,0,92,5,92,9,20,2,176,31,0,92,6,93,
|
|
230,7,20,2,36,112,0,176,30,0,20,0,176,31,
|
|
0,122,92,11,20,2,176,31,0,92,2,106,5,75,
|
|
97,116,101,0,20,2,176,31,0,92,3,106,4,69,
|
|
110,103,0,20,2,176,31,0,92,4,93,88,27,20,
|
|
2,176,31,0,92,5,92,2,20,2,176,31,0,92,
|
|
6,93,230,7,20,2,36,113,0,176,30,0,20,0,
|
|
176,31,0,122,92,12,20,2,176,31,0,92,2,106,
|
|
4,76,101,111,0,20,2,176,31,0,92,3,106,4,
|
|
69,110,103,0,20,2,176,31,0,92,4,93,40,35,
|
|
20,2,176,31,0,92,5,92,2,20,2,176,31,0,
|
|
92,6,93,231,7,20,2,36,114,0,176,32,0,20,
|
|
0,36,115,0,176,33,0,20,0,176,34,0,106,2,
|
|
49,0,20,1,176,35,0,100,20,1,36,118,0,176,
|
|
27,0,106,11,111,114,100,101,114,115,46,100,98,102,
|
|
0,20,1,36,124,0,176,28,0,106,11,111,114,100,
|
|
101,114,115,46,100,98,102,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,7,65,77,79,85,78,84,0,106,2,78,0,92,
|
|
12,92,2,4,4,0,106,9,79,82,68,95,89,69,
|
|
65,82,0,106,2,78,0,92,4,121,4,4,0,4,
|
|
4,0,20,2,36,125,0,176,29,0,120,100,106,11,
|
|
111,114,100,101,114,115,46,100,98,102,0,100,9,9,
|
|
20,6,36,126,0,176,30,0,20,0,176,31,0,122,
|
|
122,20,2,176,31,0,92,2,122,20,2,176,31,0,
|
|
92,3,93,196,9,20,2,176,31,0,92,4,93,230,
|
|
7,20,2,36,127,0,176,30,0,20,0,176,31,0,
|
|
122,92,2,20,2,176,31,0,92,2,122,20,2,176,
|
|
31,0,92,3,93,184,11,20,2,176,31,0,92,4,
|
|
93,231,7,20,2,36,128,0,176,30,0,20,0,176,
|
|
31,0,122,92,3,20,2,176,31,0,92,2,92,2,
|
|
20,2,176,31,0,92,3,93,220,5,20,2,176,31,
|
|
0,92,4,93,230,7,20,2,36,129,0,176,30,0,
|
|
20,0,176,31,0,122,92,4,20,2,176,31,0,92,
|
|
2,92,2,20,2,176,31,0,92,3,93,208,7,20,
|
|
2,176,31,0,92,4,93,231,7,20,2,36,130,0,
|
|
176,30,0,20,0,176,31,0,122,92,5,20,2,176,
|
|
31,0,92,2,92,4,20,2,176,31,0,92,3,93,
|
|
160,15,20,2,176,31,0,92,4,93,230,7,20,2,
|
|
36,131,0,176,30,0,20,0,176,31,0,122,92,6,
|
|
20,2,176,31,0,92,2,92,4,20,2,176,31,0,
|
|
92,3,93,172,13,20,2,176,31,0,92,4,93,231,
|
|
7,20,2,36,132,0,176,30,0,20,0,176,31,0,
|
|
122,92,7,20,2,176,31,0,92,2,92,5,20,2,
|
|
176,31,0,92,3,93,232,3,20,2,176,31,0,92,
|
|
4,93,230,7,20,2,36,133,0,176,30,0,20,0,
|
|
176,31,0,122,92,8,20,2,176,31,0,92,2,92,
|
|
5,20,2,176,31,0,92,3,93,176,4,20,2,176,
|
|
31,0,92,4,93,231,7,20,2,36,134,0,176,30,
|
|
0,20,0,176,31,0,122,92,9,20,2,176,31,0,
|
|
92,2,92,7,20,2,176,31,0,92,3,93,184,11,
|
|
20,2,176,31,0,92,4,93,230,7,20,2,36,135,
|
|
0,176,30,0,20,0,176,31,0,122,92,10,20,2,
|
|
176,31,0,92,2,92,7,20,2,176,31,0,92,3,
|
|
93,240,10,20,2,176,31,0,92,4,93,231,7,20,
|
|
2,36,136,0,176,30,0,20,0,176,31,0,122,92,
|
|
11,20,2,176,31,0,92,2,92,9,20,2,176,31,
|
|
0,92,3,93,32,3,20,2,176,31,0,92,4,93,
|
|
230,7,20,2,36,137,0,176,30,0,20,0,176,31,
|
|
0,122,92,12,20,2,176,31,0,92,2,92,9,20,
|
|
2,176,31,0,92,3,93,132,3,20,2,176,31,0,
|
|
92,4,93,231,7,20,2,36,138,0,176,30,0,20,
|
|
0,176,31,0,122,92,13,20,2,176,31,0,92,2,
|
|
92,11,20,2,176,31,0,92,3,93,8,7,20,2,
|
|
176,31,0,92,4,93,231,7,20,2,36,139,0,176,
|
|
30,0,20,0,176,31,0,122,92,14,20,2,176,31,
|
|
0,92,2,92,12,20,2,176,31,0,92,3,93,152,
|
|
8,20,2,176,31,0,92,4,93,231,7,20,2,36,
|
|
140,0,176,30,0,20,0,176,31,0,122,92,15,20,
|
|
2,176,31,0,92,2,92,3,20,2,176,31,0,92,
|
|
3,93,164,6,20,2,176,31,0,92,4,93,230,7,
|
|
20,2,36,141,0,176,30,0,20,0,176,31,0,122,
|
|
92,16,20,2,176,31,0,92,2,92,3,20,2,176,
|
|
31,0,92,3,93,52,8,20,2,176,31,0,92,4,
|
|
93,231,7,20,2,36,142,0,176,30,0,20,0,176,
|
|
31,0,122,92,17,20,2,176,31,0,92,2,92,6,
|
|
20,2,176,31,0,92,3,93,88,2,20,2,176,31,
|
|
0,92,4,93,231,7,20,2,36,143,0,176,30,0,
|
|
20,0,176,31,0,122,92,18,20,2,176,31,0,92,
|
|
2,92,8,20,2,176,31,0,92,3,93,120,5,20,
|
|
2,176,31,0,92,4,93,230,7,20,2,36,144,0,
|
|
176,30,0,20,0,176,31,0,122,92,19,20,2,176,
|
|
31,0,92,2,92,8,20,2,176,31,0,92,3,93,
|
|
64,6,20,2,176,31,0,92,4,93,231,7,20,2,
|
|
36,145,0,176,30,0,20,0,176,31,0,122,92,20,
|
|
20,2,176,31,0,92,2,92,10,20,2,176,31,0,
|
|
92,3,93,244,1,20,2,176,31,0,92,4,93,231,
|
|
7,20,2,36,146,0,176,32,0,20,0,36,147,0,
|
|
176,33,0,20,0,176,34,0,106,2,49,0,20,1,
|
|
176,35,0,100,20,1,36,149,0,100,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CLEANUPDATA )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
36,153,0,176,33,0,20,0,36,154,0,176,27,0,
|
|
106,14,101,109,112,108,111,121,101,101,115,46,100,98,
|
|
102,0,20,1,36,155,0,176,27,0,106,11,111,114,
|
|
100,101,114,115,46,100,98,102,0,20,1,36,157,0,
|
|
100,110,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE01_SECONDHIGHESTSALARY )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,168,0,176,33,0,20,0,
|
|
36,169,0,113,191,0,0,36,173,0,176,36,0,106,
|
|
103,83,69,76,69,67,84,32,77,65,88,40,115,97,
|
|
108,97,114,121,41,32,65,83,32,115,101,99,111,110,
|
|
100,95,104,105,103,104,101,115,116,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,60,32,40,83,
|
|
69,76,69,67,84,32,77,65,88,40,115,97,108,97,
|
|
114,121,41,32,70,82,79,77,32,101,109,112,108,111,
|
|
121,101,101,115,41,0,12,1,80,1,36,176,0,176,
|
|
22,0,106,32,49,46,32,83,101,99,111,110,100,32,
|
|
72,105,103,104,101,115,116,32,83,97,108,97,114,121,
|
|
32,61,32,56,48,48,48,0,176,23,0,95,1,12,
|
|
1,122,8,21,28,16,73,176,26,0,95,1,122,122,
|
|
12,3,93,64,31,8,20,2,114,65,0,0,36,177,
|
|
0,115,73,36,178,0,104,3,0,170,104,2,0,170,
|
|
176,1,0,106,38,32,32,70,65,73,76,58,32,49,
|
|
46,32,83,101,99,111,110,100,32,72,105,103,104,101,
|
|
115,116,32,40,101,120,99,101,112,116,105,111,110,41,
|
|
0,20,1,36,181,0,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE02_NTHHIGHESTPERDEPT )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,192,0,176,33,0,20,0,
|
|
36,193,0,113,20,1,0,36,199,0,176,36,0,106,
|
|
205,87,73,84,72,32,114,97,110,107,101,100,32,65,
|
|
83,32,40,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,68,69,78,83,69,95,82,65,78,75,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,114,110,107,32,70,82,
|
|
79,77,32,101,109,112,108,111,121,101,101,115,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,107,32,60,61,32,50,32,79,82,68,
|
|
69,82,32,66,89,32,100,101,112,116,44,32,115,97,
|
|
108,97,114,121,32,68,69,83,67,0,12,1,80,1,
|
|
36,204,0,176,22,0,106,31,50,46,32,84,111,112,
|
|
32,50,32,112,101,114,32,100,101,112,116,32,40,68,
|
|
69,78,83,69,95,82,65,78,75,41,0,176,23,0,
|
|
95,1,12,1,92,8,16,20,2,114,65,0,0,36,
|
|
205,0,115,73,36,206,0,104,3,0,170,104,2,0,
|
|
170,176,1,0,106,38,32,32,70,65,73,76,58,32,
|
|
50,46,32,84,111,112,32,50,32,112,101,114,32,100,
|
|
101,112,116,32,40,101,120,99,101,112,116,105,111,110,
|
|
41,0,20,1,36,209,0,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE03_CONSECUTIVENUMBERS )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,220,0,176,33,0,20,0,
|
|
36,221,0,113,225,0,0,36,226,0,176,36,0,106,
|
|
144,83,69,76,69,67,84,32,68,73,83,84,73,78,
|
|
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,115,97,108,97,114,121,32,73,78,32,40,
|
|
32,32,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,71,82,79,85,80,32,66,89,32,115,97,
|
|
108,97,114,121,32,72,65,86,73,78,71,32,67,79,
|
|
85,78,84,40,42,41,32,62,32,49,41,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,228,0,176,22,
|
|
0,106,41,51,46,32,68,117,112,108,105,99,97,116,
|
|
101,32,115,97,108,97,114,105,101,115,58,32,52,32,
|
|
100,105,115,116,105,110,99,116,32,118,97,108,117,101,
|
|
115,0,176,23,0,95,1,12,1,92,4,8,20,2,
|
|
114,69,0,0,36,229,0,115,73,36,230,0,104,3,
|
|
0,170,104,2,0,170,176,1,0,106,42,32,32,70,
|
|
65,73,76,58,32,51,46,32,68,117,112,108,105,99,
|
|
97,116,101,32,115,97,108,97,114,105,101,115,32,40,
|
|
101,120,99,101,112,116,105,111,110,41,0,20,1,36,
|
|
233,0,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE04_DEPTVSCOMPANYAVG )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,244,0,176,33,0,20,0,
|
|
36,245,0,113,143,1,0,36,253,0,176,36,0,105,
|
|
70,1,87,73,84,72,32,100,101,112,116,95,97,118,
|
|
103,32,65,83,32,40,32,32,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,100,101,112,116,95,115,
|
|
97,108,97,114,121,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,44,32,99,111,109,112,97,
|
|
110,121,32,65,83,32,40,32,32,83,69,76,69,67,
|
|
84,32,65,86,71,40,115,97,108,97,114,121,41,32,
|
|
65,83,32,99,111,109,112,97,110,121,95,115,97,108,
|
|
97,114,121,32,70,82,79,77,32,101,109,112,108,111,
|
|
121,101,101,115,41,32,83,69,76,69,67,84,32,100,
|
|
46,100,101,112,116,44,32,100,46,100,101,112,116,95,
|
|
115,97,108,97,114,121,44,32,67,65,83,69,32,87,
|
|
72,69,78,32,100,46,100,101,112,116,95,115,97,108,
|
|
97,114,121,32,62,32,99,46,99,111,109,112,97,110,
|
|
121,95,115,97,108,97,114,121,32,84,72,69,78,32,
|
|
39,65,98,111,118,101,39,32,69,76,83,69,32,39,
|
|
66,101,108,111,119,39,32,69,78,68,32,65,83,32,
|
|
118,115,95,97,118,103,32,70,82,79,77,32,100,101,
|
|
112,116,95,97,118,103,32,100,44,32,99,111,109,112,
|
|
97,110,121,32,99,32,79,82,68,69,82,32,66,89,
|
|
32,100,46,100,101,112,116,95,115,97,108,97,114,121,
|
|
32,68,69,83,67,0,12,1,80,1,36,255,0,176,
|
|
22,0,106,32,52,46,32,68,101,112,116,32,118,115,
|
|
32,67,111,109,112,97,110,121,32,97,118,103,58,32,
|
|
52,32,100,101,112,116,115,0,176,23,0,95,1,12,
|
|
1,92,4,8,20,2,114,70,0,0,36,0,1,115,
|
|
73,36,1,1,104,3,0,170,104,2,0,170,176,1,
|
|
0,106,43,32,32,70,65,73,76,58,32,52,46,32,
|
|
68,101,112,116,32,118,115,32,67,111,109,112,97,110,
|
|
121,32,97,118,103,32,40,101,120,99,101,112,116,105,
|
|
111,110,41,0,20,1,36,4,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE05_EMPLOYEEMANAGERSALARY )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,15,1,176,33,0,20,0,
|
|
36,16,1,113,240,0,0,36,21,1,176,36,0,106,
|
|
172,83,69,76,69,67,84,32,101,46,110,97,109,101,
|
|
32,65,83,32,101,109,112,108,111,121,101,101,44,32,
|
|
109,46,110,97,109,101,32,65,83,32,109,97,110,97,
|
|
103,101,114,44,32,101,46,115,97,108,97,114,121,32,
|
|
65,83,32,101,109,112,95,115,97,108,97,114,121,44,
|
|
32,109,46,115,97,108,97,114,121,32,65,83,32,109,
|
|
103,114,95,115,97,108,97,114,121,32,70,82,79,77,
|
|
32,101,109,112,108,111,121,101,101,115,32,101,32,74,
|
|
79,73,78,32,101,109,112,108,111,121,101,101,115,32,
|
|
109,32,79,78,32,101,46,109,103,114,95,105,100,32,
|
|
61,32,109,46,105,100,32,87,72,69,82,69,32,101,
|
|
46,115,97,108,97,114,121,32,62,32,109,46,115,97,
|
|
108,97,114,121,0,12,1,80,1,36,23,1,176,22,
|
|
0,106,29,53,46,32,69,109,112,108,111,121,101,101,
|
|
32,62,32,77,97,110,97,103,101,114,32,115,97,108,
|
|
97,114,121,0,176,23,0,95,1,12,1,122,16,20,
|
|
2,114,69,0,0,36,24,1,115,73,36,25,1,104,
|
|
3,0,170,104,2,0,170,176,1,0,106,42,32,32,
|
|
70,65,73,76,58,32,53,46,32,69,109,112,108,111,
|
|
121,101,101,32,62,32,77,97,110,97,103,101,114,32,
|
|
40,101,120,99,101,112,116,105,111,110,41,0,20,1,
|
|
36,28,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE06_CUMULATIVESUM )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,39,1,176,33,0,20,0,
|
|
36,40,1,113,206,0,0,36,44,1,176,36,0,106,
|
|
134,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,
|
|
32,79,82,68,69,82,32,66,89,32,100,101,112,116,
|
|
44,32,115,97,108,97,114,121,0,12,1,80,1,36,
|
|
45,1,176,22,0,106,32,54,46,32,82,117,110,110,
|
|
105,110,103,32,83,85,77,32,98,121,32,100,101,112,
|
|
116,58,32,49,50,32,114,111,119,115,0,176,23,0,
|
|
95,1,12,1,92,12,8,20,2,114,62,0,0,36,
|
|
46,1,115,73,36,47,1,104,3,0,170,104,2,0,
|
|
170,176,1,0,106,35,32,32,70,65,73,76,58,32,
|
|
54,46,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,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE07_GAPANALYSIS )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,61,1,176,33,0,20,0,
|
|
36,62,1,113,217,0,0,36,68,1,176,36,0,106,
|
|
142,83,69,76,69,67,84,32,68,73,83,84,73,78,
|
|
67,84,32,101,46,100,101,112,116,32,70,82,79,77,
|
|
32,101,109,112,108,111,121,101,101,115,32,101,32,87,
|
|
72,69,82,69,32,101,46,100,101,112,116,32,78,79,
|
|
84,32,73,78,32,40,32,32,83,69,76,69,67,84,
|
|
32,68,73,83,84,73,78,67,84,32,101,50,46,100,
|
|
101,112,116,32,70,82,79,77,32,101,109,112,108,111,
|
|
121,101,101,115,32,101,50,32,32,32,74,79,73,78,
|
|
32,111,114,100,101,114,115,32,111,32,79,78,32,101,
|
|
50,46,105,100,32,61,32,111,46,101,109,112,95,105,
|
|
100,41,0,12,1,80,1,36,70,1,176,22,0,106,
|
|
36,55,46,32,68,101,112,116,115,32,119,105,116,104,
|
|
111,117,116,32,111,114,100,101,114,115,32,40,97,110,
|
|
116,105,45,106,111,105,110,41,0,176,23,0,95,1,
|
|
12,1,121,16,20,2,114,63,0,0,36,71,1,115,
|
|
73,36,72,1,104,3,0,170,104,2,0,170,176,1,
|
|
0,106,36,32,32,70,65,73,76,58,32,55,46,32,
|
|
71,97,112,32,97,110,97,108,121,115,105,115,32,40,
|
|
101,120,99,101,112,116,105,111,110,41,0,20,1,36,
|
|
75,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE08_PIVOTSIMULATION )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,86,1,176,33,0,20,0,
|
|
36,87,1,113,132,1,0,36,94,1,176,36,0,106,
|
|
241,83,69,76,69,67,84,32,83,85,77,40,67,65,
|
|
83,69,32,87,72,69,78,32,100,101,112,116,32,61,
|
|
32,39,69,110,103,39,32,84,72,69,78,32,49,32,
|
|
69,76,83,69,32,48,32,69,78,68,41,32,65,83,
|
|
32,101,110,103,44,32,83,85,77,40,67,65,83,69,
|
|
32,87,72,69,78,32,100,101,112,116,32,61,32,39,
|
|
83,97,108,101,115,39,32,84,72,69,78,32,49,32,
|
|
69,76,83,69,32,48,32,69,78,68,41,32,65,83,
|
|
32,115,97,108,101,115,44,32,83,85,77,40,67,65,
|
|
83,69,32,87,72,69,78,32,100,101,112,116,32,61,
|
|
32,39,77,107,116,103,39,32,84,72,69,78,32,49,
|
|
32,69,76,83,69,32,48,32,69,78,68,41,32,65,
|
|
83,32,109,107,116,103,44,32,83,85,77,40,67,65,
|
|
83,69,32,87,72,69,78,32,100,101,112,116,32,61,
|
|
32,39,72,82,39,32,84,72,69,78,32,49,32,69,
|
|
76,83,69,32,48,32,69,78,68,41,32,65,83,32,
|
|
104,114,32,70,82,79,77,32,101,109,112,108,111,121,
|
|
101,101,115,0,12,1,80,1,36,99,1,176,22,0,
|
|
106,41,56,46,32,80,105,118,111,116,32,67,65,83,
|
|
69,58,32,69,110,103,61,53,32,83,97,108,101,115,
|
|
61,51,32,77,107,116,103,61,50,32,72,82,61,50,
|
|
0,176,23,0,95,1,12,1,122,8,21,28,66,73,
|
|
176,26,0,95,1,122,122,12,3,92,5,8,21,28,
|
|
50,73,176,26,0,95,1,122,92,2,12,3,92,3,
|
|
8,21,28,33,73,176,26,0,95,1,122,92,3,12,
|
|
3,92,2,8,21,28,16,73,176,26,0,95,1,122,
|
|
92,4,12,3,92,2,8,20,2,114,61,0,0,36,
|
|
100,1,115,73,36,101,1,104,3,0,170,104,2,0,
|
|
170,176,1,0,106,34,32,32,70,65,73,76,58,32,
|
|
56,46,32,80,105,118,111,116,32,67,65,83,69,32,
|
|
40,101,120,99,101,112,116,105,111,110,41,0,20,1,
|
|
36,104,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE09_SELFJOINHIERARCHY )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,115,1,176,33,0,20,0,
|
|
36,116,1,113,87,1,0,36,123,1,176,36,0,106,
|
|
241,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,109,
|
|
103,114,95,105,100,44,32,49,32,65,83,32,100,101,
|
|
112,116,104,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,101,46,109,
|
|
103,114,95,105,100,44,32,111,46,100,101,112,116,104,
|
|
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,100,101,112,116,
|
|
104,32,70,82,79,77,32,111,114,103,32,79,82,68,
|
|
69,82,32,66,89,32,100,101,112,116,104,44,32,110,
|
|
97,109,101,0,12,1,80,1,36,125,1,176,22,0,
|
|
106,46,57,46,32,79,114,103,32,104,105,101,114,97,
|
|
114,99,104,121,58,32,49,50,32,101,109,112,108,111,
|
|
121,101,101,115,44,32,100,101,112,116,104,32,49,32,
|
|
102,105,114,115,116,0,176,23,0,95,1,12,1,92,
|
|
12,8,21,28,15,73,176,26,0,95,1,122,92,2,
|
|
12,3,122,8,20,2,114,64,0,0,36,126,1,115,
|
|
73,36,127,1,104,3,0,170,104,2,0,170,176,1,
|
|
0,106,37,32,32,70,65,73,76,58,32,57,46,32,
|
|
79,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,130,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE10_TOPNPERGROUP )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,141,1,176,33,0,20,0,
|
|
36,142,1,113,7,1,0,36,148,1,176,36,0,106,
|
|
196,87,73,84,72,32,114,97,110,107,101,100,32,65,
|
|
83,32,40,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,114,110,32,70,82,79,
|
|
77,32,101,109,112,108,111,121,101,101,115,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,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,150,1,176,22,0,106,27,49,
|
|
48,46,32,84,111,112,32,49,32,112,101,114,32,100,
|
|
101,112,116,58,32,52,32,114,111,119,115,0,176,23,
|
|
0,95,1,12,1,92,4,8,20,2,114,67,0,0,
|
|
36,151,1,115,73,36,152,1,104,3,0,170,104,2,
|
|
0,170,176,1,0,106,40,32,32,70,65,73,76,58,
|
|
32,49,48,46,32,84,111,112,32,78,32,112,101,114,
|
|
32,103,114,111,117,112,32,40,101,120,99,101,112,116,
|
|
105,111,110,41,0,20,1,36,155,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE11_RUNNINGRANK )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,166,1,176,33,0,20,0,
|
|
36,167,1,113,32,1,0,36,175,1,176,36,0,106,
|
|
216,87,73,84,72,32,108,97,103,103,101,100,32,65,
|
|
83,32,40,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,32,70,82,79,77,32,
|
|
101,109,112,108,111,121,101,101,115,41,32,83,69,76,
|
|
69,67,84,32,110,97,109,101,44,32,115,97,108,97,
|
|
114,121,44,32,112,114,101,118,95,115,97,108,44,32,
|
|
115,97,108,97,114,121,32,45,32,67,79,65,76,69,
|
|
83,67,69,40,112,114,101,118,95,115,97,108,44,32,
|
|
115,97,108,97,114,121,41,32,65,83,32,100,105,102,
|
|
102,32,70,82,79,77,32,108,97,103,103,101,100,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,177,1,
|
|
176,22,0,106,32,49,49,46,32,76,65,71,32,43,
|
|
32,100,105,102,102,32,118,105,97,32,67,84,69,58,
|
|
32,49,50,32,114,111,119,115,0,176,23,0,95,1,
|
|
12,1,92,12,8,20,2,114,62,0,0,36,178,1,
|
|
115,73,36,179,1,104,3,0,170,104,2,0,170,176,
|
|
1,0,106,35,32,32,70,65,73,76,58,32,49,49,
|
|
46,32,76,65,71,32,43,32,100,105,102,102,32,40,
|
|
101,120,99,101,112,116,105,111,110,41,0,20,1,36,
|
|
182,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE12_YOYGROWTH )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,193,1,176,33,0,20,0,
|
|
36,194,1,113,176,1,0,36,204,1,176,36,0,105,
|
|
93,1,87,73,84,72,32,121,50,50,32,65,83,32,
|
|
40,32,32,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,87,72,69,82,69,
|
|
32,111,114,100,95,121,101,97,114,32,61,32,50,48,
|
|
50,50,32,71,82,79,85,80,32,66,89,32,101,109,
|
|
112,95,105,100,41,44,32,121,50,51,32,65,83,32,
|
|
40,32,32,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,87,72,69,82,69,
|
|
32,111,114,100,95,121,101,97,114,32,61,32,50,48,
|
|
50,51,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,121,50,50,46,116,111,116,
|
|
97,108,32,65,83,32,121,114,50,48,50,50,44,32,
|
|
121,50,51,46,116,111,116,97,108,32,65,83,32,121,
|
|
114,50,48,50,51,32,70,82,79,77,32,101,109,112,
|
|
108,111,121,101,101,115,32,101,32,74,79,73,78,32,
|
|
121,50,50,32,79,78,32,101,46,105,100,32,61,32,
|
|
121,50,50,46,101,109,112,95,105,100,32,74,79,73,
|
|
78,32,121,50,51,32,79,78,32,101,46,105,100,32,
|
|
61,32,121,50,51,46,101,109,112,95,105,100,32,79,
|
|
82,68,69,82,32,66,89,32,101,46,110,97,109,101,
|
|
0,12,1,80,1,36,205,1,176,22,0,106,42,49,
|
|
50,46,32,89,111,89,32,103,114,111,119,116,104,58,
|
|
32,101,109,112,108,111,121,101,101,115,32,119,105,116,
|
|
104,32,98,111,116,104,32,121,101,97,114,115,0,176,
|
|
23,0,95,1,12,1,92,5,16,20,2,114,62,0,
|
|
0,36,206,1,115,73,36,207,1,104,3,0,170,104,
|
|
2,0,170,176,1,0,106,35,32,32,70,65,73,76,
|
|
58,32,49,50,46,32,89,111,89,32,103,114,111,119,
|
|
116,104,32,40,101,120,99,101,112,116,105,111,110,41,
|
|
0,20,1,36,210,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE13_ISLANDGAP )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,221,1,176,33,0,20,0,
|
|
36,222,1,113,250,0,0,36,228,1,176,36,0,106,
|
|
155,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,118,97,108,44,32,48,32,65,83,32,112,114,
|
|
101,118,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,43,32,112,114,101,118,44,32,118,97,108,
|
|
32,70,82,79,77,32,102,105,98,32,87,72,69,82,
|
|
69,32,110,32,60,32,49,50,41,32,83,69,76,69,
|
|
67,84,32,110,44,32,118,97,108,32,70,82,79,77,
|
|
32,102,105,98,32,79,82,68,69,82,32,66,89,32,
|
|
110,0,12,1,80,1,36,231,1,176,22,0,106,36,
|
|
49,51,46,32,70,105,98,111,110,97,99,99,105,32,
|
|
49,50,32,116,101,114,109,115,58,32,102,105,98,40,
|
|
49,50,41,61,49,52,52,0,176,23,0,95,1,12,
|
|
1,92,12,8,21,28,18,73,176,26,0,95,1,92,
|
|
12,92,2,12,3,93,144,0,8,20,2,114,61,0,
|
|
0,36,232,1,115,73,36,233,1,104,3,0,170,104,
|
|
2,0,170,176,1,0,106,34,32,32,70,65,73,76,
|
|
58,32,49,51,46,32,70,105,98,111,110,97,99,99,
|
|
105,32,40,101,120,99,101,112,116,105,111,110,41,0,
|
|
20,1,36,236,1,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE14_MEDIANAPPROX )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,247,1,176,33,0,20,0,
|
|
36,248,1,113,245,0,0,36,0,2,176,36,0,106,
|
|
171,87,73,84,72,32,110,117,109,98,101,114,101,100,
|
|
32,65,83,32,40,83,69,76,69,67,84,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,41,32,
|
|
65,83,32,114,110,44,32,67,79,85,78,84,40,42,
|
|
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,41,32,83,69,76,69,67,84,32,
|
|
115,97,108,97,114,121,32,70,82,79,77,32,110,117,
|
|
109,98,101,114,101,100,32,87,72,69,82,69,32,114,
|
|
110,32,61,32,116,111,116,97,108,32,47,32,50,32,
|
|
43,32,49,0,12,1,80,1,36,2,2,176,22,0,
|
|
106,35,49,52,46,32,77,101,100,105,97,110,32,115,
|
|
97,108,97,114,121,32,40,112,111,115,105,116,105,111,
|
|
110,45,98,97,115,101,100,41,0,176,23,0,95,1,
|
|
12,1,122,16,20,2,114,65,0,0,36,3,2,115,
|
|
73,36,4,2,104,3,0,170,104,2,0,170,176,1,
|
|
0,106,38,32,32,70,65,73,76,58,32,49,52,46,
|
|
32,77,101,100,105,97,110,32,97,112,112,114,111,120,
|
|
32,40,101,120,99,101,112,116,105,111,110,41,0,20,
|
|
1,36,7,2,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_STATIC( CHALLENGE15_TRIPLENESTED )
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
13,1,0,116,37,0,36,18,2,176,33,0,20,0,
|
|
36,19,2,113,161,1,0,36,30,2,176,36,0,105,
|
|
73,1,87,73,84,72,32,111,114,100,101,114,95,115,
|
|
116,97,116,115,32,65,83,32,40,32,32,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,44,32,67,79,85,78,84,40,42,41,
|
|
32,65,83,32,99,110,116,32,32,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,101,46,
|
|
100,101,112,116,44,32,101,46,115,97,108,97,114,121,
|
|
44,32,115,46,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,115,46,116,111,116,97,108,32,68,
|
|
69,83,67,41,32,65,83,32,111,114,100,101,114,95,
|
|
114,97,110,107,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,115,116,97,116,115,32,115,32,79,
|
|
78,32,101,46,105,100,32,61,32,115,46,101,109,112,
|
|
95,105,100,32,87,72,69,82,69,32,101,46,115,97,
|
|
108,97,114,121,32,62,32,40,83,69,76,69,67,84,
|
|
32,65,86,71,40,115,97,108,97,114,121,41,32,70,
|
|
82,79,77,32,101,109,112,108,111,121,101,101,115,41,
|
|
32,79,82,68,69,82,32,66,89,32,115,46,116,111,
|
|
116,97,108,32,68,69,83,67,0,12,1,80,1,36,
|
|
32,2,176,22,0,106,48,49,53,46,32,67,84,69,
|
|
43,87,105,110,100,111,119,43,83,117,98,113,117,101,
|
|
114,121,43,74,79,73,78,58,32,99,111,109,112,108,
|
|
101,120,32,97,110,97,108,121,116,105,99,115,0,176,
|
|
23,0,95,1,12,1,122,16,20,2,114,65,0,0,
|
|
36,33,2,115,73,36,34,2,104,3,0,170,104,2,
|
|
0,170,176,1,0,106,38,32,32,70,65,73,76,58,
|
|
32,49,53,46,32,84,114,105,112,108,101,32,110,101,
|
|
115,116,101,100,32,40,101,120,99,101,112,116,105,111,
|
|
110,41,0,20,1,36,37,2,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|
|
HB_FUNC_INITSTATICS()
|
|
{
|
|
static const HB_BYTE pcode[] =
|
|
{
|
|
117,37,0,3,0,116,37,0,121,82,1,0,121,82,
|
|
2,0,121,82,3,0,7
|
|
};
|
|
|
|
hb_vmExecute( pcode, symbols );
|
|
}
|
|
|