home *** CD-ROM | disk | FTP | other *** search
/ Vectronix 2 / VECTRONIX2.iso / FILES_07 / ACS.ZIP / ACS / RECHNER / RECHNER.AH < prev    next >
Text File  |  1992-01-28  |  8KB  |  172 lines
  1. /*
  2.  
  3.     This file was create with ACS 1.0 (c) Stefan Bachert 1991
  4.  
  5.     The contents is based on file: E:\ACS.DOC\RECHNER\RECHNER.ACS
  6.  
  7.     compiled at: Thu Jan 02 19:37:02 1992 
  8. */
  9.  
  10.  
  11.  
  12. /*    STRINGS        */
  13.  
  14.        char ERR_DIV0     [] = "DIVISION DURCH 0";
  15. static char TEXT_001     [] = "1234567890123456";
  16. static char TEXT_002     [] = "";
  17. static char TEXT_003     [] = "AC";
  18. static char TEXT_004     [] = "+/-";
  19. static char TEXT_005     [] = " RECHNER ";
  20. static char TEXT_006     [] = "RECHNER";
  21.  
  22.  
  23. /*    TEDINFOS    */
  24.  
  25. static TEDINFO TEDI_001     = {TEXT_001, TEXT_002, TEXT_002, 3, 6, 2, 0x1180, 0, 0, 17, 1};
  26.  
  27.  
  28. /*    ICONS    */
  29.  
  30. static int _MSK_IC_CALC [] = {
  31.     0x3fff, 0xfffc, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 
  32.     0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 
  33.     0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 
  34.     0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 
  35.     0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 
  36.     0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 0x3fff, 0xfffe, 
  37.     0x3fff, 0xfffe, 0x1fff, 0xfffe};
  38. static int _DAT_IC_CALC [] = {
  39.     0x3fff, 0xfffc, 0x2000, 0x0006, 0x2000, 0x0006, 0x2fff, 0xfff6, 
  40.     0x2800, 0x0016, 0x2800, 0x00d6, 0x2800, 0x0016, 0x2fff, 0xfff6, 
  41.     0x2000, 0x0006, 0x279e, 0x79e6, 0x2492, 0x4926, 0x2492, 0x4926, 
  42.     0x279e, 0x79e6, 0x2000, 0x0006, 0x279e, 0x79e6, 0x2492, 0x4926, 
  43.     0x2492, 0x4926, 0x279e, 0x79e6, 0x2000, 0x0006, 0x279e, 0x7fe6, 
  44.     0x2492, 0x4026, 0x2492, 0x4026, 0x279e, 0x7fe6, 0x2000, 0x0006, 
  45.     0x3fff, 0xfffe, 0x1fff, 0xfffe};
  46.        ICONBLK IC_CALC = {
  47.     _MSK_IC_CALC, _DAT_IC_CALC, TEXT_006,
  48.     0x1000,  0,  0, 19,  0, 32, 26,  0, 28, 72,  8};
  49.  
  50.  
  51.  
  52. /*    OBJECT TREES    */
  53.  
  54.        OBJECT PANEL             = { -1,  2, 41, 20, 0x1800,    0x0,  0x00011111L         ,  0,  0, 20, 14 };
  55. static AOBJECT _00aPANEL        = {A_dummy     , calc_accept , 0x8000,    0x0, NULL        , NULL        ,    0x0, 0          };
  56. static OBJECT  _02_PANEL        = {  5,  3,  3, 20,    0x0,   0x30,  0x00011101L         ,  1,  1, 18,  2 };
  57. static OBJECT  _03_PANEL        = {  2, -1, -1, 22, 0x2000,    0x0, (long) &TEDI_001     ,  1, 2048, 16,  1 };
  58. static AOBJECT _03aPANEL        = {A_dummy     , A_dummy     , 0x8000,    0x0, NULL        , NULL        ,    0x0, CALC_VALUE  };
  59. static OBJECT  _05_PANEL        = {  7, -1, -1, 26,   0x41,   0x30, (long) TEXT_003     ,  1,  4,  3,  1 };
  60. static AOBJECT _05aPANEL        = {calc_ac     , A_dummy     , 0x8000, 0x8053, NULL        , NULL        ,    0x0, 0          };
  61. static OBJECT  _07_PANEL        = {  9, -1, -1, 27,   0x41,   0x30,  0x04ff1101L         ,  6,  4,  3,  1 };
  62. static AOBJECT _07aPANEL        = {calc_back   , A_dummy     , 0x8000, 0x800e, NULL        , NULL        ,    0x0, 0          };
  63. static OBJECT  _09_PANEL        = { 11, -1, -1, 26,   0x41,   0x30, (long) TEXT_004     , 11,  4,  3,  1 };
  64. static AOBJECT _09aPANEL        = {calc_sign   , A_dummy     , 0x8000,   0x7e, NULL        , NULL        ,    0x0, 0          };
  65. static OBJECT  _11_PANEL        = { 13, -1, -1, 27,   0x41,   0x30,  0x2aff1101L         , 16,  4,  3,  1 };
  66. static AOBJECT _11aPANEL        = {calc_mul    , A_dummy     , 0x8000,   0x2a, NULL        , NULL        ,    0x0, 0          };
  67. static OBJECT  _13_PANEL        = { 15, -1, -1, 27,   0x41,   0x30,  0x37ff1101L         ,  1,  6,  3,  1 };
  68. static AOBJECT _13aPANEL        = {calc_7      , A_dummy     , 0x8000,   0x37, NULL        , NULL        ,    0x0, 0          };
  69. static OBJECT  _15_PANEL        = { 17, -1, -1, 27,   0x41,   0x30,  0x38ff1101L         ,  6,  6,  3,  1 };
  70. static AOBJECT _15aPANEL        = {calc_8      , A_dummy     , 0x8000,   0x38, NULL        , NULL        ,    0x0, 0          };
  71. static OBJECT  _17_PANEL        = { 19, -1, -1, 27,   0x41,   0x30,  0x39ff1101L         , 11,  6,  3,  1 };
  72. static AOBJECT _17aPANEL        = {calc_9      , A_dummy     , 0x8000,   0x39, NULL        , NULL        ,    0x0, 0          };
  73. static OBJECT  _19_PANEL        = { 21, -1, -1, 27,   0x41,   0x30,  0x2fff1101L         , 16,  6,  3,  1 };
  74. static AOBJECT _19aPANEL        = {calc_div    , A_dummy     , 0x8000,   0x2f, NULL        , NULL        ,    0x0, 0          };
  75. static OBJECT  _21_PANEL        = { 23, -1, -1, 27,   0x41,   0x30,  0x34ff1101L         ,  1,  8,  3,  1 };
  76. static AOBJECT _21aPANEL        = {calc_4      , A_dummy     , 0x8000,   0x34, NULL        , NULL        ,    0x0, 0          };
  77. static OBJECT  _23_PANEL        = { 25, -1, -1, 27,   0x41,   0x30,  0x35ff1101L         ,  6,  8,  3,  1 };
  78. static AOBJECT _23aPANEL        = {calc_5      , A_dummy     , 0x8000,   0x35, NULL        , NULL        ,    0x0, 0          };
  79. static OBJECT  _25_PANEL        = { 27, -1, -1, 27,   0x41,   0x30,  0x36ff1101L         , 11,  8,  3,  1 };
  80. static AOBJECT _25aPANEL        = {calc_6      , A_dummy     , 0x8000,   0x36, NULL        , NULL        ,    0x0, 0          };
  81. static OBJECT  _27_PANEL        = { 29, -1, -1, 27,   0x41,   0x30,  0x2bff1101L         , 16,  8,  3,  1 };
  82. static AOBJECT _27aPANEL        = {calc_plus   , A_dummy     , 0x8000,   0x2b, NULL        , NULL        ,    0x0, 0          };
  83. static OBJECT  _29_PANEL        = { 31, -1, -1, 27,   0x41,   0x30,  0x31ff1101L         ,  1, 10,  3,  1 };
  84. static AOBJECT _29aPANEL        = {calc_1      , A_dummy     , 0x8000,   0x31, NULL        , NULL        ,    0x0, 0          };
  85. static OBJECT  _31_PANEL        = { 33, -1, -1, 27,   0x41,   0x30,  0x32ff1101L         ,  6, 10,  3,  1 };
  86. static AOBJECT _31aPANEL        = {calc_2      , A_dummy     , 0x8000,   0x32, NULL        , NULL        ,    0x0, 0          };
  87. static OBJECT  _33_PANEL        = { 35, -1, -1, 27,   0x41,   0x30,  0x33ff1101L         , 11, 10,  3,  1 };
  88. static AOBJECT _33aPANEL        = {calc_3      , A_dummy     , 0x8000,   0x33, NULL        , NULL        ,    0x0, 0          };
  89. static OBJECT  _35_PANEL        = { 37, -1, -1, 27,   0x41,   0x30,  0x2dff1101L         , 16, 10,  3,  1 };
  90. static AOBJECT _35aPANEL        = {calc_minus  , A_dummy     , 0x8000,   0x2d, NULL        , NULL        ,    0x0, 0          };
  91. static OBJECT  _37_PANEL        = { 39, -1, -1, 27,   0x41,   0x30,  0x30ff1101L         ,  1, 12,  3,  1 };
  92. static AOBJECT _37aPANEL        = {calc_0      , A_dummy     , 0x8000,   0x30, NULL        , NULL        ,    0x0, 0          };
  93. static OBJECT  _39_PANEL        = { 41, -1, -1, 27,   0x41,   0x30,  0x2eff1101L         ,  6, 12,  3,  1 };
  94. static AOBJECT _39aPANEL        = {calc_dot    , A_dummy     , 0x8000,   0x2e, NULL        , NULL        ,    0x0, 0          };
  95. static OBJECT  _41_PANEL        = {  0, -1, -1, 27,   0x43,   0x30,  0x3dff1101L         , 11, 12,  8,  1 };
  96. static AOBJECT _41aPANEL        = {calc_is     , A_dummy     , 0x8020,   0x3d, NULL        , NULL        ,    0x0, 0          };
  97.  
  98.  
  99.  
  100. /*    WINDOWS    */
  101.  
  102.        Awindow RECHNER      = {
  103.     NULL,
  104.     calc_service,
  105.     calc_make   ,
  106.     Awi_open,
  107.     Awi_init,
  108.     &PANEL       , NULL, 0, 0, -1,
  109.        0xb, { 0,  0, 34, 20},
  110.     {0, 0, 0, 0}, {0, 0, 0, 0}, {-1, -1, -1, -1}, 0, 0,
  111.     0xfff0,
  112.     TEXT_005    ,
  113.     TEXT_002    ,
  114.     10000,    0x3, 0, -1,
  115.     &IC_CALC     ,
  116.     NULL,
  117.     Awi_keys,
  118.     Awi_obchange,
  119.     Awi_redraw,
  120.     Awi_topped,
  121.     Awi_closed,
  122.     Awi_fulled,
  123.     Awi_arrowed,
  124.     Awi_hslid,
  125.     Awi_vslid,
  126.     Awi_sized,
  127.     Awi_moved};
  128.  
  129.  
  130.  
  131.  
  132. Adescr ACSdescr = {
  133. "ACS 1.0", 101,
  134. -4, -4,
  135.  0xb,
  136. "  ACS-Rechner",
  137.     &DESKTOP, &  RECHNER   ,
  138. {
  139.     {  0, NULL},
  140.     {  2, NULL},
  141.     {  3, NULL},
  142.     {  4, NULL},
  143.     {  1, NULL},
  144.     {  5, NULL},
  145.     {  6, NULL},
  146.     {  7, NULL},
  147.     {  0, NULL},
  148.     {  0, NULL},
  149.     {  0, NULL},
  150.     {  0, NULL},
  151.     {  0, NULL},
  152.     {  0, NULL},
  153.     {  0, NULL},
  154.     {  0, NULL},
  155.     {  0, NULL},
  156.     {  0, NULL},
  157.     {  0, NULL},
  158.     {  0, NULL},
  159.     {  0, NULL},
  160.     {  0, NULL},
  161.     {  0, NULL},
  162.     {  0, NULL},
  163.     {  0, NULL},
  164.     {  0, NULL},
  165.     {  0, NULL},
  166.     {  0, NULL},
  167.     {  0, NULL},
  168.     {  0, NULL},
  169.     {  0, NULL},
  170.     {  0, NULL}
  171. } };
  172.