V C++ Program for multiple color window

#include<Windows.h>
long _stdcall myfunc(HWND,UINT,UINT,long);
long _stdcall myf(HWND,UINT,UINT,long);
WNDCLASSA a;
int _stdcall WinMain(HINSTANCE i,HINSTANCE j,char *k,int l)
{
 HWND h;
 MSG m;
 a.hInstance=i;
 a.lpszClassName="my";
 a.lpfnWndProc=myfunc;
 a.hbrBackground=(HBRUSH)CreateSolidBrush(RGB(70,10,50));
 RegisterClassA(&a);
 h=CreateWindowA("my","Andrian",WS_OVERLAPPEDWINDOW,150,200,250,300,0,0,i,0);
 ShowWindow(h,l);
 a.hInstance=i;
 a.lpszClassName="mt";
 a.lpfnWndProc=myf;
 a.hbrBackground=(HBRUSH)CreateSolidBrush(RGB(100,100,250));
 RegisterClassA(&a);
 h=CreateWindowA("mt","Andrian",WS_OVERLAPPEDWINDOW,150,200,250,300,0,0,i,0);
 ShowWindow(h,l);
 while(GetMessage(&m,0,0,0))
 DispatchMessage(&m);
 return 0;
}
long _stdcall myfunc(HWND w,UINT x,UINT y,long z)
{
 switch(x)
 {
 case WM_LBUTTONDOWN:
   break;
  case WM_LBUTTONUP:
   break;
 case WM_DESTROY:
  PostQuitMessage(0);
  break;
 default:
  return DefWindowProcA(w,x,y,z);
 }
 return 0L;
}
long _stdcall myf(HWND w1,UINT x1,UINT y1,long z1)
{
 switch(x1)
 {
 case WM_LBUTTONDOWN:
   break;
  case WM_LBUTTONUP:
   break;
 case WM_DESTROY:
  PostQuitMessage(0);
  break;
 default:
  return DefWindowProcA(w1,x1,y1,z1);
 }
 return 0L;
}
  

V C++ Program For Number Manipulation(Armstrong, Perfect, Prime, FIBONOCCI) Single Program

#include "resource.h"
#include <Windows.h>
long _stdcall dlg(HWND,UINT,UINT,long);
long _stdcall myfunc(HWND,UINT,UINT,long);

