Channels ▼
RSS

Three-Dimensional Modeling Under Windows 3.1


March 1993/Three-Dimensional Modeling Under Windows 3.1/Listing 1

Listing 1 3d.c — creates a General Dynamics F16 Falcon aircraft

#include "windows.h"
#include <math.h>
#include <stdlib.h>

//******************************************************************
//Title:         3D.C
//Author:        Thomas W. Olsen
//Version:       1.0
//Compiler:      Microsoft C/C++ 7.0
//                 rc /r 3d.  rc
//                 cl /c /AL /Gsw /W3 /Oas /Zpe /Zi /FPi 3d.c
//                 link /CO /NOD 3d,,, libw llibcew win87em, 3d.def
//                 rc 3d.exe
//*****************************************************************
//********************** Various Constants *************************
#define CENTER                 0
#define PI                      3.141593
#define RADIANS(a)            (a * (PI / 180.0))
#define DEGREES(a)            (a * (180.0 / PI))
#define NO_OF_VERTICES       66
#define NO_OF_SURFACES       45
#define NO_OF_SURFACE_VERTICES 220
#define VIEW_RATIO        (40 / 10)
#define MIN_DEGREES            0
#define MAX_DEGREES          359
#define ROTATE_DEGREES         5
//*********************  Structure Definitions  **********************
typedef struct tagPOINT3D
{
    double x;
    double y;
    double z;
} POINT3D;

typedef struct tagVERTEX
{
    POINT3D world;               // World Coordinates
    POINT3D eye;                 // Eye Coordinates
    POINT   screen;              // Screen Coordinates
} VERTEX;

typedef struct tagSURFACE
{
    int mapIndex;               // Index Into the Surface Map Array
    int noOfVertices;          // No of Vertices Forming the Surface
    int depthIndex;             // Used in Determining Depth of Surface
    int brushColor;
} SURFACE;

