home *** CD-ROM | disk | FTP | other *** search
/ Games 1995 to 2000 / Games.iso / SexTetris / DBFILES.C < prev    next >
Encoding:
C/C++ Source or Header  |  1993-09-16  |  7.5 KB  |  156 lines
  1. #include "microlib.h"
  2.  
  3. #include "convert.h"
  4. #include "dbfiles.h"
  5.  
  6. #define IDDFILE(idd)    IDDFILE idd = {
  7. #define NAME(n)         #n,
  8. #define PATH(p)         #p,
  9. #define DESCR(d)        #d,
  10. #define FILENUM(n)      n,
  11. #define FLAGS(f)        f,
  12. #define NUMFLDS(n)      n,
  13. #define FIELDS          {
  14. #define FIELD(a, b, c, d, e, f, g, h) { a, b, c, d, e, f, g, h },
  15. #define ENDFIELDS       { NULL, NULL, 0, 0, 0, 0, 0, 0 } }
  16. #define ENDFILE         };
  17.  
  18. IDDFILE(iddInstitutes)
  19.     NAME(INSTITUT.DBF)
  20.     PATH(FILES)
  21.     DESCR(¡▌δúµ╓ε╓)
  22.     FILENUM(0)
  23.     FLAGS(0x0L)
  24.     NUMFLDS(16)
  25.     FIELDS
  26.         FIELD("",           "",          0x00000000, FLD_CHAR,   1, FLD_CHAR,     1, TF_ASIS)
  27.         FIELD("CODE",       "╡·▌πΣóφ",   0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  28.         FIELD("TITLE1",     "╨ƒεσΘφ",    0x00000000, FLD_ASCII, 80, FLD_CSTRING, 40, TF_ASIS)
  29.         FIELD("TITLE2",     "╨ƒεσΘφ",    0x00000000, FLD_ASCII,100, FLD_CSTRING, 40, TF_ASIS)
  30.         FIELD("TITLE3",     "╨ƒεσΘφ",    0x00000000, FLD_ASCII,100, FLD_CSTRING, 40, TF_ASIS)
  31.         FIELD("ADDRESS1",   "ºπ▐úΓ≥τ∞ß", 0x00000000, FLD_ASCII, 80, FLD_CSTRING, 40, TF_ASIS)
  32.         FIELD("ADDRESS2",   "ºπ▐úΓ≥τ∞ß", 0x00000000, FLD_ASCII, 80, FLD_CSTRING, 40, TF_ASIS)
  33.         FIELD("ZIP",        "╨╡",        0x00000000, FLD_ASCII, 14, FLD_CSTRING, 14, TF_ASIS)
  34.         FIELD("CITY",       "╞óσß",      0x00000000, FLD_ASCII, 35, FLD_CSTRING, 20, TF_ASIS)
  35.         FIELD("STATE",      "╞Θσπε▐ƒ╓",  0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  36.         FIELD("COUNTRY",    "╙²δ╓",      0x00050201, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  37.         FIELD("TOPIC",      "¼¥µ╓",      0x00010201, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  38.         FIELD("SUPERVISOR", "╤Ω▐úΓ≥τΘφ", 0x00020201, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  39.         FIELD("PHONE1",     "╨ßσ.1",     0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  40.         FIELD("PHONE2",     "╨ßσ.2",     0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  41.         FIELD("FAX",        "FAX",       0x00000000, FLD_ASCII, 15, FLD_CSTRING, 15, TF_ASIS)
  42.         FIELD("TELEX",      "TELEX",     0x00000000, FLD_ASCII, 15, FLD_CSTRING, 15, TF_ASIS)
  43.     ENDFIELDS
  44. ENDFILE
  45.  
  46. IDDFILE(iddTopics)
  47.     NAME(TOPICS.DBF)
  48.     PATH(FILES)
  49.     DESCR(¼¥µ╓ε╓)
  50.     FILENUM(1)
  51.     FLAGS(0x0L)
  52.     NUMFLDS(3)
  53.     FIELDS
  54.         FIELD("",           "",              0x00000000, FLD_CHAR,   1, FLD_CHAR,     1, TF_ASIS)
  55.         FIELD("CODE",       "╡·▌πΣóφ",       0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  56.         FIELD("ABBREV",     "╧≥τεΘµΘ╪δ╓≤ƒ╓", 0x00000000, FLD_ASCII, 50, FLD_CSTRING, 20, TF_ASIS)
  57.         FIELD("DESCR",      "╞▐δπ╪δ╓≤₧",     0x00000000, FLD_ASCII, 50, FLD_CSTRING, 40, TF_ASIS)
  58.     ENDFIELDS
  59. ENDFILE
  60.  
  61. IDDFILE(iddPersons)
  62.     NAME(PERSONS.DBF)
  63.     PATH(FILES)
  64.     DESCR(╞δó∞·Ω╓)
  65.     FILENUM(2)
  66.     FLAGS(0x0L)
  67.     NUMFLDS(26)
  68.     FIELDS
  69.         FIELD("",           "",            0x00000000, FLD_CHAR,   1, FLD_CHAR,     1, TF_ASIS)
  70.         FIELD("CODE",       "╡·▌πΣóφ",     0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  71.         FIELD("SURNAME",    "¿ΩƒΓ▐εΘ",     0x00000000, FLD_ASCII, 70, FLD_CSTRING, 40, TF_ASIS)
  72.         FIELD("NAME",       "╛τΘµ╓",       0x00000000, FLD_ASCII, 50, FLD_CSTRING, 40, TF_ASIS)
  73.         FIELD("PROFESSION", "¿Ω¢╪╪▐σµ╓",   0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  74.         FIELD("H_ADDRESS1", "ºπ▐úΓ≥τ∞ß 1", 0x00000000, FLD_ASCII,100, FLD_CSTRING, 40, TF_ASIS)
  75.         FIELD("H_ADDRESS2", "ºπ▐úΓ≥τ∞ß 2", 0x00000000, FLD_ASCII,100, FLD_CSTRING, 40, TF_ASIS)
  76.         FIELD("H_ZIP",      "╨╡",          0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  77.         FIELD("H_CITY",     "╞óσß",        0x00000000, FLD_ASCII, 35, FLD_CSTRING, 20, TF_ASIS)
  78.         FIELD("H_STATE",    "╞Θσπε▐ƒ╓",    0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  79.         FIELD("H_COUNTRY",  "╙²δ╓",        0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  80.         FIELD("H_PHONE1",   "╨ßσ.1",       0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  81.         FIELD("H_PHONE2",   "╨ßσ.2",       0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  82.         FIELD("H_FAX",      "FAX",         0x00000000, FLD_ASCII, 15, FLD_CSTRING, 15, TF_ASIS)
  83.         FIELD("H_TELEX",    "TELEX",       0x00000000, FLD_ASCII, 15, FLD_CSTRING, 15, TF_ASIS)
  84.         FIELD("H_ENVELOPE", "?????????",   0x00000000, FLD_ASCII, 30, FLD_CSTRING, 20, TF_ASIS)
  85.         FIELD("H_LETTER",   "?????????",   0x00000000, FLD_ASCII, 30, FLD_CSTRING, 20, TF_ASIS)
  86.         FIELD("INSTITUTE",  "¡▌δ≥µ╓",      0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  87.         FIELD("POSITION",   "¼¥∞ß",        0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  88.         FIELD("W_PHONE1",   "╨ßσ.1",       0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  89.         FIELD("W_EXT1",     "Ext.1",       0x00000000, FLD_ASCII,  5, FLD_CSTRING,  5, TF_ASIS)
  90.         FIELD("W_PHONE2",   "╨ßσ.2",       0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  91.         FIELD("W_EXT2",     "Ext.2",       0x00000000, FLD_ASCII,  5, FLD_CSTRING,  5, TF_ASIS)
  92.         FIELD("W_FAX",      "FAX",         0x00000000, FLD_ASCII, 15, FLD_CSTRING, 15, TF_ASIS)
  93.         FIELD("W_TELEX",    "TELEX",       0x00000000, FLD_ASCII, 15, FLD_CSTRING, 15, TF_ASIS)
  94.         FIELD("W_ENVELOPE", "?????????",   0x00000000, FLD_ASCII, 30, FLD_CSTRING, 20, TF_ASIS)
  95.         FIELD("W_LETTER",   "?????????",   0x00000000, FLD_ASCII, 30, FLD_CSTRING, 20, TF_ASIS)
  96.     ENDFIELDS
  97. ENDFILE
  98.  
  99. IDDFILE(iddStates)
  100.     NAME(STATES.DBF)
  101.     PATH(FILES)
  102.     DESCR(╞Θσπε▐ƒ▐φ)
  103.     FILENUM(4)
  104.     FLAGS(0x0L)
  105.     NUMFLDS(2)
  106.     FIELDS
  107.         FIELD("",           "",              0x00000000, FLD_CHAR,   1, FLD_CHAR,     1, TF_ASIS)
  108.         FIELD("CODE",       "╡·▌πΣóφ",       0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  109.         FIELD("NAME",       "╞Θσπε▐ƒ╓",      0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  110.     ENDFIELDS
  111. ENDFILE
  112.  
  113. IDDFILE(iddCountries)
  114.     NAME(COUNTRY.DBF)
  115.     PATH(FILES)
  116.     DESCR(╙²δ▐φ)
  117.     FILENUM(5)
  118.     FLAGS(0x0L)
  119.     NUMFLDS(3)
  120.     FIELDS
  121.         FIELD("",           "",              0x00000000, FLD_CHAR,   1, FLD_CHAR,     1, TF_ASIS)
  122.         FIELD("CODE",       "╡·▌πΣóφ",       0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  123.         FIELD("COUNTRY",    "╙²δ╓",          0x00000000, FLD_ASCII, 20, FLD_CSTRING, 20, TF_ASIS)
  124.         FIELD("PREFIX",     "╞δóΓ▐µ╓",       0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  125.     ENDFIELDS
  126. ENDFILE
  127.  
  128. IDDFILE(iddForms)
  129.     NAME(FORMS.DBF)
  130.     PATH(FILES)
  131.     DESCR(╥óδµ▐φ)
  132.     FILENUM(6)
  133.     FLAGS(0x0L)
  134.     NUMFLDS(6)
  135.     FIELDS
  136.         FIELD("",           "",              0x00000000, FLD_CHAR,   1, FLD_CHAR,     1, TF_ASIS)
  137.         FIELD("CODE",       "╡·▌πΣóφ",       0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  138.         FIELD("NAME",       "╞▐δπ╪δ╓≤₧",     0x00000000, FLD_ASCII, 80, FLD_CSTRING, 40, TF_ASIS)
  139.         FIELD("PAGE",       "╖▐╪.╧▐σƒ▌╓φ",   0x00000000, FLD_ASCII,  2, FLD_CSTRING,  2, TF_ASIS)
  140.         FIELD("ORIENT",     "╞δΘ∞/σπ∞µóφ",   0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  141.         FIELD("HEADER",     "¿ΩπΣ▐≤╓σƒ▌╓",   0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  142.         FIELD("FILE",       "ñδ⌠▐ƒΘ",        0x00000000, FLD_ASCII,  7, FLD_CSTRING,  7, TF_ASIS)
  143.     ENDFIELDS
  144. ENDFILE
  145.  
  146. char _far *IDD[] = {
  147.     (char _far *)&iddInstitutes,
  148.     (char _far *)&iddTopics,
  149.     (char _far *)&iddPersons,
  150.     NULL,
  151.     (char _far *)&iddStates,
  152.     (char _far *)&iddCountries,
  153.     (char _far *)&iddForms,
  154.     NULL
  155. };
  156.