Linguagem C/C++ Plano de Fundo

#include <windows.h>

LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM);

#define BTN_AP 1

static HWND versiculo;

static char Apocalipse17_11[200] = "E a besta, que era e ja não é, é ela \ntambém o oitavo, e é dos sete, e vai à perdição. \nApocalipse 17:11";

int WINAPI WinMain(HINSTANCE hCopia, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow) {
    static TCHAR szAppName[] = TEXT("Fundo Cinzento");
    HWND         hwnd;
    MSG          msg;
    WNDCLASS     wndclass;
    wndclass.style         = CS_HREDRAW | CS_VREDRAW;
    wndclass.lpfnWndProc   = WndProc;
    wndclass.cbClsExtra    = 0;
    wndclass.cbWndExtra    = 0;
    wndclass.hInstance     = hCopia;
    wndclass.hIcon         = LoadIcon(NULL, IDI_APPLICATION);
    wndclass.hCursor       = LoadCursor(NULL, IDC_ARROW);
    wndclass.hbrBackground = (HBRUSH) WHITE_BRUSH;
    wndclass.lpszMenuName  = NULL;
    wndclass.lpszClassName = szAppName;
    if(!RegisterClass(&wndclass)) {
        MessageBox(NULL, TEXT("This program requires Windows NT!"),
                   szAppName, MB_ICONERROR);
        return 0;
    }
    hwnd = CreateWindow(
        szAppName, TEXT("Plano de Fundo"), WS_OVERLAPPEDWINDOW,
        CW_USEDEFAULT, CW_USEDEFAULT, 500, 300,
        NULL, NULL, hCopia, NULL
    );
    ShowWindow(hwnd, iCmdShow);
    UpdateWindow(hwnd);
    while(GetMessage(&msg, NULL, 0, 0)) {
        TranslateMessage(&msg);
        DispatchMessage (&msg);
    }
    return msg.wParam;
}

LRESULT CALLBACK WndProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam) {
    static HPALETTE hPalette;
    static int      cxClient, cyClient;
    HBRUSH          hBrush;
    HDC             hdc;
    int             i;
    LOGPALETTE    * plp;
    PAINTSTRUCT     ps;
    RECT            rect;
    switch(message) {
        case WM_CREATE:
            plp=malloc(sizeof(LOGPALETTE)+64*sizeof(PALETTEENTRY));
            plp->palVersion    = 0x0300;
            plp->palNumEntries = 65;
            for(i = 0; i < 65; i++) {
                plp->palPalEntry[i].peRed=(BYTE) min(255, 4 * i);
                plp->palPalEntry[i].peGreen=(BYTE) min(255, 4*i);
                plp->palPalEntry[i].peBlue =(BYTE) min(255, 4*i);
                plp->palPalEntry[i].peFlags = 0;
            }
            hPalette = CreatePalette(plp);
            free(plp);

            versiculo = CreateWindow(
                TEXT("static"), TEXT(""), WS_VISIBLE | WS_CHILD,
                10, 80, 280, 50,
                hwnd, NULL, NULL, NULL
            );
            CreateWindow(
                TEXT("button"), TEXT("Apocalipse17_11"), WS_VISIBLE | WS_CHILD,
                10, 180, 140, 20,
                hwnd, (HMENU) BTN_AP, NULL, NULL
            );
            return 0;
        case WM_SIZE:
            cxClient = LOWORD(lParam);
            cyClient = HIWORD(lParam);
            return 0;
        case WM_PAINT:
            hdc = BeginPaint(hwnd, &ps);
            SelectPalette(hdc, hPalette, FALSE);
            RealizePalette(hdc);
            for(i = 0; i < 65; i++) {
                rect.left   = i * cxClient / 64;
                rect.top    = 0;
                rect.right  = (i + 1) * cxClient / 64;
                rect.bottom = cyClient;
                hBrush = CreateSolidBrush(PALETTEINDEX(i));
                FillRect(hdc, &rect, hBrush);
                DeleteObject(hBrush);
            }
            EndPaint(hwnd, &ps);
            return 0;
        case WM_QUERYNEWPALETTE:
            if(!hPalette)
                return FALSE;
            hdc = GetDC(hwnd);
            SelectPalette(hdc, hPalette, FALSE);
            RealizePalette(hdc);
            InvalidateRect(hwnd, NULL, FALSE);
            ReleaseDC (hwnd, hdc);
            return TRUE;
        case WM_PALETTECHANGED:
            if(!hPalette || (HWND) wParam == hwnd)
                break;
            hdc = GetDC (hwnd);
            SelectPalette(hdc, hPalette, FALSE);
            RealizePalette(hdc);
            UpdateColors(hdc);
            ReleaseDC(hwnd, hdc);
            return 0;

        case WM_COMMAND:
            if(LOWORD(wParam)==BTN_AP) {
                SetWindowText(versiculo, Apocalipse17_11);
            }
            return 0;

        case WM_DESTROY:
            PostQuitMessage(0);
            return 0;
    }
    return DefWindowProc(hwnd, message, wParam, lParam);
}