typedef struct tagOBJECT
{
    VERTEX  vertex [NO_OF_VERTICES];
    SURFACE info[NO._OF_SURFACES];
    int     map[NO_OF_SURFACE_VERTICES];
} OBJECT;
//************************* Static Data ***************************
OBJECT f16 =
{ 
    {    // Vertex Array
        {  0.00, 0.00, 0.00 },                                //Center
        { 0.00, -17.00, 9.0 }, { 0.00, -13.00, 9.00 },      //Tail
        { 0.00, -14.50, 3.00 }, { 0.00, -8.00, 3.00 },
        { 0.00, -14.50, 2.00 }, { 0.00, -5.00, 2.00 },
        { -0.50, -16.00, 1.00 }, { -1.00, -16.00, 0.00 },   //Exhaust
        { -0.50, -16.00, -0.50 }, { 0.00, -16.00, -1.00 },
        { 0.50, -16.00, -0.50 }, { 1.00, -16.00, 0.00},
        { 0.50, -16.00, 1.00 },
        { -1.00, -13.00, 2.00 }, { -2.00, -13.00, 0.00 },   //Fuse
        { -1.50, -13.00, -1.50 }, { 0.00, -13.00, -2.00 },
        { 1.50, -13.00, -1.50 }, { 2.00, -13.00, 0.00 },
        { 1.00, -13.00, 2.00 }, { -1.00, 7.00, 2.00 },
        { -2.00, 7.00, 0.00 }, { -1.50, 7.00, -1.50 },
        { 0.00, 7.00, -2.00 }, { 1.50, 7.00, -1.50 },
        { 2.00, 7.00, 0.00 }, { 1.00, 7.00, 2.00 },
        { 2.00, -8.00, 0.00 }, { 11.00, -8.00, 0.00 },      //Wings
        { 11.00,-5.00,0.00 }, { 5.00, 0.00, 0.00 },
        { 2.00, 7.00, 0.00 }, { -2.00, -8.00, 0.00 },
        { -11.00, -8.00, 0.00 }, { -11.00, -5.00, 0.00 },
        { -5.00, 0.00, 0.00 }, { -2.00, 7.00, 0.00 },
        { 0.50, 2.00, 2.00 }, { -0.50, 2.00, 2.00 },        //Cockpit
        { 1.00, 5.00, 2.00 }, { 0.50, 5.00, 3.50 },
        { -0.50, 5.00, 3.50 }, { -1.00, 5.00, 2.00 },
        { 1.00, 8.00, 2.00 }, { 0.50, 8.00, 3.50 },
        { -0.50, 8.00, 3.50 }, { -1.00, 8.00, 2.00 ),
        { 0.50, 11.00, 2.00 }, { -0.50, 11.00, 2.00 },
        { 0.00, 7.00, -1.00 }, { -1.00, 11.00, 2.00 },      //Subfuse
        { -2.00, 11.00, 0.00 }, { 0.00, 11.00, -1.00 },
        { 2.00, 11.00, 0.00 }, { 1.00, 11.00, 2.00 },
        { 0.00, 11.00, -1.00 }, { 0.00, 17.00, 0.00 },      //Nose
        { -2.00, -16.00, 0.00 }, { -8.00, -16.00, 0.00 },  //Elevators
        { -8.00, -14.00, 0.00 }, { -2.00, -10.00, 0.00 },
        { 2.00, -16.00, 0.00 }, { 8.00, -16.00, 0.00 },
        { 8.00, -14.00, 0.00 }, { 2.00, -10.00, 0.00 }
    },
    {    // Surface Info ... (Points to Surface Map)
        { 0,  5, 60,  DKGRAY_BRUSH },  { 5,  5, 64, DKGRAY_BRUSH }, //Elevators
        { 10, 5, 60,  DKGRAY_BRUSH },  { 15, 5, 64, DKGRAY_BRUSH },
        { 20, 5,  1,  GRAY_BRUSH },    { 25, 5,  4, LTGRAY_BRUSH },    //Tail
        { 30, 5,  1,  GRAY_BRUSH },    { 35, 5,  4, LTGRAY_BRUSH },
        { 40, 5, 14,  BLACK_BRUSH },  ( 45, 5, 15,  DKGRAY_BRUSH },    //Exhaust
        { 50, 5, 16,  BLACK_BRUSH },  ( 55, 5, 17,  BLACK_BRUSH },
        { 60, 5, 18,  DKGRAY_BRUSH }, { 65, 5, 19,  BLACK_BRUSH },
        { 70, 5, 20,  DKGRAY_BRUSH },
        { 75, 5, 22,  DKGRAY_BRUSH }, { 80, 5,  23, GRAY_BRUSH },   //Fuse
        { 85, 5, 24,  DKGRAY_BRUSH }, { 90, 5,  25, DKGRAY_BRUSH },
        { 95, 5, 26,  GRAY_BRUSH },   { 100, 5, 27, DKGRAY_BRUSH },
        { 105, 5, 20, GRAY_BRUSH, },
        { 110, 6, 30, DKGRAY_BRUSH }, ( 116, 6, 35, DKGRAY_BRUSH }, //Wings
        { 122, 6, 30, DKGRAY_BRUSH }, { 128, 6, 35, DKGRAY_BRUSH },
        { 134, 5, 21, LTGRAY_BRUSH }, { 139, 5, 22, LTGRAY_BRUSH }, //Subfuse
        { 144, 5, 50, LTGRAY_BRUSH }, { 149, 5, 26, LTGRAY_BRUSH },
        { 154, 5, 27, LTGRAY_BRUSH },
        { 159, 4, 55, GRAY_BRUSH },   { 163, 4, 54, GRAY_BRUSH },   //Nose
        { 167, 4, 56, GRAY_BRUSH },   { 171, 4, 52, GRAY_BRUSH },
        { 175, 4, 51, LTGRAY_BRUSH },
        { 179, 5, 41, WHITE_BRUSH },  { 184, 5, 45, WHITE_BRUSH },  //Cockpit
        { 189, 5, 46, WHITE_BRUSH },  { 194, 4, 41, WHITE_BRUSH },
        { 198, 4, 42, WHITE_BRUSH },  { 202, 5, 41, WHITE_BRUSH },
        { 207, 5, 46, WHITE_BRUSH },  { 212, 4, 45, WHITE_BRUSH },
        { 216, 4, 46, WHITE_BRUSH }
    },
    {    // Surface Map ... (Points to Vertex Array)
        58, 61, 60, 59, 58, 62, 63, 64, 65, 62, 58, 59, 60, 61, 58, // Elevators
        62, 65, 64, 63, 62,
         1,  3,  4,  2,  1, 3,  5,  6,  4,  3,  1,  2,  4,  3,  1, // Tail
         3,  4,  6,  5,  3,
        14, 15,  8,  7, 14, 15, 16,  9,  8, 15, 16, 17, 10,  9, 16, // Exhaust
        17, 18, 11, 10, 17, 18, 19, 12, 11, 18, 19, 20, 13, 12, 19,
        20, 14, 7, 13, 20,
        14, 21, 22, 15, 14, 15, 22, 23, 16, 15, 16, 23, 24, 17, 16, // Fuse
        17, 24, 25, 18, 17, 18, 25, 26, 19, 18, 19, 26, 27, 20, 19,
        20, 27, 21, 14, 20,
        28, 29, 30, 31, 32, 28, 33, 37, 36, 35, 34, 33, 28, 32, 31, // Wings
        30, 29, 28, 33, 34, 35, 36, 37, 33,
        21, 51, 52, 22, 21, 22, 52, 53, 50, 22, 50, 53, 54, 26, 50, // Subfuse
        26, 54, 55, 27, 26, 27, 55, 51, 21, 27,
        55, 54, 57, 55, 54, 56, 57, 54, 56, 52, 57, 56, 52, 51, 57, 52, // Nose
        51, 55, 57, 51,
        41, 42, 39, 38, 41, 45, 46, 42, 41, 45, 48, 49, 46, 45, 48, // Cockpit
        40, 41, 38, 40, 42, 43, 39, 42, 44, 45, 41, 40, 44,
        46, 47, 43, 42, 46, 48, 45, 44, 48, 49, 47, 46, 49
    }
};

