home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 2 / crawlyvol2.bin / games / wcoltris / source / coltris.rsh < prev    next >
Text File  |  1994-12-27  |  26KB  |  607 lines
  1. /* GEM Resource C Source */
  2.  
  3. #include <portab.h>
  4. #include <aes.h>
  5. #include "COLTRIS.H"
  6.  
  7. #if !defined(WHITEBAK)
  8. #define WHITEBAK    0x0040
  9. #endif
  10. #if !defined(DRAW3D)
  11. #define DRAW3D      0x0080
  12. #endif
  13.  
  14. #define FLAGS9  0x0200
  15. #define FLAGS10 0x0400
  16. #define FLAGS11 0x0800
  17. #define FLAGS12 0x1000
  18. #define FLAGS13 0x2000
  19. #define FLAGS14 0x4000
  20. #define FLAGS15 0x8000
  21. #define STATE8  0x0100
  22. #define STATE9  0x0200
  23. #define STATE10 0x0400
  24. #define STATE11 0x0800
  25. #define STATE12 0x1000
  26. #define STATE13 0x2000
  27. #define STATE14 0x4000
  28. #define STATE15 0x8000
  29.  
  30. static TEDINFO rs_tedinfo[] =
  31. { "  ",
  32.   "\0",
  33.   "\0",
  34.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 3, 1,
  35.   "      ",
  36.   "\0",
  37.   "\0",
  38.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 7, 1,
  39.   "      ",
  40.   "\0",
  41.   "\0",
  42.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 7, 1,
  43.   "      ",
  44.   "\0",
  45.   "\0",
  46.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 7, 1,
  47.   "  0 ",
  48.   "\0",
  49.   "\0",
  50.   IBM  , 0, TE_LEFT , 0x1180, 0, -1, 5, 1,
  51.   "  0 ",
  52.   "\0",
  53.   "\0",
  54.   IBM  , 0, TE_LEFT , 0x1180, 0, -1, 5, 1,
  55.   "  0 ",
  56.   "\0",
  57.   "\0",
  58.   IBM  , 0, TE_LEFT , 0x1180, 0, -1, 5, 1,
  59.   "  0 ",
  60.   "\0",
  61.   "\0",
  62.   IBM  , 0, TE_LEFT , 0x1180, 0, -1, 5, 1,
  63.   "  0 ",
  64.   "\0",
  65.   "\0",
  66.   IBM  , 0, TE_LEFT , 0x1180, 0, -1, 5, 1,
  67.   "  0 ",
  68.   "\0",
  69.   "\0",
  70.   IBM  , 0, TE_LEFT , 0x1180, 0, -1, 5, 1,
  71.   "  0 ",
  72.   "\0",
  73.   "\0",
  74.   IBM  , 0, TE_LEFT , 0x1180, 0, -1, 5, 1,
  75.   "  0 ",
  76.   "\0",
  77.   "\0",
  78.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 5, 1,
  79.   "  0 ",
  80.   "\0",
  81.   "\0",
  82.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 5, 1,
  83.   "  0 ",
  84.   "\0",
  85.   "\0",
  86.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 5, 1,
  87.   "  0 ",
  88.   "\0",
  89.   "\0",
  90.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 5, 1,
  91.   "  0 ",
  92.   "\0",
  93.   "\0",
  94.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 5, 1,
  95.   "  0 ",
  96.   "\0",
  97.   "\0",
  98.   IBM  , 0, TE_LEFT , 0x1180, 0, 0, 5, 1,
  99.   "____________",
  100.   "____________",
  101.   "XXXXXXXXXXXX",
  102.   IBM  , 0, TE_CNTR , 0x1180, 0, -1, 13, 13,
  103.   "(for Columns and Stetris)",
  104.   "\0",
  105.   "\0",
  106.   SMALL, 0, TE_LEFT , 0x1180, 0, -1, 26, 1,
  107.   "click anywhere!",
  108.   "\0",
  109.   "\0",
  110.   SMALL, 0, TE_CNTR , 0x1100, 0, -1, 16, 1
  111. };
  112.  
  113. static OBJECT rs_object[] =
  114. { 
  115.   /******** Tree 0 MENUE ****************************************************/
  116.         -1,        1,        6, G_IBOX    ,   /* Object 0  */
  117.   NONE, NORMAL, (LONG)0x00000000L,
  118.   0x0000, 0x0000, 0x0050, 0x0019,
  119.          6,        2,        2, G_BOX     ,   /* Object 1  */
  120.   NONE, NORMAL, (LONG)0x00001100L,
  121.   0x0000, 0x0000, 0x0050, 0x0201,
  122.          1,        3,        5, G_IBOX    ,   /* Object 2  */
  123.   NONE, NORMAL, (LONG)0x00000000L,
  124.   0x0002, 0x0000, 0x001B, 0x0301,
  125.   MT_FILE ,       -1,       -1, G_TITLE   ,   /* Object 3  */
  126.   NONE, NORMAL, (LONG)" WinColTris",
  127.   0x0000, 0x0000, 0x000C, 0x0301,
  128.          5,       -1,       -1, G_TITLE   ,   /* Object 4 MT_FILE */
  129.   NONE, NORMAL, (LONG)" File",
  130.   0x000C, 0x0000, 0x0006, 0x0301,
  131.          2,       -1,       -1, G_TITLE   ,   /* Object 5  */
  132.   NONE, NORMAL, (LONG)" Options",
  133.   0x0012, 0x0000, 0x0009, 0x0301,
  134.          0,        7,       23, G_IBOX    ,   /* Object 6  */
  135.   NONE, NORMAL, (LONG)0x00000000L,
  136.   0x0000, 0x0301, 0x0050, 0x0017,
  137.         16, M_INFO  ,       15, G_BOX     ,   /* Object 7  */
  138.   NONE, NORMAL, (LONG)0x00FF1100L,
  139.   0x0002, 0x0000, 0x0013, 0x0008,
  140.          9,       -1,       -1, G_STRING  ,   /* Object 8 M_INFO */
  141.   NONE, NORMAL, (LONG)"  about WinColTris ",
  142.   0x0000, 0x0000, 0x0013, 0x0001,
  143.         10,       -1,       -1, G_STRING  ,   /* Object 9  */
  144.   NONE, DISABLED, (LONG)"-------------------",
  145.   0x0000, 0x0001, 0x0013, 0x0001,
  146.         11,       -1,       -1, G_STRING  ,   /* Object 10  */
  147.   NONE, NORMAL, (LONG)"  Desk Accessory 1 ",
  148.   0x0000, 0x0002, 0x0013, 0x0001,
  149.         12,       -1,       -1, G_STRING  ,   /* Object 11  */
  150.   NONE, NORMAL, (LONG)"  Desk Accessory 2 ",
  151.   0x0000, 0x0003, 0x0013, 0x0001,
  152.         13,       -1,       -1, G_STRING  ,   /* Object 12  */
  153.   NONE, NORMAL, (LONG)"  Desk Accessory 3 ",
  154.   0x0000, 0x0004, 0x0013, 0x0001,
  155.         14,       -1,       -1, G_STRING  ,   /* Object 13  */
  156.   NONE, NORMAL, (LONG)"  Desk Accessory 4 ",
  157.   0x0000, 0x0005, 0x0013, 0x0001,
  158.         15,       -1,       -1, G_STRING  ,   /* Object 14  */
  159.   NONE, NORMAL, (LONG)"  Desk Accessory 5 ",
  160.   0x0000, 0x0006, 0x0013, 0x0001,
  161.          7,       -1,       -1, G_STRING  ,   /* Object 15  */
  162.   NONE, NORMAL, (LONG)"  Desk Accessory 6 ",
  163.   0x0000, 0x0007, 0x0013, 0x0001,
  164.         23, M_START , M_QUIT  , G_BOX     ,   /* Object 16  */
  165.   NONE, NORMAL, (LONG)0x00FF1100L,
  166.   0x000E, 0x0000, 0x000E, 0x0006,
  167.         18,       -1,       -1, G_STRING  ,   /* Object 17 M_START */
  168.   NONE, NORMAL, (LONG)"  Play     ^R ",
  169.   0x0000, 0x0000, 0x000E, 0x0001,
  170.   M_HISCORE,       -1,       -1, G_STRING  ,   /* Object 18  */
  171.   NONE, DISABLED, (LONG)"--------------",
  172.   0x0000, 0x0001, 0x000E, 0x0001,
  173.   M_SAVE  ,       -1,       -1, G_STRING  ,   /* Object 19 M_HISCORE */
  174.   NONE, NORMAL, (LONG)"  Hiscore  ^H ",
  175.   0x0000, 0x0002, 0x000E, 0x0001,
  176.         21,       -1,       -1, G_STRING  ,   /* Object 20 M_SAVE */
  177.   NONE, NORMAL, (LONG)"  Save     ^S ",
  178.   0x0000, 0x0003, 0x000E, 0x0001,
  179.   M_QUIT  ,       -1,       -1, G_STRING  ,   /* Object 21  */
  180.   NONE, DISABLED, (LONG)"--------------",
  181.   0x0000, 0x0004, 0x000E, 0x0001,
  182.         16,       -1,       -1, G_STRING  ,   /* Object 22 M_QUIT */
  183.   NONE, NORMAL, (LONG)"  Quit     ^Q ",
  184.   0x0000, 0x0005, 0x000E, 0x0001,
  185.          6, M_TETRIS, M_OPTS  , G_BOX     ,   /* Object 23  */
  186.   NONE, NORMAL, (LONG)0x00FF1000L,
  187.   0x0014, 0x0000, 0x0010, 0x0008,
  188.   M_COLUMNS,       -1,       -1, G_STRING  ,   /* Object 24 M_TETRIS */
  189.   NONE, NORMAL, (LONG)"  Tetris     ^T ",
  190.   0x0000, 0x0000, 0x0010, 0x0001,
  191.         26,       -1,       -1, G_STRING  ,   /* Object 25 M_COLUMNS */
  192.   NONE, NORMAL, (LONG)"  Columns    ^C ",
  193.   0x0000, 0x0001, 0x0010, 0x0001,
  194.   M_SCORE ,       -1,       -1, G_STRING  ,   /* Object 26  */
  195.   NONE, DISABLED, (LONG)"----------------",
  196.   0x0000, 0x0002, 0x0010, 0x0001,
  197.   M_PREVIEW,       -1,       -1, G_STRING  ,   /* Object 27 M_SCORE */
  198.   NONE, NORMAL, (LONG)"  Score      ^I ",
  199.   0x0000, 0x0003, 0x0010, 0x0001,
  200.   M_STATISTIC,       -1,       -1, G_STRING  ,   /* Object 28 M_PREVIEW */
  201.   NONE, NORMAL, (LONG)"  Preview    ^N ",
  202.   0x0000, 0x0004, 0x0010, 0x0001,
  203.         30,       -1,       -1, G_STRING  ,   /* Object 29 M_STATISTIC */
  204.   NONE, NORMAL, (LONG)"  Statistic  ^B ",
  205.   0x0000, 0x0005, 0x0010, 0x0001,
  206.   M_OPTS  ,       -1,       -1, G_STRING  ,   /* Object 30  */
  207.   NONE, DISABLED, (LONG)"----------------",
  208.   0x0000, 0x0006, 0x0010, 0x0001,
  209.         23,       -1,       -1, G_STRING  ,   /* Object 31 M_OPTS */
  210.   LASTOB, NORMAL, (LONG)"  Options... ^O ",
  211.   0x0000, 0x0007, 0x0010, 0x0001,
  212.   
  213.   /******** Tree 1 XSCORE ****************************************************/
  214.         -1,        1, SCORE   , G_BOX     ,   /* Object 0  */
  215.   NONE, NORMAL, (LONG)0x00001100L,
  216.   0x0000, 0x0000, 0x0014, 0x0007,
  217.   LEVEL   ,       -1,       -1, G_STRING  ,   /* Object 1  */
  218.   SELECTABLE, NORMAL, (LONG)"Level   :",
  219.   0x0002, 0x0001, 0x0009, 0x0001,
  220.          3,       -1,       -1, G_TEXT    ,   /* Object 2 LEVEL */
  221.   NONE, NORMAL, (LONG)&rs_tedinfo[0],
  222.   0x0011, 0x0001, 0x0002, 0x0001,
  223.   STONES  ,       -1,       -1, G_STRING  ,   /* Object 3  */
  224.   SELECTABLE, NORMAL, (LONG)"Stones  :",
  225.   0x0002, 0x0002, 0x0009, 0x0002,
  226.          5,       -1,       -1, G_TEXT    ,   /* Object 4 STONES */
  227.   NONE, NORMAL, (LONG)&rs_tedinfo[1],
  228.   0x000D, 0x0002, 0x0006, 0x0002,
  229.   LINES   ,       -1,       -1, G_STRING  ,   /* Object 5  */
  230.   SELECTABLE, NORMAL, (LONG)"Lines   :",
  231.   0x0002, 0x0004, 0x0009, 0x0001,
  232.          7,       -1,       -1, G_TEXT    ,   /* Object 6 LINES */
  233.   NONE, NORMAL, (LONG)&rs_tedinfo[2],
  234.   0x000D, 0x0004, 0x0006, 0x0001,
  235.   SCORE   ,       -1,       -1, G_STRING  ,   /* Object 7  */
  236.   SELECTABLE, NORMAL, (LONG)"Score   :",
  237.   0x0002, 0x0005, 0x0009, 0x0002,
  238.          0,       -1,       -1, G_TEXT    ,   /* Object 8 SCORE */
  239.   LASTOB, NORMAL, (LONG)&rs_tedinfo[3],
  240.   0x000D, 0x0005, 0x0006, 0x0002,
  241.   
  242.   /******** Tree 2 STATISTIC ****************************************************/
  243.         -1, TSTAT   , C_STAT  , G_BOX     ,   /* Object 0  */
  244.   NONE, NORMAL, (LONG)0x00001100L,
  245.   0x0000, 0x0000, 0x000A, 0x000A,
  246.   C_STAT  , TSTAT0  ,        8, G_BOX     ,   /* Object 1 TSTAT */
  247.   NONE, NORMAL, (LONG)0x00001181L,
  248.   0x0000, 0x0000, 0x000A, 0x000A,
  249.          3,       -1,       -1, G_TEXT    ,   /* Object 2 TSTAT0 */
  250.   NONE, NORMAL, (LONG)&rs_tedinfo[4],
  251.   0x0005, 0x0001, 0x0004, 0x0002,
  252.          4,       -1,       -1, G_TEXT    ,   /* Object 3  */
  253.   NONE, NORMAL, (LONG)&rs_tedinfo[5],
  254.   0x0005, 0x0002, 0x0004, 0x0002,
  255.          5,       -1,       -1, G_TEXT    ,   /* Object 4  */
  256.   NONE, NORMAL, (LONG)&rs_tedinfo[6],
  257.   0x0005, 0x0003, 0x0004, 0x0002,
  258.          6,       -1,       -1, G_TEXT    ,   /* Object 5  */
  259.   NONE, NORMAL, (LONG)&rs_tedinfo[7],
  260.   0x0005, 0x0004, 0x0004, 0x0002,
  261.          7,       -1,       -1, G_TEXT    ,   /* Object 6  */
  262.   NONE, NORMAL, (LONG)&rs_tedinfo[8],
  263.   0x0005, 0x0005, 0x0004, 0x0002,
  264.          8,       -1,       -1, G_TEXT    ,   /* Object 7  */
  265.   NONE, NORMAL, (LONG)&rs_tedinfo[9],
  266.   0x0005, 0x0006, 0x0004, 0x0002,
  267.   TSTAT   ,       -1,       -1, G_TEXT    ,   /* Object 8  */
  268.   NONE, NORMAL, (LONG)&rs_tedinfo[10],
  269.   0x0005, 0x0007, 0x0004, 0x0002,
  270.          0, CSTAT0  ,       15, G_BOX     ,   /* Object 9 C_STAT */
  271.   NONE, NORMAL, (LONG)0x00001101L,
  272.   0x0000, 0x0000, 0x000A, 0x000A,
  273.         11,       -1,       -1, G_TEXT    ,   /* Object 10 CSTAT0 */
  274.   NONE, NORMAL, (LONG)&rs_tedinfo[11],
  275.   0x0005, 0x0001, 0x0004, 0x0001,
  276.         12,       -1,       -1, G_TEXT    ,   /* Object 11  */
  277.   NONE, NORMAL, (LONG)&rs_tedinfo[12],
  278.   0x0005, 0x0002, 0x0004, 0x0002,
  279.         13,       -1,       -1, G_TEXT    ,   /* Object 12  */
  280.   NONE, NORMAL, (LONG)&rs_tedinfo[13],
  281.   0x0005, 0x0004, 0x0004, 0x0001,
  282.         14,       -1,       -1, G_TEXT    ,   /* Object 13  */
  283.   NONE, NORMAL, (LONG)&rs_tedinfo[14],
  284.   0x0005, 0x0005, 0x0004, 0x0002,
  285.         15,       -1,       -1, G_TEXT    ,   /* Object 14  */
  286.   NONE, NORMAL, (LONG)&rs_tedinfo[15],
  287.   0x0005, 0x0007, 0x0004, 0x0001,
  288.   C_STAT  ,       -1,       -1, G_TEXT    ,   /* Object 15  */
  289.   LASTOB, NORMAL, (LONG)&rs_tedinfo[16],
  290.   0x0005, 0x0008, 0x0004, 0x0002,
  291.   
  292.   /******** Tree 3 OPTSBOX ****************************************************/
  293.         -1,        1, OK      , G_BOX     ,   /* Object 0  */
  294.   NONE, OUTLINED, (LONG)0x00021100L,
  295.   0x0000, 0x0000, 0x003E, 0x000F,
  296.   O_TETRIS,       -1,       -1, G_BUTTON  ,   /* Object 1  */
  297.   NONE, OUTLINED|SHADOWED, (LONG)"ColTris Options",
  298.   0x0002, 0x0001, 0x0023, 0x0001,
  299.   O_COLUMNS,       -1,       -1, G_BUTTON  ,   /* Object 2 O_TETRIS */
  300.   NONE, NORMAL, (LONG)"Tetris",
  301.   0x0027, 0x0001, 0x000A, 0x0001,
  302.          4,       -1,       -1, G_BUTTON  ,   /* Object 3 O_COLUMNS */
  303.   NONE, NORMAL, (LONG)"Columns",
  304.   0x0032, 0x0001, 0x000A, 0x0001,
  305.         15, LEVEL0  , LEVEL9  , G_STRING  ,   /* Object 4  */
  306.   NONE, NORMAL, (LONG)"Level  :",
  307.   0x0002, 0x0003, 0x003B, 0x0001,
  308.          6,       -1,       -1, G_BOXCHAR ,   /* Object 5 LEVEL0 */
  309.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'0' << 24)|0x00FF1100L,
  310.   0x0009, 0x0000, 0x0004, 0x0001,
  311.          7,       -1,       -1, G_BOXCHAR ,   /* Object 6  */
  312.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'1' << 24)|0x00FF1100L,
  313.   0x000E, 0x0000, 0x0004, 0x0001,
  314.          8,       -1,       -1, G_BOXCHAR ,   /* Object 7  */
  315.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'2' << 24)|0x00FF1100L,
  316.   0x0013, 0x0000, 0x0004, 0x0001,
  317.          9,       -1,       -1, G_BOXCHAR ,   /* Object 8  */
  318.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'3' << 24)|0x00FF1100L,
  319.   0x0018, 0x0000, 0x0004, 0x0001,
  320.         10,       -1,       -1, G_BOXCHAR ,   /* Object 9  */
  321.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'4' << 24)|0x00FF1100L,
  322.   0x001D, 0x0000, 0x0004, 0x0001,
  323.         11,       -1,       -1, G_BOXCHAR ,   /* Object 10  */
  324.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'5' << 24)|0x00FF1100L,
  325.   0x0022, 0x0000, 0x0004, 0x0001,
  326.         12,       -1,       -1, G_BOXCHAR ,   /* Object 11  */
  327.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'6' << 24)|0x00FF1100L,
  328.   0x0027, 0x0000, 0x0004, 0x0001,
  329.         13,       -1,       -1, G_BOXCHAR ,   /* Object 12  */
  330.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'7' << 24)|0x00FF1100L,
  331.   0x002C, 0x0000, 0x0004, 0x0001,
  332.   LEVEL9  ,       -1,       -1, G_BOXCHAR ,   /* Object 13  */
  333.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'8' << 24)|0x00FF1100L,
  334.   0x0031, 0x0000, 0x0004, 0x0001,
  335.          4,       -1,       -1, G_BOXCHAR ,   /* Object 14 LEVEL9 */
  336.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'9' << 24)|0x00FF1100L,
  337.   0x0036, 0x0000, 0x0004, 0x0001,
  338.         31, RANDOM0 , RANDOM14, G_STRING  ,   /* Object 15  */
  339.   NONE, NORMAL, (LONG)"Random :",
  340.   0x0002, 0x0005, 0x003B, 0x0001,
  341.         17,       -1,       -1, G_BOXCHAR ,   /* Object 16 RANDOM0 */
  342.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'0' << 24)|0x00FF1100L,
  343.   0x0009, 0x0000, 0x0002, 0x0001,
  344.         18,       -1,       -1, G_BOXCHAR ,   /* Object 17  */
  345.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'1' << 24)|0x00FF1100L,
  346.   0x000C, 0x0000, 0x0002, 0x0001,
  347.         19,       -1,       -1, G_BOXCHAR ,   /* Object 18  */
  348.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'2' << 24)|0x00FF1100L,
  349.   0x000F, 0x0000, 0x0002, 0x0001,
  350.         20,       -1,       -1, G_BOXCHAR ,   /* Object 19  */
  351.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'3' << 24)|0x00FF1100L,
  352.   0x0012, 0x0000, 0x0002, 0x0001,
  353.         21,       -1,       -1, G_BOXCHAR ,   /* Object 20  */
  354.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'4' << 24)|0x00FF1100L,
  355.   0x0015, 0x0000, 0x0002, 0x0001,
  356.         22,       -1,       -1, G_BOXCHAR ,   /* Object 21  */
  357.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'5' << 24)|0x00FF1100L,
  358.   0x0018, 0x0000, 0x0002, 0x0001,
  359.         23,       -1,       -1, G_BOXCHAR ,   /* Object 22  */
  360.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'6' << 24)|0x00FF1100L,
  361.   0x001B, 0x0000, 0x0002, 0x0001,
  362.         24,       -1,       -1, G_BOXCHAR ,   /* Object 23  */
  363.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'7' << 24)|0x00FF1100L,
  364.   0x001E, 0x0000, 0x0002, 0x0001,
  365.         25,       -1,       -1, G_BOXCHAR ,   /* Object 24  */
  366.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'8' << 24)|0x00FF1100L,
  367.   0x0021, 0x0000, 0x0002, 0x0001,
  368.         26,       -1,       -1, G_BOXCHAR ,   /* Object 25  */
  369.   SELECTABLE|RBUTTON, NORMAL, (LONG) ((LONG)'9' << 24)|0x00FF1100L,
  370.   0x0024, 0x0000, 0x0002, 0x0001,
  371.         27,       -1,       -1, G_BUTTON  ,   /* Object 26  */
  372.   SELECTABLE|RBUTTON, NORMAL, (LONG)"10",
  373.   0x0027, 0x0000, 0x0003, 0x0001,
  374.         28,       -1,       -1, G_BUTTON  ,   /* Object 27  */
  375.   SELECTABLE|RBUTTON, NORMAL, (LONG)"11",
  376.   0x002B, 0x0000, 0x0003, 0x0001,
  377.         29,       -1,       -1, G_BUTTON  ,   /* Object 28  */
  378.   SELECTABLE|RBUTTON, NORMAL, (LONG)"12",
  379.   0x002F, 0x0000, 0x0003, 0x0001,
  380.   RANDOM14,       -1,       -1, G_BUTTON  ,   /* Object 29  */
  381.   SELECTABLE|RBUTTON, NORMAL, (LONG)"13",
  382.   0x0033, 0x0000, 0x0003, 0x0001,
  383.         15,       -1,       -1, G_BUTTON  ,   /* Object 30 RANDOM14 */
  384.   SELECTABLE|RBUTTON, NORMAL, (LONG)"14",
  385.   0x0037, 0x0000, 0x0003, 0x0001,
  386.         34, GRAPH_ST, GRAPH_VDI, G_STRING  ,   /* Object 31  */
  387.   NONE, NORMAL, (LONG)"Graphic:",
  388.   0x0002, 0x0007, 0x0025, 0x0001,
  389.   GRAPH_VDI,       -1,       -1, G_BUTTON  ,   /* Object 32 GRAPH_ST */
  390.   SELECTABLE|RBUTTON, NORMAL, (LONG)"ST",
  391.   0x0009, 0x0000, 0x0009, 0x0001,
  392.         31,       -1,       -1, G_BUTTON  ,   /* Object 33 GRAPH_VDI */
  393.   SELECTABLE|RBUTTON, NORMAL, (LONG)"VDI",
  394.   0x0013, 0x0000, 0x0009, 0x0001,
  395.         37, SINGLE  , MULTI   , G_STRING  ,   /* Object 34  */
  396.   NONE, NORMAL, (LONG)"Mode   :",
  397.   0x0002, 0x0009, 0x0021, 0x0001,
  398.   MULTI   ,       -1,       -1, G_BUTTON  ,   /* Object 35 SINGLE */
  399.   SELECTABLE|RBUTTON, NORMAL, (LONG)"single",
  400.   0x0009, 0x0000, 0x0009, 0x0001,
  401.         34,       -1,       -1, G_BUTTON  ,   /* Object 36 MULTI */
  402.   SELECTABLE|RBUTTON, NORMAL, (LONG)"multi",
  403.   0x0013, 0x0000, 0x0009, 0x0001,
  404.   USER_KEY, CYCLENONE, CYCLEALL, G_STRING  ,   /* Object 37  */
  405.   NONE, NORMAL, (LONG)"AV/VA  :",
  406.   0x0002, 0x000B, 0x0026, 0x0001,
  407.   CYCLEPLAY,       -1,       -1, G_BUTTON  ,   /* Object 38 CYCLENONE */
  408.   SELECTABLE|RBUTTON, NORMAL, (LONG)"none",
  409.   0x0009, 0x0000, 0x0009, 0x0001,
  410.   CYCLEALL,       -1,       -1, G_BUTTON  ,   /* Object 39 CYCLEPLAY */
  411.   SELECTABLE|RBUTTON, NORMAL, (LONG)"play",
  412.   0x0013, 0x0000, 0x0009, 0x0001,
  413.         37,       -1,       -1, G_BUTTON  ,   /* Object 40 CYCLEALL */
  414.   SELECTABLE|RBUTTON, NORMAL, (LONG)"all",
  415.   0x001D, 0x0000, 0x0009, 0x0001,
  416.         42,       -1,       -1, G_BUTTON  ,   /* Object 41 USER_KEY */
  417.   SELECTABLE|EXIT, NORMAL, (LONG)"define user-keys",
  418.   0x002C, 0x000B, 0x0010, 0x0001,
  419.   ABBR    , TOP_ALL , TOP_ALL , G_STRING  ,   /* Object 42  */
  420.   NONE, NORMAL, (LONG)"Window :",
  421.   0x0002, 0x000D, 0x001C, 0x0001,
  422.         42,       -1,       -1, G_BUTTON  ,   /* Object 43 TOP_ALL */
  423.   SELECTABLE, NORMAL, (LONG)"top all",
  424.   0x0009, 0x0000, 0x0009, 0x0001,
  425.   OK      ,       -1,       -1, G_BUTTON  ,   /* Object 44 ABBR */
  426.   SELECTABLE|EXIT, NORMAL, (LONG)"Cancel",
  427.   0x0026, 0x000D, 0x000A, 0x0001,
  428.          0,       -1,       -1, G_BUTTON  ,   /* Object 45 OK */
  429.   SELECTABLE|DEFAULT|EXIT|LASTOB, NORMAL, (LONG)"Ok",
  430.   0x0032, 0x000D, 0x000A, 0x0001,
  431.   
  432.   /******** Tree 4 KEYS ****************************************************/
  433.         -1, KEYS_TXT, KEYS_TXT, G_BOX     ,   /* Object 0  */
  434.   NONE, OUTLINED, (LONG)0x00021100L,
  435.   0x0000, 0x0000, 0x000A, 0x0003,
  436.          0,       -1,       -1, G_STRING  ,   /* Object 1 KEYS_TXT */
  437.   LASTOB, NORMAL, (LONG)"Rotate",
  438.   0x0002, 0x0001, 0x0006, 0x0001,
  439.   
  440.   /******** Tree 5 HISCORE ****************************************************/
  441.         -1, HI_TITEL, HI_OK   , G_BOX     ,   /* Object 0  */
  442.   NONE, OUTLINED, (LONG)0x00021100L,
  443.   0x0000, 0x0000, 0x0025, 0x0010,
  444.   HI_MARKE,       -1,       -1, G_BUTTON  ,   /* Object 1 HI_TITEL */
  445.   NONE, OUTLINED|SHADOWED, (LONG)"\0",
  446.   0x0002, 0x0001, 0x0021, 0x0001,
  447.   HISCORE1,       -1,       -1, G_BOXCHAR ,   /* Object 2 HI_MARKE */
  448.   NONE, NORMAL, (LONG) ((LONG)'*' << 24)|0x00001100L,
  449.   0x0001, 0x0003, 0x0002, 0x0001,
  450.          4,       -1,       -1, G_STRING  ,   /* Object 3 HISCORE1 */
  451.   NONE, NORMAL, (LONG)"123456789012",
  452.   0x0003, 0x0003, 0x000C, 0x0001,
  453.          5,       -1,       -1, G_STRING  ,   /* Object 4  */
  454.   NONE, NORMAL, (LONG)"12.12.1994",
  455.   0x0011, 0x0003, 0x000A, 0x0001,
  456.          6,       -1,       -1, G_STRING  ,   /* Object 5  */
  457.   NONE, NORMAL, (LONG)"12345",
  458.   0x001D, 0x0003, 0x0005, 0x0001,
  459.          7,       -1,       -1, G_STRING  ,   /* Object 6  */
  460.   NONE, NORMAL, (LONG)"123456789012",
  461.   0x0003, 0x0004, 0x000C, 0x0001,
  462.          8,       -1,       -1, G_STRING  ,   /* Object 7  */
  463.   NONE, NORMAL, (LONG)"12.12.1994",
  464.   0x0011, 0x0004, 0x000A, 0x0001,
  465.          9,       -1,       -1, G_STRING  ,   /* Object 8  */
  466.   NONE, NORMAL, (LONG)"12345",
  467.   0x001D, 0x0004, 0x0005, 0x0001,
  468.         10,       -1,       -1, G_STRING  ,   /* Object 9  */
  469.   NONE, NORMAL, (LONG)"123456789012",
  470.   0x0003, 0x0005, 0x000C, 0x0001,
  471.         11,       -1,       -1, G_STRING  ,   /* Object 10  */
  472.   NONE, NORMAL, (LONG)"12.12.1994",
  473.   0x0011, 0x0005, 0x000A, 0x0001,
  474.         12,       -1,       -1, G_STRING  ,   /* Object 11  */
  475.   NONE, NORMAL, (LONG)"12345",
  476.   0x001D, 0x0005, 0x0005, 0x0001,
  477.         13,       -1,       -1, G_STRING  ,   /* Object 12  */
  478.   NONE, NORMAL, (LONG)"123456789012",
  479.   0x0003, 0x0006, 0x000C, 0x0001,
  480.         14,       -1,       -1, G_STRING  ,   /* Object 13  */
  481.   NONE, NORMAL, (LONG)"12.12.1994",
  482.   0x0011, 0x0006, 0x000A, 0x0001,
  483.         15,       -1,       -1, G_STRING  ,   /* Object 14  */
  484.   NONE, NORMAL, (LONG)"12345",
  485.   0x001D, 0x0006, 0x0005, 0x0001,
  486.         16,       -1,       -1, G_STRING  ,   /* Object 15  */
  487.   NONE, NORMAL, (LONG)"123456789012",
  488.   0x0003, 0x0007, 0x000C, 0x0001,
  489.         17,       -1,       -1, G_STRING  ,   /* Object 16  */
  490.   NONE, NORMAL, (LONG)"12.12.1994",
  491.   0x0011, 0x0007, 0x000A, 0x0001,
  492.         18,       -1,       -1, G_STRING  ,   /* Object 17  */
  493.   NONE, NORMAL, (LONG)"12345",
  494.   0x001D, 0x0007, 0x0005, 0x0001,
  495.         19,       -1,       -1, G_STRING  ,   /* Object 18  */
  496.   NONE, NORMAL, (LONG)"123456789012",
  497.   0x0003, 0x0008, 0x000C, 0x0001,
  498.         20,       -1,       -1, G_STRING  ,   /* Object 19  */
  499.   NONE, NORMAL, (LONG)"12.12.1994",
  500.   0x0011, 0x0008, 0x000A, 0x0001,
  501.         21,       -1,       -1, G_STRING  ,   /* Object 20  */
  502.   NONE, NORMAL, (LONG)"12345",
  503.   0x001D, 0x0008, 0x0005, 0x0001,
  504.         22,       -1,       -1, G_STRING  ,   /* Object 21  */
  505.   NONE, NORMAL, (LONG)"123456789012",
  506.   0x0003, 0x0009, 0x000C, 0x0001,
  507.         23,       -1,       -1, G_STRING  ,   /* Object 22  */
  508.   NONE, NORMAL, (LONG)"12.12.1994",
  509.   0x0011, 0x0009, 0x000A, 0x0001,
  510.         24,       -1,       -1, G_STRING  ,   /* Object 23  */
  511.   NONE, NORMAL, (LONG)"12345",
  512.   0x001D, 0x0009, 0x0005, 0x0001,
  513.         25,       -1,       -1, G_STRING  ,   /* Object 24  */
  514.   NONE, NORMAL, (LONG)"123456789012",
  515.   0x0003, 0x000A, 0x000C, 0x0001,
  516.         26,       -1,       -1, G_STRING  ,   /* Object 25  */
  517.   NONE, NORMAL, (LONG)"12.12.1994",
  518.   0x0011, 0x000A, 0x000A, 0x0001,
  519.         27,       -1,       -1, G_STRING  ,   /* Object 26  */
  520.   NONE, NORMAL, (LONG)"12345",
  521.   0x001D, 0x000A, 0x0005, 0x0001,
  522.         28,       -1,       -1, G_STRING  ,   /* Object 27  */
  523.   NONE, NORMAL, (LONG)"123456789012",
  524.   0x0003, 0x000B, 0x000C, 0x0001,
  525.         29,       -1,       -1, G_STRING  ,   /* Object 28  */
  526.   NONE, NORMAL, (LONG)"12.12.1994",
  527.   0x0011, 0x000B, 0x000A, 0x0001,
  528.   HISCOREN,       -1,       -1, G_STRING  ,   /* Object 29  */
  529.   NONE, NORMAL, (LONG)"12345",
  530.   0x001D, 0x000B, 0x0005, 0x0001,
  531.         31,       -1,       -1, G_STRING  ,   /* Object 30 HISCOREN */
  532.   NONE, NORMAL, (LONG)"123456789012",
  533.   0x0003, 0x000C, 0x000C, 0x0001,
  534.         32,       -1,       -1, G_STRING  ,   /* Object 31  */
  535.   NONE, NORMAL, (LONG)"12.12.1994",
  536.   0x0011, 0x000C, 0x000A, 0x0001,
  537.   CLR_HI  ,       -1,       -1, G_STRING  ,   /* Object 32  */
  538.   NONE, NORMAL, (LONG)"12345",
  539.   0x001D, 0x000C, 0x0005, 0x0001,
  540.   HI_OK   ,       -1,       -1, G_BUTTON  ,   /* Object 33 CLR_HI */
  541.   SELECTABLE|EXIT, NORMAL, (LONG)"Clear",
  542.   0x0002, 0x000E, 0x000A, 0x0001,
  543.          0,       -1,       -1, G_BUTTON  ,   /* Object 34 HI_OK */
  544.   SELECTABLE|DEFAULT|EXIT|LASTOB, NORMAL, (LONG)"Ok",
  545.   0x0019, 0x000E, 0x000A, 0x0001,
  546.   
  547.   /******** Tree 6 NEWHI ****************************************************/
  548.         -1, HI_NAME ,        2, G_BOX     ,   /* Object 0  */
  549.   NONE, OUTLINED, (LONG)0x00021100L,
  550.   0x0000, 0x0000, 0x000E, 0x0004,
  551.          2,       -1,       -1, G_FTEXT   ,   /* Object 1 HI_NAME */
  552.   SELECTABLE|DEFAULT|EXIT|EDITABLE, NORMAL, (LONG)&rs_tedinfo[17],
  553.   0x0001, 0x0002, 0x000C, 0x0001,
  554.          0,       -1,       -1, G_STRING  ,   /* Object 2  */
  555.   LASTOB, NORMAL, (LONG)"enter name",
  556.   0x0002, 0x0000, 0x000A, 0x0002,
  557.   
  558.   /******** Tree 7 INFOBOX ****************************************************/
  559.         -1,        1,       11, G_BOX     ,   /* Object 0  */
  560.   NONE, OUTLINED, (LONG)0x00021100L,
  561.   0x0000, 0x0000, 0x0030, 0x0010,
  562.          2,       -1,       -1, G_STRING  ,   /* Object 1  */
  563.   NONE, NORMAL, (LONG)"COLTRIS  V2.0  27.12.1994",
  564.   0x000C, 0x0001, 0x0019, 0x0001,
  565.          3,       -1,       -1, G_STRING  ,   /* Object 2  */
  566.   NONE, NORMAL, (LONG)"yet another COLUMNS and TETRIS version",
  567.   0x0005, 0x0002, 0x0026, 0x0002,
  568.          4,       -1,       -1, G_STRING  ,   /* Object 3  */
  569.   NONE, NORMAL, (LONG)"written by Th. Morus Walter",
  570.   0x000B, 0x0004, 0x001B, 0x0002,
  571.          5,       -1,       -1, G_STRING  ,   /* Object 4  */
  572.   NONE, NORMAL, (LONG)"(c) 1994 by Never Ready Software",
  573.   0x0008, 0x0005, 0x0020, 0x0002,
  574.          6,       -1,       -1, G_STRING  ,   /* Object 5  */
  575.   NONE, NORMAL, (LONG)"this program is FREEWARE!",
  576.   0x000C, 0x0007, 0x0019, 0x0002,
  577.          7,       -1,       -1, G_STRING  ,   /* Object 6  */
  578.   NONE, NORMAL, (LONG)"thanx to: P.C.M van der Arend",
  579.   0x000A, 0x000A, 0x001D, 0x0001,
  580.          8,       -1,       -1, G_TEXT    ,   /* Object 7  */
  581.   NONE, NORMAL, (LONG)&rs_tedinfo[18],
  582.   0x0014, 0x000B, 0x0019, 0x0001,
  583.          9,       -1,       -1, G_STRING  ,   /* Object 8  */
  584.   NONE, NORMAL, (LONG)"Coltris was written in C and assembler",
  585.   0x0006, 0x000C, 0x0026, 0x0002,
  586.         10,       -1,       -1, G_STRING  ,   /* Object 9  */
  587.   NONE, NORMAL, (LONG)"and compiled with PureC1.0",
  588.   0x000B, 0x000D, 0x001A, 0x0002,
  589.         11,       -1,       -1, G_TEXT    ,   /* Object 10  */
  590.   NONE, NORMAL, (LONG)&rs_tedinfo[19],
  591.   0x0000, 0x000F, 0x0030, 0x0001,
  592.          0,       -1,       -1, G_IBOX    ,   /* Object 11  */
  593.   SELECTABLE|DEFAULT|EXIT|LASTOB, NORMAL, (LONG)0x00001100L,
  594.   0x0000, 0x0000, 0x0030, 0x0010
  595. };
  596.  
  597. static OBJECT *rs_trindex[] =
  598. { &rs_object[0],   /* Tree  0 MENUE    */
  599.   &rs_object[32],   /* Tree  1 XSCORE   */
  600.   &rs_object[41],   /* Tree  2 STATISTIC */
  601.   &rs_object[57],   /* Tree  3 OPTSBOX  */
  602.   &rs_object[103],   /* Tree  4 KEYS     */
  603.   &rs_object[105],   /* Tree  5 HISCORE  */
  604.   &rs_object[140],   /* Tree  6 NEWHI    */
  605.   &rs_object[143]    /* Tree  7 INFOBOX  */
  606. };
  607.