Subversion Repositories Kolibri OS

;        call    get_event

        call    draw_dialog_shadow

.noshadow:

        popad

        push    dword [esp+8]

        push    dword [esp+8]

        call    DrawGenericBox

        xor     eax, eax

        ret     8

draw_dialog_shadow:

;       4 = £®à¨§®­â «ì­ë© à §¤¥«¨â¥«ì

;       5 = ä« ¦®ª

;       6 = ᯨ᮪

; ¤«ï ᯨ᪠: struct {listitem* curitemptr; unsigned numitems;

;               listitem *head; unsigned curitem;}* data;

; head = 㪠§ â¥«ì ­  ¯¥à¢ë© ®â®¡à ¦ ¥¬ë© í«¥¬¥­â,

; curitemptr = 㪠§ â¥«ì ­  ¢ë¤¥«¥­­ë© í«¥¬¥­â, curitem = ¥£® ¨­¤¥ªá ¢ ᯨ᪥ (®â 0)

; (£¤¥ struct listitem {listitem* next; listitem* prev; char text[];};)

;            ¤«ï ä« ¦ª  = ä« ¦®ª ãáâ ­®¢«¥­

        cmp     [ebx+dlgitemtemplate.type], 5

        jnz     @f

        cmp     al, 0x39

        jnz     @f

        xor     [ebx+dlgitemtemplate.flags], 10h

        jmp     .ret_draw

.nobtns2:

iglobal

align 4

label draw_functions dword

        dd      ManagerDlgProc.done_draw

        dd      draw_static_text

        dd      draw_button

        dd      draw_editbox

        dd      draw_h_separator

        dd      draw_checkbox

        dd      draw_listbox

draw_functions_num = ($ - draw_functions) / 4

endg

        push    eax

.ret2:

dlgitem_get_console_ptr:

        mov     eax, [ebx+dlgitemtemplate.x1]

        mov     edx, [ebx+dlgitemtemplate.y1]

        mov     ecx, eax

        add     eax, [ebp+dlgtemplate.x]

        add     edx, [ebp+dlgtemplate.y]

        jmp     get_console_ptr

draw_h_separator:

; à¨á㥬 £®à¨§®­â «ì­ë© à §¤¥«¨â¥«ì

        call    dlgitem_get_console_ptr

.scan:

        mov     al, 0xC7

        test    ecx, ecx

        js      @f

        mov     al, 0xB6

        cmp     ecx, [ebp+dlgtemplate.width]

        jz      @f

        mov     al, 0xC4

@@:

        stosb

        jz      .done

        inc     ecx

        inc     edi

        cmp     ecx, [ebx+dlgitemtemplate.x2]

        jb      .scan

.done:

        ret

draw_checkbox:

; à¨á㥬 ä« ¦®ª

        call    dlgitem_get_console_ptr

        test    byte [ebx+dlgitemtemplate.flags], 4

        jz      @f

        inc     eax

        mov     [cursor_x], eax

        mov     [cursor_y], edx

@@:

        mov     ah, [dialog_main_color]

        test    byte [ebp+dlgtemplate.flags], 2

        jz      @f

        mov     ah, [warning_main_color]

@@:

        mov     al, '['

        stosw

        mov     al, 'x'

        test    byte [ebx+dlgitemtemplate.flags], 10h

        jnz     @f

        mov     al, ' '

@@:

        stosw

        mov     al, ']'

        stosw

        mov     al, ' '

        stosw

        mov     ecx, [ebx+dlgitemtemplate.x2]

        sub     ecx, [ebx+dlgitemtemplate.x1]

        jb      .ret

        sub     ecx, 3

        jbe     .ret

        mov     esi, [ebx+dlgitemtemplate.data]

@@:

        lodsb

        test    al, al

        jz      .ret

        stosw

        loop    @b

.ret:

        ret

draw_listbox:

; à¨á㥬 ᯨ᮪

        call    dlgitem_get_console_ptr

        mov     edx, [ebx+dlgitemtemplate.data]

        mov     esi, [edx+8]

        mov     eax, [ebx+dlgitemtemplate.y2]

        sub     eax, [ebx+dlgitemtemplate.y1]

        push    eax

        push    eax

.0:

        test    esi, esi

        jz      .listdone

        push    esi edi

        push    edx

        or      edx, -1

        mov     ecx, [ebx+dlgitemtemplate.x2]

        sub     ecx, [ebx+dlgitemtemplate.x1]

        inc     ecx

        xor     eax, eax

@@:

        inc     edx

        cmp     byte [esi+8+edx], al

        jnz     @b

@@:

        cmp     ecx, edx

        jae     .text_draw

        mov     al, byte [ebx+dlgitemtemplate.flags]

        and     al, 3

        jz      .text_align_left

        cmp     al, 1

        jz      .text_align_center

; ⥪áâ ¢ë஢­¥­ ¢¯à ¢®

        mov     eax, edx

        sub     eax, ecx

        jmp     .text_draw

.text_align_center:

        mov     eax, edx

        sub     eax, ecx

        shr     eax, 1

        jmp     .text_draw

.text_align_left:

;        xor     eax, eax