WNDCLASSA a;
HINSTANCE h;
int _stdcall WinMain(HINSTANCE i,HINSTANCE j,char *k,int l)
{
    HWND h;
    MSG m;
    a.lpszClassName="my";
    a.hInstance=i;
    a.lpfnWndProc=myfunc;
    a.hbrBackground=(HBRUSH)CreateSolidBrush(RGB(234,67,90));
    RegisterClassA(&a);
    h=CreateWindowA("my","Fibonocci",WS_OVERLAPPEDWINDOW,10,10,200,300,0,0,i,0);
    ShowWindow(h,3);
    while(GetMessage(&m,0,0,0))
        DispatchMessage(&m);
    return 0;
}
long _stdcall myfunc(HWND w,UINT x,UINT y,long z)
{
    switch(x)
    {
    case WM_LBUTTONDOWN:
        DialogBoxW(h,MAKEINTRESOURCE(dIALOG1),w,(DLGPROC)dlg);
        break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
     default:
        return DefWindowProcA(w,x,y,z);
    }
    return 0L;
}
long _stdcall dlg(HWND w1,UINT x1,UINT y1,long z1)
{
    int i,t,n1,s=0,d;
    long int a,b,c;
    char st[20];
    switch(x1)
    {
    case WM_COMMAND:
        {
        switch(y1)
        {
        case PERFECT:
             n1=GetDlgItemInt(w1,EDIT1,NULL,true);
             for(i=1;i<=n1;i++)
             {
                 t=i;
                 s=0;
                 for(int j=1;j<i;j++)
                 {
                     if(i%j==0)
                     {
                        s=s+j;
                     }
                 }
                 if(t==s)
                 {
                     wsprintfA(st,"%d",s);
                     SendDlgItemMessageA(w1,LIST1,LB_ADDSTRING,0,(DWORD)(LPSTR)st);
                 }
             }
            break;
         case ARMSTRONG:
            n1=GetDlgItemInt(w1,EDIT1,NULL,true);
            for(i=1;i<=n1;i++)
             {
                  t=i;
                  s=0;
                  while(t>0)
                  {
                      d=t%10;
                      s=s+d*d*d;
                      t=t/10;
                  }
                  if(s==i)
                  {
                      wsprintfA(st,"%d",i);
                    SendDlgItemMessageA(w1,LIST2,LB_ADDSTRING,0,(DWORD)(LPSTR)st);
                  }
                     
             }
            break;
         case PRIME:
             n1=GetDlgItemInt(w1,EDIT1,NULL,true);
             for(i=2;i<=n1;i++)
             {
                  t=0;
                  for( int j=2;j<=i/2;j++)
                  {
                   if(i%j==0)
                   {
                       t=1;
                   }
                  }
                   if(t==0)
                   {
                     wsprintfA(st,"%d",i);
                    SendDlgItemMessageA(w1,LIST3,LB_ADDSTRING,0,(DWORD)(LPSTR)st);
                   }
           }
             break;
        case FIBONOCCI:
             n1=GetDlgItemInt(w1,EDIT1,NULL,true);
             a=-1;
             b=1;
             for(i=1;i<=n1;i++)
             {
                 c=a+b;
                 wsprintfA(st,"%ld",c);
                 SendDlgItemMessageA(w1,LIST4,LB_ADDSTRING,0,(DWORD)(LPSTR)st);
                 a=b;
                 b=c;
             }
             break;
         case EXIT:
             EndDialog(w1,false);
             break;
        }
        }
        break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
    default:
        return DefWindowProcA(w1,x1,y1,z1);
   
    }                     
    return 0L;
}

V C++ Program For Number System Convertion Binary 2 Decimal

#include "resource.h"
#include <Windows.h>
#include <math.h>
long _stdcall dlg(HWND,UINT,UINT,long);
long _stdcall myfunc(HWND,UINT,UINT,long);

WNDCLASSA a;
HINSTANCE h;
int _stdcall WinMain(HINSTANCE i,HINSTANCE j,char *k,int l)
{
    HWND h;
    MSG m;
    a.lpszClassName="my";
    a.hInstance=i;
    a.lpfnWndProc=myfunc;
    a.hbrBackground=(HBRUSH)CreateSolidBrush(RGB(234,67,90));
    RegisterClassA(&a);
    h=CreateWindowA("my","Decimal",WS_OVERLAPPEDWINDOW,10,10,200,300,0,0,i,0);
    ShowWindow(h,3);
    while(GetMessage(&m,0,0,0))
        DispatchMessage(&m);
    return 0;
}
long _stdcall myfunc(HWND w,UINT x,UINT y,long z)
{
    switch(x)
    {
    case WM_LBUTTONDOWN:
        DialogBoxW(h,MAKEINTRESOURCE(Dialog1),w,(DLGPROC)dlg);
        break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
     default:
        return DefWindowProc(w,x,y,z);
    }
    return 0L;
}
long _stdcall dlg(HWND w1,UINT x1,UINT y1,long z1)
{
    char st[20];
    int t,d,i,n1,n2,o,o1;
    double b,s;
    switch(x1)
    {
    case WM_COMMAND:
        {
        switch(y1)
        {
         case DECIMAL:
             n1=GetDlgItemInt (w1,EDIT1,NULL,true);
             t=n1;
             i=0;
             s=0;
             b=2;
             while(t!=0)
             {
                 d=t%10;
                 s=s+(d*pow(b,i));
                 i++;
                 t=t/10;
             }
             SetDlgItemInt(w1,EDIT2,s,true);
             break;
         case EXIT:             EndDialog(w1,false);
             break;
        }
        }
        break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
    default:
        return DefWindowProc(w1,x1,y1,z1);
        break;
    }                     
    return 0L;
}