use32
     org  0x0

; HEADER ======================================================================
     db  'MENUET01'
     dd  0x01
     dd  START
     dd  I_END
     dd  0x7000
     dd  0x7000
     dd  0x0
     dd  0x0

START:
; EVENT =======================================================================
red:
       call draw_window
still:
       mov     eax,10                        ; функция 10 - ждать события
       int     0x40                          ; прерывание (вызов функции)    

       cmp     eax,1                         ; перерисовать окно ?
       je      red                           ; если да - на метку red
       cmp     eax,2                         ; нажата клавиша ?
       je      key                           ; если да - на key
       cmp     eax,3                         ; нажата кнопка ?
       je      button                        ; если да - на button
       jmp     still                         ; если другое событие - в начало цикла
;end_still

key:                    ; нажата клавиша на клавиатуре
       mcall   2                             ; функция 2 - считать код символа (в ah)
       jmp     still                         ; вернуться к началу цикла
;end_key

button:
       mcall   17                            ; 17 - получить идентификатор нажатой кнопки
       cmp     ah, 1                         ; если нажата кнопка с номером 1,
       jz      bexit                         ; выходим
       jmp     still
     bexit:
       mcall -1                    ; иначе конец программы
;end_button

; DRAW ========================================================================
draw_window:
       mov     eax,12                        ; функция 12: означает, что будет рисоваться окно
       mov     ebx,1                         ; 1,начало рисования
       int     0x40                          ; Прерывание

       mov     eax,48                        ; Функция 48 - стили отображения окон
       mov     ebx,3                         ; Подфункция 3 - получить стандартные цвета окон.
       mov     ecx,sc                        ; Указатель на буфер размером edx байт, под структуру
       mov     edx,sizeof.system_colors      ; Размер таблицы цветов (должен быть 40 байт)
       int     0x40                          ; Прерывание

       mov     eax,48                        ; Функция 48 - стили отображения окон.
       mov     ebx,4                         ; Подфункция 4 - возвращает eax = высота скина.
       int     0x40                          ; Прерывание
       mov     ecx,eax                       ; Запоминаем высоту скина

       xor     eax,eax                       ; Очищаем eax (mov eax,0) (Функция 0)
       mov     ebx,200 shl 16+160            ; [координата по оси x]*65536 + [размер по оси x]
       add     ecx,200 shl 16+60             ; Высота скина + [координата по y]*65536 + [размер по y]
       mov     edx,[sc.work]                 ; Видимо стиль окна по дефолту
       or      edx,0x34000000                ; Или окно со скином фиксированных размеров
       mov     edi,title                     ; Заголовок окна
       int     0x40                          ; Прерывание

       mov     eax,12                        ; функция 12: означает, что будет рисоваться окно
       mov     ebx,2                         ; 1,начало рисования
       int     0x40                          ; Прерывание

       ret

; DATA ========================================================================
       sc           system_colors
       title        db 'DEMO REC',0

I_END: