ORG 0
BITS 32
; ---------------------------------------------------------------------------- ;
  STACK_SIZE          equ 256

 ;  Charset specifiers for DrawText
  DT_CP866_6X9        equ 0x00000000
  DT_CP866_8X16       equ 0x10000000
  DT_UTF_16LE_8X16    equ 0x20000000
  DT_UTF_8_8X16       equ 0x30000000

 ;  Fill styles for DrawText
  DT_FILL_TRANSPARENT equ 0x00000000
  DT_FILL_OPAQUE      equ 0x40000000

 ;  Draw zero terminated string for DrawText
  DT_ZSTRING          equ 0x80000000

 ;  Size multipliers for DrawText
  DT_X1               equ  0x0000000
  DT_X2               equ  0x1000000
  DT_X3               equ  0x2000000
  DT_X4               equ  0x3000000
  DT_X5               equ  0x4000000
  DT_X6               equ  0x5000000
  DT_X7               equ  0x6000000
  DT_X8               equ  0x7000000

 ; Colors
  COLOR_BLUE          equ 0x000000FF
  COLOR_RED           equ 0x00FF0000
  COLOR_GREEN         equ 0x0000FF00
  COLOR_WHITE         equ 0x00FFFFFF
  COLOR_BLACK         equ 0x00000000

 ; Event mask constants
  EM_REDRAW           equ 0b1
  EM_KEY              equ 0b10
  EM_BUTTON           equ 0b100
  EM_MOUSE            equ 0b100000
; ---------------------------------------------------------------------------- ;
MENUET01              db 'MENUET01'
version               dd 1
program.start         dd START
program.end           dd END
program.memory        dd END + STACK_SIZE
program.stack         dd END + STACK_SIZE
program.params        dd 0
program.path          dd 0
; ---------------------------------------------------------------------------- ;
sz_caption            db "test",0
sz_test               db 'Qwerty Uiop Asdfg Hjkl Zxcv Bn',0
; ---------------------------------------------------------------------------- ;
START:
; SetEventMask
        mov    eax, 40
        mov    ebx, EM_REDRAW + EM_BUTTON
        int    64
on_redraw:
; BeginDraw
        mov    eax, 12
        mov    ebx, 1
        int    64
; DrawWindow
        xor    eax, eax
        mov    ebx, 200
        mov    ecx, 100
        mov    edx, 0x34FFFFFF
        mov    edi, sz_caption
        int    64
; DrawText
        mov    eax, 4
        mov    ebx, 10                                                 ;[x]
        shl    ebx, 16
        add    ebx, 10                                                 ;[y]
        mov    ecx, DT_CP866_6X9 | DT_X7 | DT_FILL_OPAQUE | DT_ZSTRING ;[Flags]
        or     ecx, COLOR_RED                                          ;[ForeColor]
        mov    edx, sz_test                                            ;[Text]
        mov    edi, COLOR_GREEN                                        ;[BackColor]
        mov    esi, 0                                                  ;[Count]
        int    64
; EndDraw
        mov    eax, 12
        mov    ebx, 2
        int    64
; WaitEvent
        mov    eax, 10
        int    64
        dec    eax
        jz     on_redraw
; ThreadTerminate
        or     eax, -1
        int    64
; ---------------------------------------------------------------------------- ;
END: