proc   WinConverterDialogProc hWnd,msg,wParam,lParam
    push    ebx edi            ;Preserve as needed
    cmp     [msg],WM_COMMAND   ;Are there any commands?
    je      command            ;then deal with them
    cmp     [msg],WM_CLOSE     ;or is it "close"?
    je      close              ;so, do it!
    cmp     [msg],WM_INITDIALOG
    je      initdialog
    xor     eax,eax
    jmp     processed
command:
    cmp     [wParam],EN_UPDATE shl 16 + ID_WINDEC
    je      parseD             ;compare and jump accordingly
    cmp     [wParam],EN_UPDATE shl 16 + ID_WINHEX
    je      parseH             ;H-hexadecimal
    cmp     [wParam],EN_UPDATE shl 16 + ID_WINBIN
    je      parseB             ;B-binary
    jmp     processed          ;If defaults have been re-set
;<<<-c800----CODE TO UPDATE CELLS WHEN TYPED---------------->>>
parseD:                        ;Jump from above commands
    jmp     processed          ;we are finished
parseH:
    jmp     processed
parseB:
    jmp     processed
initdialog:
    push    [hWnd]
    pop     [hWinConverterDialog]
    invoke  GetDlgItem, [hWnd], ID_WINDEC;get a handle and use it
    mov     [hwindec], eax
    invoke  GetDlgItem, [hWnd], ID_WINBIN;get a handle and use it
    mov     [hwinbin], eax
    invoke  GetDlgItem, [hWnd], ID_WINHEX;get a handle and use it
    mov     [hwinhex], eax
    invoke  GetDlgItem, [hWnd], ID_WINEXP;get a handle and use it
    mov     [hwinexp], eax
    invoke  SendMessage, [hWnd], WM_SETFONT, _lf, TRUE

            invoke  SendMessage, [hwindec], EM_SETLIMITTEXT, 10, 0
            invoke  SendMessage, [hwinhex], EM_SETLIMITTEXT, 8, 0
            invoke  SendMessage, [hwinbin], EM_SETLIMITTEXT, 32, 0

        invoke  GetWindowLong, [hwindec], GWL_WNDPROC
        mov     [hwindec_proc], eax
        invoke  SetWindowLong, [hwindec], GWL_WNDPROC, WinConverterNewProc
        invoke  GetWindowLong, [hwinbin], GWL_WNDPROC
        mov     [hwinbin_proc], eax
        invoke  SetWindowLong, [hwinbin], GWL_WNDPROC, WinConverterNewProc
        invoke  GetWindowLong, [hwinhex], GWL_WNDPROC
        mov     [hwinhex_proc], eax
        invoke  SetWindowLong, [hwinhex], GWL_WNDPROC, WinConverterNewProc
        invoke  GetWindowLong, [hwinexp], GWL_WNDPROC
        mov     [hwinexp_proc], eax
        invoke  SetWindowLong, [hwinexp], GWL_WNDPROC, WinConverterNewProc

    mov     eax, dword TRUE
    jmp     processed
close:
    invoke  EndDialog,[hWnd],0 ;We only get here when closing
processed:
    pop     edi ebx            ;Put values back
    ret
endp

proc   WinConverterNewProc hWnd,msg,wParam,lParam
        mov     ecx, [hWnd]
        cmp     [msg], WM_KEYDOWN
        je      .wmkeydown
        cmp     [msg], WM_CHAR
        je      .wmchar

      .oldcall:
        cmp     ecx, [hwindec]
        jne     .cnt1
        mov     ebx, [hwindec_proc]
        jmp     .cnt_ok
      .cnt1:
        cmp     ecx, [hwinbin]
        jne     .cnt2
        mov     ebx, [hwinbin_proc]
        jmp     .cnt_ok
      .cnt2:
        cmp     ecx, [hwinhex]
        jne     .cnt3
        mov     ebx, [hwinhex_proc]
        jmp     .cnt_ok
      .cnt3:
        cmp     ecx, [hwinexp]
        jne     .cnt4
        mov     ebx, [hwinexp_proc]
        jmp     .cnt_ok
      .cnt4:

      .cnt_ok:
        invoke  CallWindowProc, ebx, [hWnd], [msg], [wParam], [lParam]
        ret

  .wmkeydown:
        cmp     [wParam], VK_F1
        je      .tasto_F1
        cmp     [wParam], VK_RETURN
        je      .tasto_escape
;        cmp     [wParam], VK_ESCAPE
;        je      .tasto_escape
        stdcall _Strs, [wParam], __Hex, Buff1
        invoke  MessageBox, NULL, Buff1, AppName, NULL

        jmp    .oldcall

      .tasto_F1:
        invoke  MessageBox, NULL, AppName, AppName, NULL
        jmp    .oldcall

      .tasto_escape:
        invoke  MessageBox, NULL, AppName, AppName, NULL
        invoke  SetFocus, [hAsmEditwin]
        jmp    .oldcall
  .wmchar:
        invoke  MessageBox, NULL, AppName, AppName, NULL

        cmp     [wParam], VK_ESCAPE
        je      .tasto_escape
        jmp    .oldcall
    

  dialog WinConterdterD,'WinConterter', 560,234,240,80,WS_CAPTION+WS_POPUP+DS_MODALFRAME+WS_EX_TOOLWINDOW ;WS_SYSMENU+
       dialogitem 'STATIC',     'Dec:',         ID_WINDECstatic,0,7,22,12,WS_VISIBLE+ES_CENTER
       dialogitem 'STATIC',     'Bin:',         ID_WINBINstatic,0,22,22,12,WS_VISIBLE+ES_CENTER
       dialogitem 'STATIC',     'Hex:',         ID_WINHEXstatic,0,37,22,12,WS_VISIBLE+ES_CENTER
       dialogitem 'STATIC',     'Exp:',         ID_WINEXPstatic,0,52,22,12,WS_VISIBLE+ES_CENTER
       dialogitem 'EDIT',       '',             ID_WINDEC,22,5,178,12,WS_VISIBLE+WS_BORDER+WS_TABSTOP+ES_AUTOHSCROLL+ES_UPPERCASE
       dialogitem 'EDIT',       '',             ID_WINBIN,22,20,178,12,WS_VISIBLE+WS_BORDER+WS_TABSTOP+ES_AUTOHSCROLL+ES_UPPERCASE
       dialogitem 'EDIT',       '',             ID_WINHEX,22,35,178,12,WS_VISIBLE+WS_BORDER+WS_TABSTOP+ES_AUTOHSCROLL+ES_UPPERCASE
       dialogitem 'EDIT',       '',             ID_WINEXP,22,52,206,12,WS_VISIBLE+WS_BORDER+WS_TABSTOP+ES_AUTOHSCROLL+ES_UPPERCASE
  enddialog