BOOL wireFrame = FALSE;
double distance = 75, thetaDegrees = 90, phiDegrees = 60;
//************************** Static Data ***************************
LONG FAR PASCAL WindowProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam);
void DrawObject(HWND hWnd, HDC hDC, OBJECT *object );
int __cdecl compareProc(const void *elem1, const void *elem2 );
//************************** Program Begin *************************
int PASCAL WinMain(HANDLE hInst, HANDLE hPrevInst, LPSTR lpCmdLine, int numCmdShow )
{
    MSG       msg;
    HWND      hWnd;
    WNDCLASS  wc;
    //************************ Setup Window ************************
    wc.style          = (UINT) NULL;
    wc.lpfnWndProc   = WindowProc;
    wc.cbClsExtra    = 0;
    wc.cbWndExtra    = 0;
    wc.hInstance      = hInst;
    wc.hIcon           = LoadIcon( NULL, IDI_APPLICATION);
    wc.hCursor        = LoadCursor( NULL, IDC_ARROW);
    wc.hbrBackground = GetStockObject(BLACK_BRUSH);
    wc.lpszMenuName  = (LPSTR) "Menu";
    wc.lpszClassName = (LPSTR) "3DClass";

    if (!RegisterClass(&wc))
        return(FALSE);

    hWnd = CreateWindow( "3DClass", "3D Modeling Example",
                         WS_OVERLAPPEDWINDOW | WS_SCROLL | WS_HSCROLL,
                         CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
                         CW_USEDEFAULT, NULL, NULL, hInst, NULL );
    if (!hWnd)
        return (FALSE);

    SetScrollRange( hWnd, SB_HORZ, MIN_DEGREES, MAX_DEGREES, TRUE );
    SetScrollRange( hWnd, SB_VERT, MIN_DEGREES, MAX_DEGREES, TRUE );
    SetScrollPos( hWnd, SB_HORZ, (int) thetaDegrees, TRUE );
    SetScrollPos( hWnd, SB_VERT, (int) phiDegrees, TRUE );

    ShowWindow( hWnd, numCmdShow );

    while (GetMessage(&msg, NULL, NULL, NULL)) /* Typical Mossage Loop */
    {
        TranslateMessage(&msg);
        DispatchMessage(&msg);
    }
    
    return (msg.wParam);
}

