OpenWindowTagList EQU -606
move.l d0,MainEditWindowH+4
move.l _IntuitionBase,a6
suba.l a0,a0
lea.l MainEditWindowWindowTags,a1
jsr OpenWindowTagList(a6)
move.l d0,MainEditWindowWnd
tst.l d0
beq MainEditWindowWError ;* We are failing here on MorphOS but we pass on AmigaOS
XDEF MainEditWindowWindowTags
MainEditWindowWindowTags:
DC.L $80000093,1
MainEditWindowL:
DC.L $80000064,0
MainEditWindowT:
DC.L $80000065,0
MainEditWindowW:
DC.L $80000066,0
MainEditWindowH:
DC.L $80000067,0
DC.L $8000006A,$0040037E
DC.L $8000006B,$0000123F
DC.L $8000006E,MainEditWindowWTitle
DC.L $8000006F,MainEditWindowSTitle
DC.L $80000072,92
DC.L $80000073,65
DC.L $80000074,640
DC.L $80000075,256
DC.L $00000000
MainEditWindowWTitle:
DC.B 'Untitled',0
CNOP 0,2
MainEditWindowSTitle:
DC.B 'TextEngine V5.2',0
CNOP 0,2
DC.L $80000074,640
DC.L $80000075,256
XDEF MainEditWindowWindowTags
MainEditWindowWindowTags:
DC.L $80000093,1 #define WA_NewLookMenus (WA_Dummy + 0x30)
MainEditWindowL:
DC.L $80000064,0 #define WA_Left (WA_Dummy + 0x01)
MainEditWindowT:
DC.L $80000065,0 #define WA_Top (WA_Dummy + 0x02)
MainEditWindowW:
DC.L $80000066,0 #define WA_Width (WA_Dummy + 0x03)
MainEditWindowH:
DC.L $80000067,0 #define WA_Height (WA_Dummy + 0x04)
DC.L $8000006A,$0040037E #define WA_IDCMP (WA_Dummy + 0x07)
DC.L $8000006B,$0000123F #define WA_Flags (WA_Dummy + 0x08)
DC.L $8000006E,MainEditWindowWTitle #define WA_Title (WA_Dummy + 0x0B)
DC.L $8000006F,MainEditWindowSTitle #define WA_ScreenTitle (WA_Dummy + 0x0C)
DC.L $80000072,92 #define WA_MinWidth (WA_Dummy + 0x0F)
DC.L $80000073,65 #define WA_MinHeight (WA_Dummy + 0x10)
DC.L $80000074,640 #define WA_MaxWidth (WA_Dummy + 0x11)
DC.L $80000075,256 #define WA_MaxHeight (WA_Dummy + 0x12)
DC.L $00000000
WA_IDCMP $0040037E
10000000000001101111110
#define IDCMP_NEWSIZE 0x00000002L
#define IDCMP_REFRESHWINDOW 0x00000004L
#define IDCMP_MOUSEBUTTONS 0x00000008L
#define IDCMP_MOUSEMOVE 0x00000010L
#define IDCMP_GADGETDOWN 0x00000020L
#define IDCMP_GADGETUP 0x00000040L
#define IDCMP_MENUPICK 0x00000100L
#define IDCMP_CLOSEWINDOW 0x00000200L
#define IDCMP_ACTIVEWINDOW 0x00040000L
WA_Flags $0000123F
1001000111111
#define WFLG_SIZEGADGET 0x00000001L /* include sizing system-gadget? */
#define WFLG_DRAGBAR 0x00000002L /* include dragging system-gadget? */
#define WFLG_DEPTHGADGET 0x00000004L /* include depth arrangement gadget? */
#define WFLG_CLOSEGADGET 0x00000008L /* include close-box system-gadget? */
#define WFLG_SIZEBRIGHT 0x00000010L /* size gadget uses right border */
#define WFLG_SIZEBBOTTOM 0x00000020L /* size gadget uses bottom border */
#define WFLG_REPORTMOUSE 0x00000200L /* to hear about every mouse move */
#define WFLG_ACTIVATE 0x00001000L /* when Window opens, it's Active */
DC.L $80000074,640
DC.L $80000075,256