home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 45 / cda45.iso / VNULabs / CursoProg / test.c next >
Encoding:
C/C++ Source or Header  |  2000-03-30  |  7.6 KB  |  250 lines
  1. // ============================================================
  2. //   LeaRNWaRe code by CROM / Spanish  Lords 
  3. //                            - since 1993 -
  4. //
  5. //   Objetivo   : Ejemplillo de rotaciones.
  6. //   Autor      : Pedro Ant≤n Alonso. crom@ergos.es
  7. //   Plataforma : Windows 95 / NT
  8. //   Compilador : Visual C++ 6.0
  9. //   
  10. // ============================================================
  11.  
  12. #include <windows.h>
  13. #include <stdlib.h>
  14. #include <math.h>
  15.  
  16. int cxClient; // Area cliente
  17. int cyClient;
  18.  
  19. float fAngleA; // Angulos de giro sobre los ejes X,Y,Z
  20. float fAngleB;
  21. float fAngleC;
  22.  
  23. typedef struct // Definicion de un punto en 3D.
  24. { 
  25.   float x;
  26.   float y;
  27.   float z;
  28. } tPunto3D;
  29.  
  30. // Coordenadas del cubo que vamos a pintar.
  31. tPunto3D Punto1,Punto2,Punto3,Punto4;
  32. tPunto3D Punto5,Punto6,Punto7,Punto8;
  33.  
  34. LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM);
  35. void             DibujaTodo (HWND);
  36. void             CalculaPuntos ();
  37. tPunto3D         RotaPuntos (tPunto3D Punto);
  38.  
  39. //
  40. // No comento nada de este trozo... 
  41. // ... es siempre igual: Register, Create, Show y Update ;)
  42. //
  43. int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
  44.                     PSTR szCmdLine, int iCmdShow)
  45. {
  46.   static char szAppName[] = "Algo de 3D" ;
  47.   HWND        hwnd ;
  48.   MSG         msg ;
  49.   WNDCLASSEX  wndclass ;
  50.  
  51.   wndclass.cbSize        = sizeof (wndclass);
  52.   wndclass.style         = CS_HREDRAW | CS_VREDRAW;
  53.   wndclass.lpfnWndProc   = WndProc;
  54.   wndclass.cbClsExtra    = 0;
  55.   wndclass.cbWndExtra    = 0;
  56.   wndclass.hInstance     = hInstance;
  57.   wndclass.hIcon         = LoadIcon (NULL, IDI_APPLICATION);
  58.   wndclass.hCursor       = LoadCursor (NULL, IDC_ARROW);
  59.   wndclass.hbrBackground = (HBRUSH) GetStockObject (WHITE_BRUSH);
  60.   wndclass.lpszMenuName  = NULL;
  61.   wndclass.lpszClassName = szAppName;
  62.   wndclass.hIconSm       = LoadIcon (NULL, IDI_APPLICATION);
  63.  
  64.   RegisterClassEx (&wndclass) ;
  65.  
  66.   hwnd = CreateWindow (szAppName, "Rotando un Cubo en 3D",
  67.                        WS_OVERLAPPEDWINDOW,
  68.                        CW_USEDEFAULT, CW_USEDEFAULT,
  69.                        CW_USEDEFAULT, CW_USEDEFAULT,
  70.                        NULL, NULL, hInstance, NULL);
  71.  
  72.   ShowWindow (hwnd, iCmdShow);
  73.   UpdateWindow (hwnd);
  74.   if(!SetTimer (hwnd,0x1010,20,NULL)) return FALSE;
  75.  
  76.   // Trata  los mensajes... o pinta mis lineas.
  77.   while (TRUE)
  78.   {
  79.     if (PeekMessage (&msg, NULL, 0, 0, PM_REMOVE))
  80.     {
  81.       if (msg.message == WM_QUIT) break;
  82.       TranslateMessage (&msg);
  83.       DispatchMessage (&msg);
  84.     }
  85.   }
  86.   return msg.wParam;
  87. }
  88.  
  89.  
  90. //
  91. // El bucle procesador de mensajes.
  92. //
  93. LRESULT CALLBACK WndProc (HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam)
  94. {
  95.   switch (iMsg)
  96.   {
  97.     case WM_SIZE:    cxClient = LOWORD (lParam);
  98.                      cyClient = HIWORD (lParam);
  99.                      CalculaPuntos();
  100.                      return 0 ;
  101.  
  102.     case WM_DESTROY: PostQuitMessage (0);
  103.                      return 0;
  104.     case WM_TIMER:   DibujaTodo (hwnd);
  105.                      fAngleA=fAngleA+0.1;
  106.                      fAngleB=fAngleA+0.2;
  107.                      fAngleC=fAngleA+0.13;
  108.                      return 0;
  109.   }
  110.   return DefWindowProc (hwnd, iMsg, wParam, lParam);
  111. }
  112.  
  113. //
  114. // Pintaaaaaaaaaaaaaaaaaa.
  115. //
  116. void DibujaTodo (HWND hwnd)
  117. {
  118.   HPEN     hLapiz;
  119.   HPEN     hLapizCubo;
  120.   HDC      hdc;
  121.   HBRUSH   hBrocha;
  122.   tPunto3D Punto1R,Punto2R,Punto3R,Punto4R;
  123.   tPunto3D Punto5R,Punto6R,Punto7R,Punto8R;
  124.   
  125.   // Comprueba el area cliente.
  126.   if (cxClient == 0 || cyClient == 0) return;
  127.  
  128.   // Coje el contexto de dispositivo.
  129.   hdc = GetDC (hwnd);
  130.  
  131.   // Crea la brocha.
  132.   hBrocha= (HBRUSH) GetStockObject (WHITE_BRUSH);
  133.   // Selecciona la brocha.
  134.   SelectObject (hdc, hBrocha);
  135.   // BORRA la pantalla.
  136.   Rectangle (hdc, 0,0,cxClient,cyClient);
  137.  
  138.   // Crea un lapicero negro y otro verde
  139.   hLapiz     = CreatePen (PS_SOLID,3,RGB(0,0,0));
  140.   hLapizCubo = CreatePen (PS_SOLID,3,RGB(0,128,0));
  141.   // Selecciona el lapicero negro.
  142.   SelectObject (hdc, hLapiz);
  143.   // Pintamos los ejes
  144.   MoveToEx (hdc, cxClient/2, cyClient/2, NULL);
  145.   LineTo   (hdc, cxClient, cyClient/2);
  146.   MoveToEx (hdc, cxClient/2, cyClient/2, NULL);
  147.   LineTo   (hdc, cxClient/2, 0);
  148.   MoveToEx (hdc, cxClient/2, cyClient/2, NULL);
  149.   LineTo   (hdc, 0, cyClient);
  150.  
  151.   // Rota el cubo alrededor de XYZ
  152.   Punto1R=RotaPuntos (Punto1);
  153.   Punto2R=RotaPuntos (Punto2);
  154.   Punto3R=RotaPuntos (Punto3);
  155.   Punto4R=RotaPuntos (Punto4);
  156.   Punto5R=RotaPuntos (Punto5);
  157.   Punto6R=RotaPuntos (Punto6);
  158.   Punto7R=RotaPuntos (Punto7);
  159.   Punto8R=RotaPuntos (Punto8);
  160.   
  161.   // Selecciona el lapicero verde.
  162.   SelectObject (hdc, hLapizCubo);
  163.   // El trozo de cubo que puedo pintar sin levantar el lapiz :)
  164.   MoveToEx (hdc, (cxClient/2)+Punto1R.x, (cyClient/2)+Punto1R.y, NULL);
  165.   LineTo   (hdc, (cxClient/2)+Punto2R.x, (cyClient/2)+Punto2R.y);
  166.   LineTo   (hdc, (cxClient/2)+Punto3R.x, (cyClient/2)+Punto3R.y);
  167.   LineTo   (hdc, (cxClient/2)+Punto4R.x, (cyClient/2)+Punto4R.y);
  168.   LineTo   (hdc, (cxClient/2)+Punto1R.x, (cyClient/2)+Punto1R.y);
  169.   LineTo   (hdc, (cxClient/2)+Punto5R.x, (cyClient/2)+Punto5R.y);
  170.   LineTo   (hdc, (cxClient/2)+Punto6R.x, (cyClient/2)+Punto6R.y);
  171.   LineTo   (hdc, (cxClient/2)+Punto7R.x, (cyClient/2)+Punto7R.y);
  172.   LineTo   (hdc, (cxClient/2)+Punto8R.x, (cyClient/2)+Punto8R.y);
  173.   LineTo   (hdc, (cxClient/2)+Punto5R.x, (cyClient/2)+Punto5R.y);
  174.   // ... y las diagonales.
  175.   MoveToEx (hdc, (cxClient/2)+Punto2R.x, (cyClient/2)+Punto2R.y, NULL);
  176.   LineTo   (hdc, (cxClient/2)+Punto6R.x, (cyClient/2)+Punto6R.y);
  177.   MoveToEx (hdc, (cxClient/2)+Punto3R.x, (cyClient/2)+Punto3R.y, NULL);
  178.   LineTo   (hdc, (cxClient/2)+Punto7R.x, (cyClient/2)+Punto7R.y);
  179.   MoveToEx (hdc, (cxClient/2)+Punto4R.x, (cyClient/2)+Punto4R.y, NULL);
  180.   LineTo   (hdc, (cxClient/2)+Punto8R.x, (cyClient/2)+Punto8R.y);
  181.   
  182.   // Devuelve el contexto de dispositivo.
  183.   ReleaseDC (hwnd, hdc);
  184.   // Destruye el lapiz.
  185.   DeleteObject (hBrocha);
  186.   DeleteObject (hLapiz);
  187.   DeleteObject (hLapizCubo);
  188. }     
  189.  
  190. //
  191. // Calcula mi cubo ;)
  192. //
  193. void CalculaPuntos ()
  194. {
  195.   int      iLadoCubo;
  196.  
  197.   // Vamos a los puntos:
  198.   iLadoCubo= cxClient/8;
  199.   // Delante izqda arriba
  200.   Punto1.x = (float)-iLadoCubo;
  201.   Punto1.y = (float) iLadoCubo;
  202.   Punto1.z = (float) iLadoCubo;
  203.     // Delante drcha arriba
  204.   Punto2.x = (float) iLadoCubo;
  205.   Punto2.y = (float) iLadoCubo;
  206.   Punto2.z = (float) iLadoCubo;
  207.   // Delante drcha abajo
  208.   Punto3.x = (float) iLadoCubo;
  209.   Punto3.y = (float)-iLadoCubo;
  210.   Punto3.z = (float) iLadoCubo;
  211.   // Delante izqda abajo
  212.   Punto4.x = (float)-iLadoCubo;
  213.   Punto4.y = (float)-iLadoCubo;
  214.   Punto4.z = (float) iLadoCubo;
  215.   // Detras izqda arriba
  216.   Punto5.x = (float)-iLadoCubo;
  217.   Punto5.y = (float) iLadoCubo;
  218.   Punto5.z = (float)-iLadoCubo;
  219.   // Detras drcha arriba
  220.   Punto6.x = (float) iLadoCubo;
  221.   Punto6.y = (float) iLadoCubo;
  222.   Punto6.z = (float)-iLadoCubo;
  223.   // Detras drcha abajo
  224.   Punto7.x = (float) iLadoCubo;
  225.   Punto7.y = (float)-iLadoCubo;
  226.   Punto7.z = (float)-iLadoCubo;
  227.   // Detras izqda abajo
  228.   Punto8.x = (float)-iLadoCubo;
  229.   Punto8.y = (float)-iLadoCubo;
  230.   Punto8.z = (float)-iLadoCubo;
  231. }
  232.  
  233. //
  234. // Rota los puntos alrededor de los ejes XYZ
  235. //
  236. tPunto3D RotaPuntos (tPunto3D Punto)
  237. {
  238.   float    x1;
  239.   float    y1;
  240.   float    z1;
  241.   tPunto3D PuntoR;
  242.  
  243.   x1        = (Punto.x *cos(fAngleA))  - (Punto.z *sin(fAngleB));
  244.   z1        = (Punto.x *sin(fAngleB))  + (Punto.z *cos(fAngleB));
  245.   PuntoR.x  = (x1*cos(fAngleC))        + (Punto.y *sin(fAngleC));
  246.   y1        = (Punto.y *cos(fAngleC))  - (x1*sin(fAngleC));
  247.   PuntoR.z  = (z1*cos(fAngleA))        - (y1*sin(fAngleA));
  248.   PuntoR.y  = (z1*sin(fAngleA))        + (y1*cos(fAngleA));
  249.   return (PuntoR);
  250. }