351 lines
6.2 KiB
C
351 lines
6.2 KiB
C
|
/************/
|
||
|
|
/* grafix.c */ /* WARNING: The following code ain't pretty */
|
||
|
|
/************/
|
||
|
|
|
||
|
|
#define _WINDOWS
|
||
|
|
#include <windows.h>
|
||
|
|
#include <port1632.h>
|
||
|
|
|
||
|
|
#include "main.h"
|
||
|
|
#include "res.h"
|
||
|
|
#include "grafix.h"
|
||
|
|
#include "rtns.h"
|
||
|
|
#include "pref.h"
|
||
|
|
#include "sound.h"
|
||
|
|
|
||
|
|
HDC hDCTemp;
|
||
|
|
HDC hDCBall;
|
||
|
|
HDC hDCBack;
|
||
|
|
HBITMAP hbmTemp;
|
||
|
|
HBITMAP hbmBall;
|
||
|
|
HBITMAP hbmBack;
|
||
|
|
|
||
|
|
HPEN hPenLtGray;
|
||
|
|
HPEN hPenGray;
|
||
|
|
|
||
|
|
INT rgXBlk[cBlkMax]; /* Positions of squares on screen */
|
||
|
|
INT rgYBlk[cBlkMax];
|
||
|
|
|
||
|
|
INT rgBallOff[iBallMax]; /* Offsets into the ball bitmap */
|
||
|
|
|
||
|
|
|
||
|
|
/*** External Data ***/
|
||
|
|
|
||
|
|
extern HWND hwndMain;
|
||
|
|
extern HANDLE hInst;
|
||
|
|
|
||
|
|
extern INT dyBlkPlane;
|
||
|
|
extern INT dypPlane;
|
||
|
|
extern INT dxpPlane;
|
||
|
|
|
||
|
|
extern INT dxpGrid;
|
||
|
|
extern INT dypGrid;
|
||
|
|
extern INT dxpWindow;
|
||
|
|
extern INT dypWindow;
|
||
|
|
extern INT dxpGridOff;
|
||
|
|
|
||
|
|
extern INT cBlkRow;
|
||
|
|
extern INT cBlkPlane;
|
||
|
|
extern INT cPlane;
|
||
|
|
extern INT cBlkMac;
|
||
|
|
|
||
|
|
extern rgBlk[cBlkMax];
|
||
|
|
extern rgFlash[cDimMax];
|
||
|
|
|
||
|
|
extern INT iPlayer;
|
||
|
|
extern BOOL f4;
|
||
|
|
extern PREF Preferences;
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/****** F I N I T L O C A L ******/
|
||
|
|
|
||
|
|
BOOL FInitLocal(VOID)
|
||
|
|
{
|
||
|
|
INT y;
|
||
|
|
|
||
|
|
HDC hDCScrn;
|
||
|
|
|
||
|
|
hPenLtGray = CreatePen(PS_SOLID, 1, RGB_LTGRAY);
|
||
|
|
hPenGray = CreatePen(PS_SOLID, 1, RGB_GRAY);
|
||
|
|
|
||
|
|
hDCScrn = GetDC(hwndMain);
|
||
|
|
|
||
|
|
hDCTemp = CreateCompatibleDC(NULL);
|
||
|
|
hbmTemp = CreateCompatibleBitmap(hDCScrn, dxpGridMax, dypGridMax);
|
||
|
|
SelectObject(hDCTemp, hbmTemp);
|
||
|
|
|
||
|
|
hDCBack = CreateCompatibleDC(NULL);
|
||
|
|
hbmBack = CreateCompatibleBitmap(hDCScrn, dxpGridMax, dypGridMax);
|
||
|
|
SelectObject(hDCBack, hbmBack);
|
||
|
|
|
||
|
|
hDCBall = CreateCompatibleDC(NULL);
|
||
|
|
|
||
|
|
ReleaseDC(hwndMain, hDCScrn);
|
||
|
|
|
||
|
|
GetTheBitmap();
|
||
|
|
|
||
|
|
for (y = 0; y < iBallMax; y++)
|
||
|
|
rgBallOff[y] = y*dyBall;
|
||
|
|
|
||
|
|
return ((hDCTemp != NULL) && (hbmTemp != NULL) &&
|
||
|
|
(hDCBack != NULL) && (hbmBack != NULL) &&
|
||
|
|
(hDCBall != NULL) && (hbmBall != NULL) );
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
VOID GetTheBitmap(VOID)
|
||
|
|
{
|
||
|
|
HBITMAP hbm;
|
||
|
|
|
||
|
|
hbmBall = LoadBitmap(hInst, MAKEINTRESOURCE(ID_BMP_BALL+(!Preferences.fColor)));
|
||
|
|
if (hDCBall != NULL)
|
||
|
|
{
|
||
|
|
hbm = SelectObject(hDCBall, hbmBall);
|
||
|
|
if (hbm)
|
||
|
|
DeleteObject(hbm);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/****** C L E A N U P ******/
|
||
|
|
|
||
|
|
VOID CleanUp(VOID)
|
||
|
|
{
|
||
|
|
EndTunes();
|
||
|
|
|
||
|
|
DeleteDC(hDCBall);
|
||
|
|
DeleteDC(hDCBack);
|
||
|
|
DeleteDC(hDCTemp);
|
||
|
|
|
||
|
|
DeleteObject(hbmBall);
|
||
|
|
DeleteObject(hbmBack);
|
||
|
|
DeleteObject(hbmTemp);
|
||
|
|
|
||
|
|
DeleteObject(hPenGray);
|
||
|
|
DeleteObject(hPenLtGray);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/****** S E T U P B O A R D ******/
|
||
|
|
|
||
|
|
VOID SetupBoard(VOID)
|
||
|
|
{
|
||
|
|
INT x,y,z;
|
||
|
|
INT dx,dy;
|
||
|
|
INT i = 0;
|
||
|
|
|
||
|
|
PatBlt(hDCBack, 0, 0, dxpGridMax, dypGridMax, BLACKNESS);
|
||
|
|
|
||
|
|
for (z = 0; z < cPlane; z++)
|
||
|
|
{
|
||
|
|
dy = z * (dypPlane + dyLevel);
|
||
|
|
for (y = 0; y < cBlkRow; y++, dy += dyBlk)
|
||
|
|
{
|
||
|
|
dx = ((cBlkRow-1)-y)*dxSlant;
|
||
|
|
for (x = 0; x < cBlkRow; x++, dx += (dxBlk-1))
|
||
|
|
{
|
||
|
|
rgXBlk[i] = dx;
|
||
|
|
rgYBlk[i] = dy;
|
||
|
|
i++;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/* Just plot squares back to front *** CHANGE TO DRAW LINES */
|
||
|
|
|
||
|
|
for (i = 0; i < cBlkMac; i++)
|
||
|
|
BitBlt(hDCBack, rgXBlk[i], rgYBlk[i], dxBall, dyBall,
|
||
|
|
hDCBall, 0, 0, SRCPAINT);
|
||
|
|
|
||
|
|
BitBlt(hDCTemp, 0, 0, dxpGridMax, dypGridMax, hDCBack, 0, 0, SRCCOPY);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
/****** D I S P L A Y B A L L ******/
|
||
|
|
|
||
|
|
VOID DisplayBall(BLK blkFix, BALL ballFix)
|
||
|
|
{
|
||
|
|
HDC hDC;
|
||
|
|
INT dx,dy;
|
||
|
|
INT dyFix;
|
||
|
|
BLK blk,blkStart, blkEnd;
|
||
|
|
BALL iBall;
|
||
|
|
|
||
|
|
#if DEBUG > 1
|
||
|
|
CHAR sz[80];
|
||
|
|
wsprintf(sz,"Disp blk=%d ball=%d\r\n",blkFix,ballFix);
|
||
|
|
OutputDebugString(sz);
|
||
|
|
#endif
|
||
|
|
|
||
|
|
|
||
|
|
#ifdef DEBUG
|
||
|
|
if (blkFix < 0)
|
||
|
|
{
|
||
|
|
Oops("DisplayBall: Invalid blk");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
else if (ballFix >= iBallMax)
|
||
|
|
{
|
||
|
|
Oops("DisplayBall: Invalid iBall");
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
|
||
|
|
hDC = GetDC(hwndMain);
|
||
|
|
|
||
|
|
blkEnd = cBlkPlane + (blkStart = cBlkPlane * (blkFix/cBlkPlane));
|
||
|
|
|
||
|
|
dyFix = rgYBlk[blkStart];
|
||
|
|
BitBlt(hDCTemp, 0, dyFix, dxpPlane, dypPlane,
|
||
|
|
hDCBack, 0, dyFix, SRCCOPY);
|
||
|
|
|
||
|
|
iBall = rgBlk[blkFix];
|
||
|
|
rgBlk[blkFix] = ballFix;
|
||
|
|
ballFix = iBall;
|
||
|
|
|
||
|
|
for (blk = blkStart; blk < blkEnd; blk++)
|
||
|
|
{
|
||
|
|
if ((iBall = rgBlk[blk]) != iBallBlank)
|
||
|
|
{
|
||
|
|
BitBlt(hDCTemp, dx = rgXBlk[blk], dy = rgYBlk[blk], dxBall, dyBall,
|
||
|
|
hDCBall, 0, rgBallOff[iBallMask], SRCAND);
|
||
|
|
BitBlt(hDCTemp, dx, dy, dxBall, dyBall,
|
||
|
|
hDCBall, 0, rgBallOff[iBall], SRCPAINT);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
rgBlk[blkFix] = ballFix;
|
||
|
|
|
||
|
|
BitBlt(hDC, dxpGridOff, (dyFix + dypGridOff), dxpPlane, dypPlane,
|
||
|
|
hDCTemp, 0, dyFix, SRCCOPY);
|
||
|
|
|
||
|
|
ReleaseDC(hwndMain, hDC);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
/****** D R A W G R I D ******/
|
||
|
|
|
||
|
|
VOID DrawGrid(HDC hDC)
|
||
|
|
{
|
||
|
|
BitBlt(hDC, dxpGridOff, dypGridOff, dxpGrid, dypGrid, hDCTemp, 0, 0, SRCCOPY);
|
||
|
|
}
|
||
|
|
|
||
|
|
VOID DisplayGrid(VOID)
|
||
|
|
{
|
||
|
|
HDC hDC = GetDC(hwndMain);
|
||
|
|
DrawGrid(hDC);
|
||
|
|
ReleaseDC(hwndMain, hDC);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
/****** R E D O D I S P L A Y ******/
|
||
|
|
|
||
|
|
VOID ReDoDisplay()
|
||
|
|
{
|
||
|
|
REGISTER INT i;
|
||
|
|
REGISTER INT iBall;
|
||
|
|
|
||
|
|
BitBlt(hDCTemp, 0, 0, dxpGrid, dypGrid, hDCBack, 0, 0, SRCCOPY);
|
||
|
|
|
||
|
|
/* Place balls back to front */
|
||
|
|
|
||
|
|
for (i = 0; i < cBlkMac; i++)
|
||
|
|
{
|
||
|
|
if ((iBall = rgBlk[i]) != iBallBlank)
|
||
|
|
{
|
||
|
|
BitBlt(hDCTemp, rgXBlk[i], rgYBlk[i], dxBall, dyBall,
|
||
|
|
hDCBall, 0, rgBallOff[iBallMask], SRCAND);
|
||
|
|
BitBlt(hDCTemp, rgXBlk[i], rgYBlk[i], dxBall, dyBall,
|
||
|
|
hDCBall, 0, rgBallOff[iBall], SRCPAINT);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
/****** P L A C E B A L L ******/
|
||
|
|
|
||
|
|
VOID PlaceBall(BLK blk, BALL iBall)
|
||
|
|
{
|
||
|
|
HDC hDC = GetDC(hwndMain);
|
||
|
|
|
||
|
|
#ifdef DEBUG
|
||
|
|
if (blk < 0 || blk >= cBlkMac)
|
||
|
|
Oops("PlaceBlk: Blk out of range");
|
||
|
|
else if (iBall < iBallBlank || iBall >= iBallMax)
|
||
|
|
Oops("PlaceBall: Ball out of range");
|
||
|
|
#endif
|
||
|
|
|
||
|
|
rgBlk[blk] = iBall;
|
||
|
|
|
||
|
|
ReDoDisplay();
|
||
|
|
|
||
|
|
DrawGrid(hDC);
|
||
|
|
ReleaseDC(hwndMain, hDC);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
VOID DrawRect(HDC hDC, INT x1, INT y1, INT x2, INT y2, HPEN hPen)
|
||
|
|
{
|
||
|
|
SelectObject(hDC, hPen);
|
||
|
|
(VOID)MMoveTo(hDC, x1, y1);
|
||
|
|
LineTo(hDC, x1, y2);
|
||
|
|
LineTo(hDC, x2, y2);
|
||
|
|
LineTo(hDC, x2, y1);
|
||
|
|
LineTo(hDC, x1, y1);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
VOID DrawBorder(HDC hDC)
|
||
|
|
{
|
||
|
|
REGISTER INT x;
|
||
|
|
REGISTER INT y;
|
||
|
|
|
||
|
|
x = dxpWindow-1;
|
||
|
|
y = dypWindow-1;
|
||
|
|
|
||
|
|
SetROP2(hDC, R2_COPYPEN);
|
||
|
|
DrawRect(hDC, 0, 0, x, y, hPenGray);
|
||
|
|
DrawRect(hDC, 1, 1, --x, --y, hPenLtGray);
|
||
|
|
DrawRect(hDC, 2, 2, --x, --y, hPenLtGray);
|
||
|
|
DrawRect(hDC, 3, 3, --x, --y, hPenGray);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/****** D R A W S C R E E N ******/
|
||
|
|
|
||
|
|
VOID DrawScreen(HDC hDC)
|
||
|
|
{
|
||
|
|
DrawBorder(hDC);
|
||
|
|
DrawGrid(hDC);
|
||
|
|
}
|
||
|
|
|
||
|
|
VOID DisplayScreen(VOID)
|
||
|
|
{
|
||
|
|
HDC hDC = GetDC(hwndMain);
|
||
|
|
DrawScreen(hDC);
|
||
|
|
ReleaseDC(hwndMain, hDC);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
/****** D O F L A S H ******/
|
||
|
|
|
||
|
|
VOID DoFlash(BOOL fOn)
|
||
|
|
{
|
||
|
|
REGISTER INT i;
|
||
|
|
HDC hDC = GetDC(hwndMain);
|
||
|
|
|
||
|
|
for (i = 0; i < cBlkRow; i++)
|
||
|
|
rgBlk[rgFlash[i]] = fOn ? iPlayer :iBallGrey;
|
||
|
|
|
||
|
|
ReDoDisplay();
|
||
|
|
DrawGrid(hDC);
|
||
|
|
|
||
|
|
ReleaseDC(hwndMain, hDC);
|
||
|
|
}
|