home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / C / LFC-SW2.LHA / StormWizard / Example-Source / E / wizard.i < prev   
Encoding:
Text File  |  1996-06-16  |  12.1 KB  |  545 lines

  1.  
  2.             IFND    WIZARD_WIZARD_I
  3. WIZARD_WIZARD_I        EQU    1
  4.  
  5.             IFND LIBRARIES_GADTOOLS_I
  6.             INCLUDE    'libraries/gadtools.i'
  7.             ENDC
  8.  
  9.  
  10. ; Diese Konstanten dürfen überall benutzt werden, wo die
  11. ; Library Farbregister erwartet.
  12.  
  13. WZRD_TEXTPEN        EQU    TEXTPEN+(1<<15)
  14. WZRD_SHINEPEN        EQU    SHINEPEN+(1<<15)
  15. WZRD_SHADOWPEN        EQU    SHADOWPEN+(1<<15)
  16. WZRD_FILLPEN        EQU    FILLPEN+(1<<15)
  17. WZRD_FILLTEXTPEN    EQU    FILLTEXTPEN+(1<<15)
  18. WZRD_BACKGROUNDPEN    EQU    BACKGROUNDPEN+(1<<15)
  19. WZRD_HIGHLIGHTTEXTPEN    EQU    HIGHLIGHTTEXTPEN+(1<<15)
  20. WZRD_BARDETAILPEN    EQU    BARDETAILPEN+(1<<15)    (OS V39)
  21. WZRD_BARBLOCKPEN    EQU    BARBLOCKPEN+(1<<15)    (OS V39)
  22. WZRD_BARTRIMPEN        EQU    BARTRIMPEN+(1<<15)    (OS V39)
  23.  
  24. ;---------------------------------------------------------
  25.  
  26. ; FrameTypes
  27.  
  28. WZRDFRAME_NONE        EQU    0
  29. WZRDFRAME_ICON        EQU    1
  30. WZRDFRAME_BUTTON    EQU    2
  31. WZRDFRAME_STRING    EQU    3
  32. WZRDFRAME_DOUBLEICON    EQU    4
  33. WZRDFRAME_SICON        EQU    5
  34. WZRDFRAME_SBUTTON    EQU    6
  35. WZRDFRAME_SSTRING    EQU    7
  36. WZRDFRAME_SDOUBLEICON    EQU    8
  37.  
  38. ;---------------------------------------------------------
  39. ; Textplazierungen
  40. WZRDPLACE_LEFT        EQU    PLACETEXT_LEFT
  41. WZRDPLACE_RIGHT        EQU    PLACETEXT_RIGHT
  42. WZRDPLACE_CENTER    EQU    PLACETEXT_IN
  43.  
  44. ;---------------------------------------------------------
  45.  
  46. WARROW_LEFT        EQU    0
  47. WARROW_RIGHT        EQU    1
  48. WARROW_UP        EQU    2
  49. WARROW_DOWN        EQU    3
  50.  
  51. ;---------------------------------------------------------
  52.  
  53. WGHF_IgnoreOS        EQU    1
  54. WGHF_FullControl    EQU    2
  55.  
  56. ;---------------------------------------------------------
  57. ; WizardNode
  58.     STRUCTURE WizardNode,0
  59.     STRUCT    wn_Node,MLN_SIZE
  60.     BYTE    wn_Entrys        ;1
  61.     BYTE    wn_Flags        ;1
  62.     STRUCT    wn_Intern,38        ;38
  63.     LABEL    wn_SIZE            ;0
  64.  
  65. ;---------------------------------------------------------
  66. ; StandardNode für ListView und Hierarchy
  67.     STRUCTURE WizardDefaultNode,0
  68.     STRUCT    wdn_WizardNode,wn_SIZE
  69.     STRUCT    wdn_Intern,24
  70.     LABEL    wdn_SIZE        ;0
  71.  
  72. ;---------------------------------------------------------
  73.  
  74.     STRUCTURE WizardWindowHandle,0
  75.     STRUCT    wwh_Node,MLN_SIZE
  76.     LONG    wwh_Window        ;1
  77.     LONG    wwh_MenuStrip        ;1
  78.     LONG    wwh_DrawInfo        ;1
  79.     LONG    wwh_VisualInfo        ;1
  80.     LONG    wwh_ScreenTitle        ;1
  81.     WORD    wwh_SizeImageWidth    ;1
  82.     WORD    wwh_SizeImageHeight    ;1
  83.     STRUCT    wwh_Objects,MLH_SIZE
  84.     LONG    wwh_RootGadget        ;1
  85.     LONG    wwh_RootTopGadget    ;1
  86.     LONG    wwh_RootLeftGadget    ;1
  87.     LONG    wwh_RootBottomGadget    ;1
  88.     LONG    wwh_RootRightGadget    ;1
  89.     LONG    wwh_UserStruct        ;1
  90.     LABEL    wwh_SIZE        ;0
  91.  
  92. ; Der ganze Aufbau der WindowHandle-Struktur ist nicht beschrieben.
  93. ; Es sind alle Felder vom Type ReadOnly !
  94. ; Sollte das Fenster geschlossen sein, dann ist der Window-Eintrag
  95. ; mit NULL besetzt.
  96. ; Die MinNode-Struktur dient der Library zur internen Verkettung und
  97. ; ist damit für den Programmierer NICHT nutzbar.
  98. ; Möchten Sie ihre WindowHandles selbst verketten, dann sollten Sie
  99. ; in die private Struktur eine MinNode-Struktur einbauen !
  100. ; siehe WZ_AllocWindowHandle()
  101.  
  102. ;---------------------------------------------------------
  103.  
  104.     STRUCTURE WizardNewImage,0
  105.     WORD    wni_Flags        ;1
  106.     WORD    wni_Name        ;1
  107.     WORD    wni_Width        ;1
  108.     WORD    wni_Height        ;1
  109.     WORD    wni_Depth        ;1    Anzahl der Farben = 2^x
  110.     WORD    wni_Compression        ;1
  111.     LONG    wni_Reserved        ;1
  112.     LONG    wni_ColorLength        ;1    Größe der Farbtabelle
  113.     LONG    wni_ImageLength        ;1
  114.     LABEL    wni_SIZE        ;0
  115. ; ab hier folgen die Grafikdaten
  116.             
  117.             BITDEF    WI,Interleaved,2
  118.             BITDEF    WI,Standard,3
  119.  
  120. ;---------------------------------------------------------
  121.  
  122.     STRUCTURE WizardVImage,0
  123.     WORD    wvi_Flags        ;1
  124.     WORD    wvi_Counter        ;1
  125.     WORD    wvi_MinWidth        ;1
  126.     WORD    wvi_MinHeight        ;1
  127.     LONG    wvi_RelCoords        ;1
  128.     LABEL    wvi_SIZE        ;0
  129.  
  130. ; ab hier folgen weitere Zeiger auf die Image-Beschreibung
  131.  
  132.             BITDEF    WVI,MinWidth,0
  133.             BITDEF    WVI,MinHeight,1
  134.             BITDEF    WVI,AreaInit,2
  135.             BITDEF    WVI,Recursion,3
  136.  
  137. ;-----------------------------------------------------------
  138.  
  139.             ENUM
  140.             EITEM    WVICMD_END
  141.             EITEM    WVICMD_COLOR
  142.             EITEM    WVICMD_COLOR2
  143.             EITEM    WVICMD_MOVE    
  144.             EITEM    WVICMD_DRAW
  145.             EITEM    WVICMD_RECTFILL
  146.             EITEM    WVICMD_WRITEPIXEL
  147.             EITEM    WVICMD_IMAGE
  148.             EITEM    WVICMD_TEXT
  149.             EITEM    WVICMD_SETDRMD
  150.             EITEM    WVICMD_TEXTIMAGE
  151.             EITEM    WVICMD_TEXTMOVE
  152.             EITEM    WVICMD_TAGCOLOR
  153.             EITEM    WVICMD_TEXTPLACE
  154.             EITEM    WVICMD_SETAFPT
  155.             EITEM    WVICMD_SNAPCURSOR
  156.             EITEM    WVICMD_SNAPX
  157.             EITEM    WVICMD_SNAPY
  158.             EITEM    WVICMD_TAGMOVE
  159.             EITEM    WVICMD_TAGIMAGE
  160.             EITEM    WVICMD_BITMAP_TO_RP
  161.             EITEM    WVICMD_FILLBORDER
  162.             EITEM    WVICMD_BEEP
  163.             EITEM    WVICMD_AREAINIT
  164.             EITEM    WVICMD_AREAMOVE
  165.             EITEM    WVICMD_AREADRAW
  166.             EITEM    WVICMD_AREAEND
  167.  
  168.  
  169. ; GadgetArten
  170.             ENUM
  171.             EITEM    WCLASS_LAYOUT
  172.             EITEM    WCLASS_HGROUP
  173.             EITEM    WCLASS_VGROUP
  174.             EITEM    WCLASS_BUTTON
  175.             EITEM    WCLASS_STRING
  176.             EITEM    WCLASS_LABEL
  177.             EITEM    WCLASS_CHECKBOX
  178.             EITEM    WCLASS_MX
  179.             EITEM    WCLASS_INTEGER
  180.             EITEM    WCLASS_HSCROLLER
  181.             EITEM    WCLASS_VSCROLLER
  182.             EITEM    WCLASS_ARROW
  183.             EITEM    WCLASS_LISTVIEW
  184.             EITEM    WCLASS_MULTILISTVIEW
  185.             EITEM    WCLASS_TOGGLE
  186.             EITEM    WCLASS_LINE
  187.             EITEM    WCLASS_COLORFIELD
  188.             EITEM    WCLASS_ARGS
  189.             EITEM    WCLASS_GAUGE
  190.             EITEM    WCLASS_CYCLE
  191.             EITEM    WCLASS_VECTORBUTTON
  192.             EITEM    WCLASS_DATE
  193.             EITEM    WCLASS_SPACE
  194.             EITEM    WCLASS_IMAGE
  195.             EITEM    WCLASS_IMAGEBUTTON
  196.             EITEM    WCLASS_IMAGETOGGLE
  197.             EITEM    WCLASS_IMAGEPOPUP
  198.             EITEM    WCLASS_TEXTPOPUP
  199.             EITEM    WCLASS_PALETTE
  200.             EITEM    WCLASS_VECTORPOPUP
  201.             EITEM    WCLASS_HIERARCHY
  202.             EITEM    WCLASS_HSLIDER
  203.             EITEM    WCLASS_VSLIDER
  204.             EITEM    WCLASS_LAST
  205.  
  206. WCLASS_GROUPEND        EQU    WCLASS_LAYOUT
  207.  
  208. ;---------------------------------------------------------
  209.  
  210. WZRD_TagDummy        EQU    TAG_USER+$180000
  211.  
  212. ;---------------------------------------------------------
  213.  
  214.             ENUM    WZRD_TagDummy+100
  215.             
  216.             EITEM    WVIA_Text
  217.             EITEM    WVIA_TextFont
  218.             EITEM    WVIA_TextPlace
  219.             EITEM    WVIA_TextPen
  220.             EITEM    WVIA_TextStyles
  221.             EITEM    WVIA_TextHighlights
  222.             EITEM    WVIA_TextImages
  223.             
  224.             EITEM    WVIA_TagImage
  225.             EITEM    WVIA_TagImageCode
  226.             
  227.             EITEM    WVIA_ImageCode
  228.             
  229.             EITEM    WVIA_Color0
  230.             EITEM    WVIA_Color1
  231.             EITEM    WVIA_Color2
  232.             EITEM    WVIA_Color3
  233.             EITEM    WVIA_Color4
  234.             EITEM    WVIA_Color5
  235.             EITEM    WVIA_Color6
  236.             EITEM    WVIA_Color7
  237.  
  238.             EITEM    WVIA_TPoint0
  239.             EITEM    WVIA_TPoint1
  240.             EITEM    WVIA_TPoint2
  241.             EITEM    WVIA_TPoint3
  242.             EITEM    WVIA_TPoint4
  243.             EITEM    WVIA_TPoint5
  244.             EITEM    WVIA_TPoint6
  245.             EITEM    WVIA_TPoint7
  246.             
  247.             EITEM    WVIA_AreaPtrn
  248.  
  249.             EITEM    WVIA_TmpRas
  250.             
  251.             EITEM    WVIA_BitMapWidth
  252.             EITEM    WVIA_BitMapHeight
  253.             EITEM    WVIA_BitMap0
  254.             EITEM    WVIA_BitMap1
  255.             EITEM    WVIA_BitMap2
  256.             EITEM    WVIA_BitMap3
  257.             EITEM    WVIA_BitMap4
  258.             EITEM    WVIA_BitMap5
  259.             EITEM    WVIA_BitMap6
  260.             EITEM    WVIA_BitMap7
  261.             
  262.             EITEM    WVIA_PureText    (def FALSE)
  263.             
  264. ;---------------------------------------------------------
  265.  
  266.             ENUM    WZRD_TagDummy+200
  267.             
  268.             EITEM    SFH_Locale
  269.             EITEM    SFH_Catalog
  270.             EITEM    SFH_AutoInit
  271.  
  272. ;---------------------------------------------------------
  273.  
  274.             ENUM    WZRD_TagDummy+300
  275.  
  276.             EITEM    WWH_GadgetArray
  277.             EITEM    WWH_GadgetArraySize
  278.             EITEM    WWH_PreviousGadget
  279.             EITEM    WWH_StringHook
  280.             EITEM    WWH_StackSize
  281.  
  282. ;---------------------------------------------------------
  283. ; Flags in WGA_Flags
  284.  
  285.             BITDEF    WG,GadgetHelp,1
  286.             BITDEF    WG,Immediate,2
  287.             BITDEF    WG,Disabled,8
  288.             BITDEF    WG,KeyControl,9
  289.             BITDEF    WGRP,EqualSize,15
  290.             BITDEF    WGRP,DockMode,14
  291.             BITDEF    WSPC,Transparent,15
  292.             BITDEF    WTG,SimpleMode,15
  293.             BITDEF    WLV,ReadOnly,15
  294.             BITDEF    WLV,DoubleClicks,14
  295.             BITDEF    WSC,NewLook,15
  296.             BITDEF    WIT,SimpleMode,15
  297.             BITDEF    WIP,NewLook,15
  298.             BITDEF    WTP,NewLook,15
  299.             BITDEF    WVP,NewLook,15
  300.             BITDEF    WHR,DoubleClicks,14
  301.             BITDEF    WSL,NewLook,15
  302.  
  303. ;---------------------------------------------------------
  304.  
  305.             ENUM    WZRD_TagDummy+400
  306. ; alle folgenden Tags sind Universal-Tags
  307.  
  308.             EITEM    WGA_Label
  309.             EITEM    WGA_Label2
  310.             EITEM    WGA_TextFont
  311.             EITEM    WGA_Flags
  312.             EITEM    WGA_Priority
  313.             EITEM    WGA_RelHeight
  314.             EITEM    WGA_MinWidth
  315.             EITEM    WGA_MinHeight
  316.             EITEM    WGA_Link
  317.             EITEM    WGA_LinkData
  318.             EITEM    WGA_HelpText
  319.             EITEM    WGA_Config
  320.             EITEM    WGA_NewImage
  321.             EITEM    WGA_SelNewImage
  322.             EITEM    WGA_Group
  323.             EITEM    WGA_GroupPage
  324.             EITEM    WGA_Locale
  325.             EITEM    WGA_Screen
  326.             EITEM    WGA_Bounds
  327.             
  328. ;---------------------------------------------------------
  329.  
  330.             ENUM    WZRD_TagDummy+450
  331.             EITEM    WNOTIFYA_Type
  332.  
  333. ;---------------------------------------------------------
  334.  
  335.             ENUM    WZRD_TagDummy+500
  336.             
  337.             EITEM    WGROUPA_ActivePage
  338.             EITEM    WGROUPA_MaxPage
  339.             EITEM    WGROUPA_HBorder
  340.             EITEM    WGROUPA_VBorder
  341.             EITEM    WGROUPA_BHOffset
  342.             EITEM    WGROUPA_BVOffset
  343.             EITEM    WGROUPA_Space
  344.             EITEM    WGROUPA_VarSpace
  345.             EITEM    WGROUPA_FrameType
  346.  
  347.             EITEM    WSTRINGA_MaxChars
  348.             EITEM    WSTRINGA_String
  349.  
  350.             EITEM    WCHECKBOXA_Checked
  351.  
  352.             EITEM    WMXA_Active
  353.             EITEM    WGROUPA_HighLights
  354.             EITEM    WGROUPA_HighlightPen
  355.  
  356.             EITEM    WLABELA_FrameType
  357.             EITEM    WLABELA_Space
  358.             EITEM    WLABELA_BGPen
  359.             EITEM    WLABELA_TextPlace
  360.             EITEM    WLABELA_Lines
  361.  
  362.             EITEM    WINTEGERA_Long
  363.             EITEM    WINTEGERA_MinLong
  364.             EITEM    WINTEGERA_MaxLong
  365.             
  366.             EITEM    WSCROLLERA_Top
  367.             EITEM    WSCROLLERA_Visible
  368.             EITEM    WSCROLLERA_Total
  369.  
  370.             EITEM    WSTRINGA_Justification
  371.             EITEM    WINTEGERA_Justification
  372.  
  373.             EITEM    WARROWA_Type
  374.             
  375.             EITEM    WLISTVIEWA_Unused7
  376.             EITEM    WLISTVIEWA_Unused
  377.             EITEM    WLISTVIEWA_Unused2
  378.             EITEM    WLISTVIEWA_Unused3
  379.             EITEM    WLISTVIEWA_Unused4
  380.             EITEM    WLISTVIEWA_Top
  381.             EITEM    WLISTVIEWA_Selected
  382.             EITEM    WLISTVIEWA_List
  383.             EITEM    WLISTVIEWA_Unused6
  384.             EITEM    WLISTVIEWA_Visible
  385.             EITEM    WLISTVIEWA_DoubleClick
  386.             
  387.             EITEM    WTOGGLEA_Checked
  388.             
  389.             EITEM    WLINEA_Type
  390.             EITEM    WLINEA_Label
  391.  
  392.             EITEM    WCOLORFIELDA_Pen
  393.  
  394.             EITEM    WARGSA_TextPlace
  395.             EITEM    WARGSA_FrameType
  396.             EITEM    WARGSA_Arg0
  397.             EITEM    WARGSA_Arg1
  398.             EITEM    WARGSA_Arg2
  399.             EITEM    WARGSA_Arg3
  400.             EITEM    WARGSA_Arg4
  401.             EITEM    WARGSA_Arg5
  402.             EITEM    WARGSA_Arg6
  403.             EITEM    WARGSA_Arg7
  404.             EITEM    WARGSA_Arg8
  405.             EITEM    WARGSA_Arg9
  406.             
  407.             EITEM    WGAUGEA_Total
  408.             EITEM    WGAUGEA_Current
  409.             EITEM    WGAUGEA_Format
  410.             
  411.             EITEM    WCYCLEA_Active
  412.             EITEM    WCYCLEA_Labels
  413.             
  414.             EITEM    WARROWA_Step
  415.             EITEM    WVECTORBUTTONA_Type
  416.  
  417.             EITEM    WDATEA_Day
  418.             EITEM    WDATEA_Month
  419.             EITEM    WDATEA_Year
  420.  
  421.             EITEM    WARGSA_Format
  422.             EITEM    WLABELA_HighlightPen
  423.             
  424.             EITEM    WBUTTONA_Label
  425.  
  426.             EITEM    WLABELA_HighLights
  427.             EITEM    WLABELA_Label
  428.  
  429.             EITEM    WIMAGEA_BGPen
  430.             EITEM    WIMAGEA_FrameType
  431.             EITEM    WIMAGEA_HBorder
  432.             EITEM    WIMAGEA_VBorder
  433.             EITEM    WIMAGEA_NewImage
  434.             
  435.             EITEM    WIMAGEBUTTONA_BGPen
  436.             EITEM    WIMAGEBUTTONA_SelBGPen
  437.             EITEM    WIMAGEBUTTONA_FrameType
  438.             EITEM    WIMAGEBUTTONA_HBorder
  439.             EITEM    WIMAGEBUTTONA_VBorder
  440.             EITEM    WIMAGEBUTTONA_NewImage
  441.             EITEM    WIMAGEBUTTONA_SelNewImage
  442.  
  443.             EITEM    WIMAGETOGGLEA_BGPen
  444.             EITEM    WIMAGETOGGLEA_SelBGPen
  445.             EITEM    WIMAGETOGGLEA_FrameType
  446.             EITEM    WIMAGETOGGLEA_HBorder
  447.             EITEM    WIMAGETOGGLEA_VBorder
  448.             EITEM    WIMAGETOGGLEA_NewImage
  449.             EITEM    WIMAGETOGGLEA_SelNewImage
  450.             EITEM    WIMAGETOGGLEA_Checked
  451.  
  452.             EITEM    WSTRINGA_Hook
  453.             
  454.             EITEM    WSPACEA_Unused            Pen
  455.             
  456.             EITEM    WIMAGEPOPUPA_BGPen
  457.             EITEM    WIMAGEPOPUPA_FrameType
  458.             EITEM    WIMAGEPOPUPA_HBorder
  459.             EITEM    WIMAGEPOPUPA_VBorder
  460.             EITEM    WIMAGEPOPUPA_TextPlace
  461.             EITEM    WIMAGEPOPUPA_NewImage
  462.             EITEM    WIMAGEPOPUPA_Labels
  463.             EITEM    WIMAGEPOPUPA_Selected
  464.  
  465.             EITEM    WTEXTPOPUPA_TextPlace
  466.             EITEM    WTEXTPOPUPA_Labels
  467.             EITEM    WTEXTPOPUPA_Selected
  468.             EITEM    WTEXTPOPUPA_Name
  469.                         
  470.             EITEM    WPALETTEA_Colors
  471.             EITEM    WPALETTEA_Selected
  472.             EITEM    WPALETTEA_Offset
  473.             
  474.             EITEM    WGROUPA_BGPen
  475.             EITEM    WGROUPA_DockMinVisible
  476.             EITEM    WGROUPA_Styles
  477.             
  478.             EITEM    WLABELA_Styles
  479.                         
  480.             EITEM    WVECTORPOPUPA_Type
  481.             EITEM    WVECTORPOPUPA_Labels
  482.             EITEM    WVECTORPOPUPA_TextPlace
  483.             EITEM    WVECTORPOPUPA_Selected
  484.             
  485.             EITEM    WHIERARCHYA_Unused4
  486.             EITEM    WHIERARCHYA_ImageType
  487.             EITEM    WHIERARCHYA_ImageWidth
  488.             EITEM    WHIERARCHYA_Top
  489.             EITEM    WHIERARCHYA_List
  490.             EITEM    WHIERARCHYA_Selected
  491.             EITEM    WHIERARCHYA_Visible
  492.             EITEM    WHIERARCHYA_DoubleClick
  493.             EITEM    WHIERARCHYA_Unused2
  494.             EITEM    WHIERARCHYA_Unused3
  495.             EITEM    WHIERARCHYA_Unused5
  496.  
  497.             EITEM    WSLIDERA_Min
  498.             EITEM    WSLIDERA_Max
  499.             EITEM    WSLIDERA_Level
  500.  
  501.             EITEM    WTOGGLEA_Label
  502.  
  503.             EITEM    WLAYOUTA_RootGadget
  504.             EITEM    WLAYOUTA_Type
  505.             EITEM    WLAYOUTA_BorderLeft
  506.             EITEM    WLAYOUTA_BorderRight
  507.             EITEM    WLAYOUTA_BorderTop
  508.             EITEM    WLAYOUTA_BorderBottom
  509.             EITEM    WLAYOUTA_StackSwap
  510.             
  511.             EITEM    WARGSA_TextPen
  512.             EITEM    WARGSA_BackgroundPen
  513.             
  514. ;---------------------------------------------------------
  515.  
  516.             ENUM    WZRD_TagDummy+1000
  517.             
  518.             EITEM    WNODEA_Flags
  519.  
  520. WNF_SELECTED        EQU    1<<0
  521. WNF_TREE        EQU    1<<5
  522. WNF_AUTOMATIC        EQU    1<<6
  523. WNF_VISIBLE        EQU    1<<7
  524.  
  525. ;---------------------------------------------------------
  526.  
  527.             ENUM    WZRD_TagDummy+1100
  528.             
  529.             EITEM    WENTRYA_Type
  530.             EITEM    WENTRYA_TextPen
  531.             EITEM    WENTRYA_TextSPen
  532.             EITEM    WENTRYA_TextStyle
  533.             EITEM    WENTRYA_TextSStyle
  534.             EITEM    WENTRYA_TextString
  535.             EITEM    WENTRYA_TreeParentNode
  536.             EITEM    WENTRYA_TreeChilds
  537.             EITEM    WENTRYA_TreeString
  538.             EITEM    WENTRYA_TreePen
  539.             EITEM    WENTRYA_TreeSPen
  540.  
  541. WNE_TEXT        EQU    1
  542. WNE_TREE        EQU    3
  543.  
  544.             ENDC
  545.