LONG FAR PASCAL WindowProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    PAINTSTRUCT paint;
    HDC hDC;
    HMENU hMenu;
    int vPos, hPos;

    switch (message)
    {
        case WM_COMMAND:
            hMenu = GetMenu( hWnd );
            CheckMenuItem( hMenu, wParam, MF_CHECKED);

            if (wParam == 1)
            {
                CheckMenuItem( hMenu, 2, MF_UNCHECKED);
                wireFrame = TRUE;
            }
            else
            {
                CheckMenuItem( hMenu, 1, MF_UNCHECKED);
                wireFrame = FALSE;
            }
            InvalidateRect( hWnd, NULL, TRUE );
            break;

        case WM_DESTROY:
            PostQuitMessage( NULL );
            break;

        case WM_HSCROLL:
            if (wParam == SB_THUMBTRACK)
                break;

            hPos = GetScrollPos( hWnd, SB_HORZ);

            switch( wParam )
            {
                case SB_TOP:
                    hPos = MIN_DEGREES;
                    break;
                case SB_BOTTOM:
                    hPos = MAX_DEGREES;
                    break;
                case SB_LINEUP:
                case SB_PAGEUP:
                    hPos -= ROTATE_DEGREES;
                    break;
                case SB_PAGEDOWN:
                case SB_LINEDOWN:
                    hPos += ROTATE_DEGREES;
                    break;
                case SB_THUMBPOSITION:
                    hPos = LOWORD(lParam);
                    break;
            }

            if (hPos < MIN_DEGREES)
                hPos = MAX_DEGREES;
            else
            if (hPos > MAX_DEGREES)
                hPos = MIN_DEGREES;

            SetScrollPos( hWnd, SB_HORZ, hPos, TRUE );
            thetaDegrees = (double) hPos;
            InvalidateRect( hWnd, NULL, TRUE );
            break;

        case WM_VSCROLL:
            if (wParam == SB_THUMBTRACK)
                break;

            vPos = GetScrollPos( hWnd, SB_VERT );

            switch( wParam )
            {
                case SB_TOP:
                    vPos = MIN_DEGREES;
                    break;
                case SB_BOTTOM:
                    vPos = MAX_DEGREES;
                    break;
                case SB_LINEUP:
                case SB-PAGEUP:
                    vPos -= ROTATE_DEGREES;
                    break;
                case SB_PAGEDOWN:
                case SB_LINEDOWN:
                    vPos += ROTATE_DEGREES;
                    break;
                case SB_THUMBPOSITION:
                    vPos = LOWORD(lParam);
                    break;
            }

            if (vPos < MIN_DEGREES)
                vPos = MAX_DEGREES;
            else
            if (vPos > MAX_DEGREES)
                vPos = MIN_DEGREES;

            SetScrollPos( hWnd, SB_VERT, vPos, TRUE );
            phiDegrees = (double) vPos;
            InvalidateRect( hWnd, NULL, TRUE );
            break;

        case WM_SIZE:
            InvalidateRect( hWnd, NULL, TRUE );
            break;

        case WM_PAINT:
            hDC = BeginPaint( hWnd, &paint );
            DrawObject(hWnd, hDC, &f16);
            ReleaseDC( hWnd, hDC );
            EndPaint( hWnd, &paint );
            break;

        default:
            return (DefWindowProc(hWnd, message, wParam, lParam));
    }
}

