home *** CD-ROM | disk | FTP | other *** search
/ Vectronix 2 / VECTRONIX2.iso / FILES_01 / PAPILL22.LZH / PAPILLON / BSPMODUL / BEISPIEL.RSH / BEISPIEL
Text File  |  1994-11-07  |  3KB  |  77 lines
  1. #include <aes.h>
  2. #include <vdi.h>
  3. #include "BEISPIEL.H"
  4.  
  5.  
  6. /****************************************/
  7. /* TEDINFO-Strings                      */
  8. /****************************************/
  9.  
  10. char    TED0_s[39] = "EIN PAPILLON-MODUL VON DIRK SABIWALSKY";
  11. #define TED0_t ""
  12. #define TED0_v ""
  13. char    TED1_s[29] = "Aktuellen Block invertieren?";
  14. #define TED1_t ""
  15. #define TED1_v ""
  16. char    TED2_s[9] = "Inverter";
  17. #define TED2_t ""
  18. #define TED2_v ""
  19. #define FSTR0 "OK"
  20. #define FSTR1 "Abbruch"
  21.  
  22. /****************************************/
  23. /* TEDINFO-structures                   */
  24. /****************************************/
  25.  
  26.  
  27. TEDINFO rs_tedinfo[] =
  28. {    TED0_s, TED0_t, TED0_v, SMALL , 0x6   , TE_LEFT, 0x1180, 0x0   ,0xffff, 0x27  , 0x1   ,
  29.     TED1_s, TED1_t, TED1_v, IBM   , 0x6   , TE_LEFT, 0x1180, 0x0   ,0xffff, 0x1d  , 0x1   ,
  30.     TED2_s, TED2_t, TED2_v, IBM   , 0x6   , TE_LEFT, 0x1180, 0x0   ,0xffff, 0x9   , 0x1   
  31. };
  32.  
  33. /****************************************/
  34. /* OBJECT-tree                          */
  35. /****************************************/
  36.  
  37.  
  38. OBJECT rs_object[] =
  39. {        -1,      1,      5, G_BOX     , NONE      , OUTLINED,                0X21100L,      0,      0,     32,      9,
  40.          2,     -1,     -1, G_TEXT    , NONE      , NORMAL  , (long) &rs_tedinfo[0]  ,      2,   2050,   1052,   2048,
  41.          3,     -1,     -1, G_TEXT    , NONE      , NORMAL  , (long) &rs_tedinfo[1]  ,      2,      4,     28,      1,
  42.          4,     -1,     -1, G_BUTTON  , 0x7       , NORMAL  , (long) FSTR0           ,      8,   2054,      8,   1025,
  43.          5,     -1,     -1, 0xff15    , NONE      , NORMAL  , (long) &rs_tedinfo[2]  ,     12,      1,      8,      1,
  44.          0,     -1,     -1, G_BUTTON  , 0x25      , NORMAL  , (long) FSTR1           ,     18,   2054,      8,   1025
  45. };
  46.  
  47. /****************************************/
  48. /* TREE-Index                           */
  49. /****************************************/
  50.  
  51.  
  52. OBJECT *TREE[] =
  53. {    (OBJECT *) &rs_object[0]
  54. };
  55. /****************************************
  56.  *    STD_FUNC.R2C:                        *
  57.  *    Standard-Funktionen für RSH-Files    *
  58.  ****************************************/
  59.  
  60. /*------------------------------------------------------------------*
  61.  * Funktion : objc_init                                                *
  62.  * Aufgabe    : Pa₧t die Objektdarstellung der Auflösung an            *
  63.  * Ergebnis    : ----                                                    *
  64.  * Parameter: ----                                                    *
  65.  *------------------------------------------------------------------*/
  66.  
  67. void objc_init( void )
  68. {
  69.     int i;
  70.     
  71.     for(i = 0; i < NUM_OBS; i++)
  72.     {
  73.         rsrc_obfix(rs_object,i);
  74.     }
  75. }
  76.  
  77.