.text_draw:

        pop     edx

        cmp     esi, [edx]

        lea     esi, [esi+8+eax]

        mov     ah, [dialog_selected_list_color]

        jz      @f

        mov     ah, [dialog_list_color]

@@:

        jecxz   .next

@@:

        lodsb

        test    al, al

        jz      @f

        stosw

        loop    @b

@@:

        mov     al, ' '

        rep     stosw

.next:

        pop     edi esi

        add     edi, [cur_width]

        add     edi, [cur_width]

        mov     esi, [esi]

        dec     dword [esp]

        jns     .0

.listdone:

        pop     eax

; ‹¨­¥©ª  ¯à®ªàã⪨

        pop     ecx

        inc     ecx

        mov     esi, [edx+4]

        cmp     ecx, esi

        jae     .noscrollbar

        sub     ecx, 2

        jbe     .noscrollbar

        mov     eax, [edx+12]

        mul     ecx

        div     esi

        push    eax

        mov     eax, [ebx+dlgitemtemplate.x2]

        add     eax, [ebp+dlgtemplate.x]

        mov     edx, [ebx+dlgitemtemplate.y1]

        add     edx, [ebp+dlgtemplate.y]

        call    get_console_ptr

        pop     edx

        inc     edx

        mov     al, 0x1E

        mov     ah, [dialog_scroll_list_color]

        mov     [edi], ax

        add     edi, [cur_width]

        add     edi, [cur_width]

.2:

        mov     al, 0xB1

        dec     edx

        jz      @f

        mov     al, 0xB0

@@:

        mov     [edi], ax

        add     edi, [cur_width]

        add     edi, [cur_width]

        loop    .2

        mov     al, 0x1F

        stosw

.noscrollbar:

        ret

listbox_key:

        mov     edx, [ebx+dlgitemtemplate.data]

        cmp     al, 0x48

        jz      .prev

        cmp     al, 0x50

        jz      .next

        cmp     al, 0x47

        jz      .home

        cmp     al, 0x4F

        jz      .end

        cmp     al, 0x51

        jz      .pgdn

        cmp     al, 0x49

        jz      .pgup

        ret

.next:

        call    .calc_last_line

        mov     eax, [edx]

        cmp     dword [eax], 0

        jz      @f

        call    .line_next

@@:

        mov     [edx], eax

        ret

.pgdn:

        call    .calc_last_line

        mov     eax, [edx]

        mov     ecx, [ebx+dlgitemtemplate.y2]

        sub     ecx, [ebx+dlgitemtemplate.y1]

.pgdnl:

        cmp     dword [eax], 0

        jz      @f

        call    .line_next

        loop    .pgdnl

@@:

        mov     [edx], eax

        ret

.prev:

        mov     eax, [edx]

        cmp     dword [eax+4], 0

        jz      @f

        call    .line_prev

@@:

        mov     [edx], eax

        ret

.pgup:

        mov     eax, [edx]

        mov     ecx, [ebx+dlgitemtemplate.y2]

        sub     ecx, [ebx+dlgitemtemplate.y1]

;        inc     ecx

.pgupl:

        cmp     dword [eax+4], 0

        jz      @f

        call    .line_prev

        loop    .pgupl

@@:

        mov     [edx], eax

        ret

.home:

        mov     eax, [edx]

@@:

        cmp     dword [eax+4], 0

        jz      @f

        mov     eax, [eax+4]

        jmp     @b

@@:

        mov     [edx], eax

        mov     [edx+8], eax

        and     dword [edx+12], 0

        ret

.end:

        mov     eax, [edx]

@@:

        cmp     dword [eax], 0

        jz      @f

        mov     eax, [eax]

        jmp     @b

@@:

        mov     [edx], eax

        mov     ecx, [ebx+dlgitemtemplate.y2]

        sub     ecx, [ebx+dlgitemtemplate.y1]

        jz      .e1

.e2:

        mov     eax, [eax+4]

        loop    .e2

.e1:

        mov     [edx+8], eax

        mov     eax, [edx+4]

        dec     eax

        mov     [edx+12], eax

        ret

.line_prev:

        cmp     eax, [edx+8]

        mov     eax, [eax+4]

        jnz     @f

        mov     [edx+8], eax

@@:

        dec     dword [edx+12]

        ret

.calc_last_line:

        mov     esi, [edx+8]

        mov     ecx, [ebx+dlgitemtemplate.y2]

        sub     ecx, [ebx+dlgitemtemplate.y1]

        jz      .clldone

@@:

        mov     esi, [esi]

        test    esi, esi

        jz      @f

        loop    @b

.clldone:

        ret

.line_next:

        cmp     eax, esi

        mov     eax, [eax]

        jnz     @f

        push    eax

        mov     eax, [edx+8]

        mov     eax, [eax]

        mov     [edx+8], eax

        pop     eax

        mov     esi, eax

@@:

        inc     dword [edx+12]

        ret

        ret

; int __stdcall ConfirmCancel(void);

; return value: 0 = the user is sure, nonzero = the user wants to continue

ConfirmCancel:

        push    YesOrNoBtn

        push    2

        push    ConfirmCancelMsg

        push    1

        push    aCancelled

        call    SayErrTitle

        test    eax, eax