void DrawObject(HWND hWnd, HDC hDC, OBJECT *object)
{
    double  sinTheta, cosTheta, sinPhi, cosPhi;
    double  s1, s2, s3;
    POINT3D *v1, *v2, *v3;
    POINT   center;
    RECT    rect;
    POINT   points[10];
    HBITMAP hBitmap, hOldBitmap;
    HRGN    hRgn;
    HDC     hMemDC;
    int     surface, vertex, mapIndex, vertexIndex, loop;

    GetClientRect( hWnd, &rect);       // Determine Size of Client Area
    center.x = (rect.right / 2);       // Calculate X-Centerpoint
    center.y = (rect.bottom / 2);      // Calculate Y-Centerpoint

    hRgn          = CreateRectRgn( rect.left, rect.top, rect.right, rect.bottom );
    hMemDC       = CreateCompatibleDC( hDC );
    hBitmap     = CreateCompatibleBitmap( hDC, rect.right, rect.bottom);
    hOldBitmap = SelectObject( hMemDC, hBitmap );
    //**********************************************************************
    //*               Precalculate SIN(x) and COS(x)                         *
    //**********************************************************************
    cosTheta = cos( RADIANS(thetaDegrees) );
    sinTheta = sin( RADIANS(thetaDegrees) );
    cosPhi    = cos( RADIANS(phiDegrees) );
    sinPhi    = sin( RADIANS(phiDegrees) );
    //******************************************************************
    //*                 Calculate Eye and Screen Coordinates               *
    //******************************************************************
    for (loop = 1; loop < NO_OF_VERTICES; loop++)
    {
        object->vertex[loop].eye.x =
                            (-object->vertex[loop].world.x * sinTheta) +
                            (object->vertex[loop].world.y * cosTheta);
        object->vertex[loop].eye.y =
                            (-object->vertex[loop].world.x * cosTheta * cosPhi) -
                            (object->vertex[loop].world.y * sinTheta * cosPhi) +
                            (object->vertex[loop].world.z * sinPhi);
        object->vertex[loop].eye.z =
                            (-object->vertex[loop].world.x * sinPhi * cosTheta) -
                            (object->vertex[loop].world.y * sinTheta * sinPhi) -
                            (object->vertex[loop].world.z * cosPhi) + distance;

        object->vertex[loop].screen.x = (int)
            (VIEW_RATIO * (object->vertex[loop].eye.x / object->vertex[loop].eye.z) * center.y + center.x);
        object->vertex[loop].screen.y = (int)
            (-VIEW_RATIO * (object->vertex[loop].eye.y / object->vertex[loop].eye.z) * center.y + center.y);
    }
    //******************************************************************
    //*                           Draw Object                                 *
    //******************************************************************
    FillRgn( hMemDC, hRgn, GetStockObject(BLACK_BRUSH));
    SelectObject( hMemDC, GetStockObject(wireFrame == TRUE ? WHITE_PEN:BLACK_PEN) );

    if (wireFrame == FALSE)
        qsort( object->info, NO_OF_SURFACES, sizeof(SURFACE), compareProc );

    for (surface = 0; surface < NO_OF_SURFACES; surface++)
    {
        mapIndex = object->info[surface].mapIndex;

        if (wireFrame == FALSE) // No Hidden Surface Removal For Wire Frame
        {
            v1 = &object->vertex[ object->map[ mapIndex ] ].eye; // Setup pointers to three
            v2 = &object->vertex[ object->map[ mapIndex+1 ] ].eye; // surface vertices
            v3 = &object->vertex[ object->map[ mapIndex+2 ] ].eye;

            s1 = v1->x * (v2->y * v3->z - v3->y * v2->z); s1 = (-1) * s1;
            s2 = v2->x * (v3->y * v1->z - v1->y * v3->z); // Perform dot product on surface
            s3 = v3->x * (v1->y * v2->z - v2->y * v1->z); // vectors to find normal vector
        }

        if (wireFrame == TRUE || s1 - s2 - s3 <= 0.0)
        {
            for (vertex = 0; vertex < object->info[surface].noOfVertices; vertex++, mapIndex++)
            {
                vertexIndex      = object->map[mapIndex];
                points[vertex].x = object->vertex[vertexIndex].screen.x;
                points[vertex].y = object->vertex[vertexIndex].screen.y;
            }

            if (wireFrame == TRUE)
                Polyline( hMemDC, &points[0], vertex;
            else
            {
                SelectObject( hMemDC, GetStockObject(object->info[surface].brushColor) );
                Polygon( hMemDC, &points[0], vertex);
            }
        }
    }
    BitBlt( hDC, 0, 0, rect.right, rect.bottom, hMemDC, 0, 0, SRCCOPY);

    SelectObject( hMemDC, hOldBitmap );
    DeleteObject( hBitmap );
    DeleteObject( hRgn );
    DeleteDC( hMemDC );
}

int _cdecl compareProc( const void *elem1, const void *elem2 )
{
    if( f16.vertex[((SURFACE *) elem1)->depthIndex].eye.z >
        f16.vertex[((SURFACE *) elem2)->depthIndex].eye.z)
        return -1;
    if( f16.vertex[((SURFACE *) elem1)->depthIndex].eye.z <
        f16.vertex[((SURFACE *) elem2)->depthIndex].eye.z)
        return 1;
    else
        return 0;
}
/* End of File*/

Related Reading


More Insights






Currently we allow the following HTML tags in comments:

Single tags

These tags can be used alone and don't need an ending tag.

<br> Defines a single line break

<hr> Defines a horizontal line

Matching tags

These require an ending tag - e.g. <i>italic text</i>

<a> Defines an anchor

<b> Defines bold text

<big> Defines big text

<blockquote> Defines a long quotation

<caption> Defines a table caption

<cite> Defines a citation

<code> Defines computer code text

<em> Defines emphasized text

<fieldset> Defines a border around elements in a form

<h1> This is heading 1

<h2> This is heading 2

<h3> This is heading 3

<h4> This is heading 4

<h5> This is heading 5

<h6> This is heading 6

<i> Defines italic text

<p> Defines a paragraph

<pre> Defines preformatted text

<q> Defines a short quotation

<samp> Defines sample computer code text

<small> Defines small text

<span> Defines a section in a document

<s> Defines strikethrough text

<strike> Defines strikethrough text

<strong> Defines strong text

<sub> Defines subscripted text

<sup> Defines superscripted text

<u> Defines underlined text

Dr. Dobb's encourages readers to engage in spirited, healthy debate, including taking us to task. However, Dr. Dobb's moderates all comments posted to our site, and reserves the right to modify or remove any content that it determines to be derogatory, offensive, inflammatory, vulgar, irrelevant/off-topic, racist or obvious marketing or spam. Dr. Dobb's further reserves the right to disable the profile of any commenter participating in said activities.

 
Disqus Tips To upload an avatar photo, first complete your Disqus profile. | View the list of supported HTML tags you can use to style comments. | Please read our commenting policy.
 

Video