home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 16 / 16.iso / w / w009 / 1.ddi / RCHEAD.MA_ / RCHEAD.MA
Encoding:
Text File  |  1993-12-25  |  1.3 KB  |  113 lines
  1. BUTTON    equ    80h
  2. EDIT    equ    81h
  3. STATIC    equ    82h
  4. LISTBOX    equ    83h
  5. SCROLLBAR    equ    84h
  6. COMBOBOX    equ    85h
  7.  
  8. Dialog macro Rect, Num, lStyle
  9.     dd    lStyle
  10.     db    Num
  11.     dw    Rect
  12. endm
  13.  
  14. DialogMenu macro Menu, Flag
  15. ifb <Menu>
  16.     db    0
  17. else
  18.     ifb <Flag>
  19.         db      Menu, 0
  20.     else
  21.         db      Flag, Menu
  22.     endif
  23. endif
  24. endm
  25.  
  26. DialogClass macro Class
  27. ifb <Class>
  28.     db    0
  29. else
  30.     db    Class, 0
  31. endif
  32. endm
  33.  
  34. DialogCaption macro Caption
  35. ifb <Caption>
  36.     db    0
  37. else
  38.     db    Caption, 0
  39. endif
  40. endm
  41.  
  42. DialogFont macro Size, Font
  43.     dw    Size
  44.     db    Font, 0
  45. endm
  46.  
  47. Control macro Rect, ID, lStyle, Class
  48.     dw    Rect
  49.     dw    ID
  50.     dd    lStyle
  51.     db    Class
  52. endm
  53.  
  54. CtrlTxt macro Text, Flag
  55. ifb <Text>
  56.     db    0, 0
  57. else
  58.     ifb <Flag>
  59.     db    Text, 0, 0
  60.     else
  61.     db    Flag, Text, 0
  62.     endif
  63. endif
  64. endm
  65.  
  66. CtrlTxt1 macro Text
  67.     db    Text
  68. endm
  69.  
  70. PopupMenu macro ItemText, Flag
  71.     dw    Flag
  72. ifb <ItemText>
  73.     db    0
  74. else
  75.     db    ItemText, 0
  76. endif
  77. endm
  78.  
  79. String macro Str
  80. local    StrBegin, StrEnd
  81. StrBegin    label    byte
  82. ifb <Str>
  83.     db    0
  84. else
  85.     db    StrEnd - StrBegin - 1, Str
  86. endif
  87. StrEnd    label    byte
  88. endm
  89.  
  90. String1 macro Str
  91.     db    Str
  92. endm
  93.  
  94. StringB macro Num
  95. StringB&Num    label    byte
  96.     db    StringE&Num - StringB&Num - 1
  97. endm
  98.  
  99. StringE macro Num
  100. StringE&Num    label    byte
  101. endm
  102.  
  103. MenuItem macro ItemText, FlagID
  104.     dw    FlagID
  105. ifb <ItemText>
  106.     db    0
  107. else
  108.     db    ItemText, 0
  109. endif
  110. endm
  111.  
  112.  
  113.