990 lines
25 KiB
C
990 lines
25 KiB
C
/*
|
|
* display.c
|
|
*
|
|
* This file is part of Emu48
|
|
*
|
|
* Copyright (C) 1995 Sebastien Carlier
|
|
* Copyright (C) 2002 Christoph Gießelink
|
|
*
|
|
*/
|
|
#include "pch.h"
|
|
#include "resource.h"
|
|
#include "Emu48.h"
|
|
#include "io.h"
|
|
#include "kml.h"
|
|
|
|
// #define DEBUG_DISPLAY // switch for DISPLAY debug purpose
|
|
|
|
#define NOCOLORSGRAY 8 // no. of colors in gray scale mode
|
|
#define NOCOLORSBW 2 // no. of colors in black and white mode
|
|
|
|
#define DISPLAY_FREQ 19 // display update 1/frequency (1/64) in ms (gray scale mode)
|
|
|
|
#define B 0x00000000 // black
|
|
#define W 0x00FFFFFF // white
|
|
#define I 0xFFFFFFFF // ignore
|
|
|
|
#define LCD_ROW (36*4) // max. pixel per line
|
|
|
|
// main display lines, handle zero lines exception
|
|
#define LINES(n) (((n) == 0) ? 64 : ((n)+1))
|
|
|
|
#define GRAYMASK(c) (((((c)-1)>>1)<<24) \
|
|
|((((c)-1)>>1)<<16) \
|
|
|((((c)-1)>>1)<<8) \
|
|
|((((c)-1)>>1)))
|
|
|
|
#define DIBPIXEL4(d,p) *((DWORD*)(d)) = ((*((DWORD*)(d)) & dwGrayMask) << 1) | (p); \
|
|
*((LPBYTE*) &(d)) += 4
|
|
#define DIBPIXEL3(d,p) *((LPBYTE)(d)+2) = \
|
|
*((LPBYTE)(d)+1) = \
|
|
*((LPBYTE)(d)+0) = ((*(LPBYTE)(d) & (BYTE) dwGrayMask) << 1) | (p); \
|
|
*((LPBYTE*) &(d)) += 3
|
|
|
|
BOOL bGrayscale = FALSE;
|
|
UINT nBackgroundX = 0;
|
|
UINT nBackgroundY = 0;
|
|
UINT nBackgroundW = 0;
|
|
UINT nBackgroundH = 0;
|
|
UINT nLcdX = 0;
|
|
UINT nLcdY = 0;
|
|
UINT nLcdZoom = 1; // memory DC zoom
|
|
UINT nGdiZoom = 1; // GDI zoom
|
|
HDC hLcdDC = NULL;
|
|
HDC hMainDC = NULL;
|
|
|
|
BYTE (*GetLineCounter)(VOID) = NULL;
|
|
VOID (*StartDisplay)(BYTE byInitial) = NULL;
|
|
VOID (*StopDisplay)(VOID) = NULL;
|
|
|
|
static BYTE GetLineCounterGray(VOID);
|
|
static BYTE GetLineCounterBW(VOID);
|
|
static VOID StartDisplayGray(BYTE byInitial);
|
|
static VOID StartDisplayBW(BYTE byInitial);
|
|
static VOID StopDisplayGray(VOID);
|
|
static VOID StopDisplayBW(VOID);
|
|
|
|
static LPBYTE pbyLcd;
|
|
|
|
static HBITMAP hLcdBitmap;
|
|
static HBITMAP hMainBitmap;
|
|
|
|
static DWORD Pattern[16];
|
|
static BYTE Buf[36];
|
|
|
|
static DWORD dwGrayMask;
|
|
|
|
static LARGE_INTEGER lLcdRef; // reference time for VBL counter
|
|
static UINT uLcdTimerId = 0;
|
|
|
|
static BYTE byVblRef = 0; // VBL stop reference
|
|
|
|
static DWORD dwKMLColor[64] = // color table loaded by KML script
|
|
{
|
|
W,B,B,B,B,B,B,B,B,B,B,B,B,B,B,B,
|
|
B,B,B,B,B,B,B,B,B,B,B,B,B,B,B,B,
|
|
I,I,I,I,I,I,I,I,I,I,I,I,I,I,I,I,
|
|
I,I,I,I,I,I,I,I,I,I,I,I,I,I,I,I
|
|
};
|
|
|
|
static struct
|
|
{
|
|
BITMAPINFOHEADER Lcd_bmih;
|
|
RGBQUAD bmiColors[NOCOLORSGRAY];
|
|
} bmiLcd =
|
|
{
|
|
{0x28,0/*x*/,0/*y*/,1,8,BI_RGB,0,0,0,NOCOLORSGRAY,0}
|
|
};
|
|
|
|
static __inline VOID BuildPattern(VOID)
|
|
{
|
|
_ASSERT(nLcdZoom >= 1 && nLcdZoom <= 4);
|
|
|
|
if (nLcdZoom == 1)
|
|
{
|
|
WORD i,j;
|
|
for (i=0; i<16; ++i)
|
|
{
|
|
Pattern[i] = 0;
|
|
for (j=8; j>0; j>>=1)
|
|
{
|
|
Pattern[i] = (Pattern[i] << 8) | ((i&j) != 0);
|
|
}
|
|
}
|
|
return;
|
|
}
|
|
if (nLcdZoom == 2)
|
|
{
|
|
Pattern[0] = 0x00000000;
|
|
Pattern[1] = 0x00000101;
|
|
Pattern[2] = 0x01010000;
|
|
Pattern[3] = 0x01010101;
|
|
return;
|
|
}
|
|
if (nLcdZoom == 4)
|
|
{
|
|
Pattern[0] = 0x00000000;
|
|
Pattern[1] = 0x01010101;
|
|
}
|
|
return;
|
|
}
|
|
|
|
VOID UpdateContrast(BYTE byContrast)
|
|
{
|
|
RGBQUAD c,b;
|
|
INT i,nColors;
|
|
|
|
// table for max. 8 colors
|
|
const INT nCAdj[] = { 0, 1, 1, 2, 1, 2, 2, 3 };
|
|
|
|
// when display is off use contrast 0
|
|
if ((Chipset.IORam[BITOFFSET] & DON) == 0) byContrast = 0;
|
|
|
|
c = *(RGBQUAD*)&dwKMLColor[byContrast]; // pixel on color
|
|
b = *(RGBQUAD*)&dwKMLColor[byContrast+32]; // pixel off color
|
|
|
|
// if background color is undefined, use color 0 for compatibility
|
|
if (I == *(DWORD*)&b) b = *(RGBQUAD*)&dwKMLColor[0];
|
|
|
|
nColors = bGrayscale ? (NOCOLORSGRAY-1) : (NOCOLORSBW-1);
|
|
|
|
_ASSERT(nColors <= ARRAYSIZEOF(nCAdj)); // no. of colors must be smaller than entries in the gray color table
|
|
|
|
// fill color palette of bitmap
|
|
for (i = 0; i <= nColors; ++i)
|
|
{
|
|
bmiLcd.bmiColors[i] = b;
|
|
bmiLcd.bmiColors[i].rgbRed += ((INT) c.rgbRed - (INT) b.rgbRed) * nCAdj[i] / nCAdj[nColors];
|
|
bmiLcd.bmiColors[i].rgbGreen += ((INT) c.rgbGreen - (INT) b.rgbGreen) * nCAdj[i] / nCAdj[nColors];
|
|
bmiLcd.bmiColors[i].rgbBlue += ((INT) c.rgbBlue - (INT) b.rgbBlue) * nCAdj[i] / nCAdj[nColors];
|
|
}
|
|
|
|
// update palette information
|
|
_ASSERT(hLcdDC);
|
|
SetDIBColorTable(hLcdDC,0,ARRAYSIZEOF(bmiLcd.bmiColors),bmiLcd.bmiColors);
|
|
return;
|
|
}
|
|
|
|
VOID SetLcdColor(UINT nId, UINT nRed, UINT nGreen, UINT nBlue)
|
|
{
|
|
dwKMLColor[nId&0x3F] = ((nRed&0xFF)<<16)|((nGreen&0xFF)<<8)|(nBlue&0xFF);
|
|
return;
|
|
}
|
|
|
|
VOID SetLcdMode(BOOL bMode)
|
|
{
|
|
if ((bGrayscale = bMode))
|
|
{
|
|
// set pixel update mask
|
|
dwGrayMask = GRAYMASK(NOCOLORSGRAY);
|
|
GetLineCounter = GetLineCounterGray;
|
|
StartDisplay = StartDisplayGray;
|
|
StopDisplay = StopDisplayGray;
|
|
}
|
|
else
|
|
{
|
|
// set pixel update mask
|
|
dwGrayMask = GRAYMASK(NOCOLORSBW);
|
|
GetLineCounter = GetLineCounterBW;
|
|
StartDisplay = StartDisplayBW;
|
|
StopDisplay = StopDisplayBW;
|
|
}
|
|
UpdateContrast(Chipset.contrast);
|
|
return;
|
|
}
|
|
|
|
VOID CreateLcdBitmap(VOID)
|
|
{
|
|
// create LCD bitmap
|
|
_ASSERT(nLcdZoom >= 1 && nLcdZoom <= 4);
|
|
bmiLcd.Lcd_bmih.biWidth = LCD_ROW * nLcdZoom;
|
|
bmiLcd.Lcd_bmih.biHeight = -64 * nLcdZoom;
|
|
_ASSERT(hLcdDC == NULL);
|
|
VERIFY(hLcdDC = CreateCompatibleDC(hWindowDC));
|
|
VERIFY(hLcdBitmap = CreateDIBSection(hWindowDC,(BITMAPINFO*)&bmiLcd,DIB_RGB_COLORS,(VOID **)&pbyLcd,NULL,0));
|
|
hLcdBitmap = (HBITMAP) SelectObject(hLcdDC,hLcdBitmap);
|
|
_ASSERT(hPalette != NULL);
|
|
SelectPalette(hLcdDC,hPalette,FALSE); // set palette for LCD DC
|
|
RealizePalette(hLcdDC); // realize palette
|
|
BuildPattern(); // build Nibble -> DIB mask pattern
|
|
SetLcdMode(bGrayscale); // init display update function pointer
|
|
return;
|
|
}
|
|
|
|
VOID DestroyLcdBitmap(VOID)
|
|
{
|
|
// set contrast palette to startup colors
|
|
WORD i = 0; dwKMLColor[i++] = W;
|
|
while (i < 32) dwKMLColor[i++] = B;
|
|
while (i < 64) dwKMLColor[i++] = I;
|
|
|
|
GetLineCounter = NULL;
|
|
StartDisplay = NULL;
|
|
StopDisplay = NULL;
|
|
|
|
if (hLcdDC != NULL)
|
|
{
|
|
// destroy LCD bitmap
|
|
DeleteObject(SelectObject(hLcdDC,hLcdBitmap));
|
|
DeleteDC(hLcdDC);
|
|
hLcdDC = NULL;
|
|
hLcdBitmap = NULL;
|
|
}
|
|
return;
|
|
}
|
|
|
|
BOOL CreateMainBitmap(LPCTSTR szFilename)
|
|
{
|
|
_ASSERT(hWindowDC != NULL);
|
|
VERIFY(hMainDC = CreateCompatibleDC(hWindowDC));
|
|
if (hMainDC == NULL) return FALSE; // quit if failed
|
|
hMainBitmap = LoadBitmapFile(szFilename);
|
|
if (hMainBitmap == NULL)
|
|
{
|
|
DeleteDC(hMainDC);
|
|
hMainDC = NULL;
|
|
return FALSE;
|
|
}
|
|
hMainBitmap = (HBITMAP) SelectObject(hMainDC,hMainBitmap);
|
|
_ASSERT(hPalette != NULL);
|
|
VERIFY(SelectPalette(hMainDC,hPalette,FALSE));
|
|
RealizePalette(hMainDC);
|
|
return TRUE;
|
|
}
|
|
|
|
VOID DestroyMainBitmap(VOID)
|
|
{
|
|
if (hMainDC != NULL)
|
|
{
|
|
// destroy Main bitmap
|
|
DeleteObject(SelectObject(hMainDC,hMainBitmap));
|
|
DeleteDC(hMainDC);
|
|
hMainDC = NULL;
|
|
hMainBitmap = NULL;
|
|
}
|
|
return;
|
|
}
|
|
|
|
//****************
|
|
//*
|
|
//* LCD functions
|
|
//*
|
|
//****************
|
|
|
|
VOID UpdateDisplayPointers(VOID)
|
|
{
|
|
EnterCriticalSection(&csLcdLock);
|
|
{
|
|
UINT nLines = LINES(Chipset.lcounter);
|
|
|
|
#if defined DEBUG_DISPLAY
|
|
{
|
|
TCHAR buffer[256];
|
|
wsprintf(buffer,_T("%.5lx: Update Display Pointer\n"),Chipset.pc);
|
|
OutputDebugString(buffer);
|
|
}
|
|
#endif
|
|
|
|
// calculate display width
|
|
Chipset.width = (34 + Chipset.loffset + (Chipset.boffset / 4) * 2) & 0xFFFFFFFE;
|
|
Chipset.end1 = Chipset.start1 + nLines * Chipset.width;
|
|
if (Chipset.end1 < Chipset.start1)
|
|
{
|
|
// calculate first address of main display
|
|
Chipset.start12 = Chipset.end1 - Chipset.width;
|
|
// calculate last address of main display
|
|
Chipset.end1 = Chipset.start1 - Chipset.width;
|
|
}
|
|
else
|
|
{
|
|
Chipset.start12 = Chipset.start1;
|
|
}
|
|
Chipset.end2 = Chipset.start2 + (64 - nLines) * 34;
|
|
}
|
|
LeaveCriticalSection(&csLcdLock);
|
|
return;
|
|
}
|
|
|
|
VOID UpdateMainDisplay(VOID)
|
|
{
|
|
UINT x, y, nLines;
|
|
BYTE *p;
|
|
DWORD d;
|
|
|
|
#if defined DEBUG_DISPLAY
|
|
{
|
|
TCHAR buffer[256];
|
|
wsprintf(buffer,_T("%.5lx: Update Main Display\n"),Chipset.pc);
|
|
OutputDebugString(buffer);
|
|
}
|
|
#endif
|
|
|
|
_ASSERT(nLcdZoom >= 1 && nLcdZoom <= 4);
|
|
if (!(Chipset.IORam[BITOFFSET]&DON))
|
|
{
|
|
nLines = 64;
|
|
ZeroMemory(pbyLcd, LCD_ROW * nLcdZoom * nLines * nLcdZoom);
|
|
}
|
|
else
|
|
{
|
|
nLines = LINES(Chipset.lcounter); // main display lines
|
|
p = pbyLcd; // bitmap offset
|
|
d = 0; // pixel offset counter
|
|
if (nLcdZoom == 4)
|
|
{
|
|
for (y = 0; y < nLines; ++y)
|
|
{
|
|
// read line with actual start1 address!!
|
|
Npeek(Buf,d+Chipset.start1,36);
|
|
for (x = 0; x < 36; ++x) // every 4 pixel
|
|
{
|
|
DIBPIXEL4(p,Pattern[Buf[x]&1]);
|
|
DIBPIXEL4(p,Pattern[(Buf[x]>>1) & 1]);
|
|
DIBPIXEL4(p,Pattern[(Buf[x]>>2) & 1]);
|
|
DIBPIXEL4(p,Pattern[(Buf[x]>>3) & 1]);
|
|
}
|
|
CopyMemory(p, p-LCD_ROW*4, LCD_ROW*4);
|
|
p+=LCD_ROW*4;
|
|
CopyMemory(p, p-LCD_ROW*8, LCD_ROW*8);
|
|
p+=LCD_ROW*8;
|
|
d+=Chipset.width;
|
|
}
|
|
}
|
|
if (nLcdZoom == 3)
|
|
{
|
|
for (y = 0; y < nLines; ++y)
|
|
{
|
|
// read line with actual start1 address!!
|
|
Npeek(Buf,d+Chipset.start1,36);
|
|
for (x = 0; x < 36; ++x) // every 4 pixel
|
|
{
|
|
DIBPIXEL3(p,(Buf[x]>>0) & 1);
|
|
DIBPIXEL3(p,(Buf[x]>>1) & 1);
|
|
DIBPIXEL3(p,(Buf[x]>>2) & 1);
|
|
DIBPIXEL3(p,(Buf[x]>>3) & 1);
|
|
}
|
|
CopyMemory(p, p-LCD_ROW*3, LCD_ROW*3);
|
|
p+=LCD_ROW*3;
|
|
CopyMemory(p, p-LCD_ROW*3, LCD_ROW*3);
|
|
p+=LCD_ROW*3;
|
|
d+=Chipset.width;
|
|
}
|
|
}
|
|
if (nLcdZoom == 2)
|
|
{
|
|
for (y = 0; y < nLines; ++y)
|
|
{
|
|
// read line with actual start1 address!!
|
|
Npeek(Buf,d+Chipset.start1,36);
|
|
for (x = 0; x < 36; ++x) // every 4 pixel
|
|
{
|
|
DIBPIXEL4(p,Pattern[Buf[x]&3]);
|
|
DIBPIXEL4(p,Pattern[Buf[x]>>2]);
|
|
}
|
|
CopyMemory(p, p-LCD_ROW*2, LCD_ROW*2);
|
|
p+=LCD_ROW*2;
|
|
d+=Chipset.width;
|
|
}
|
|
}
|
|
if (nLcdZoom == 1)
|
|
{
|
|
for (y = 0; y < nLines; ++y)
|
|
{
|
|
// read line with actual start1 address!!
|
|
Npeek(Buf,d+Chipset.start1,36);
|
|
for (x = 0; x < 36; ++x) // every 4 pixel
|
|
{
|
|
DIBPIXEL4(p,Pattern[Buf[x]]);
|
|
}
|
|
d+=Chipset.width;
|
|
}
|
|
}
|
|
}
|
|
EnterCriticalSection(&csGDILock); // solving NT GDI problems
|
|
{
|
|
StretchBlt(hWindowDC, nLcdX, nLcdY, 131*nLcdZoom*nGdiZoom, nLines*nLcdZoom*nGdiZoom,
|
|
hLcdDC, Chipset.boffset*nLcdZoom, 0, 131*nLcdZoom, nLines*nLcdZoom,SRCCOPY);
|
|
GdiFlush();
|
|
}
|
|
LeaveCriticalSection(&csGDILock);
|
|
return;
|
|
}
|
|
|
|
VOID UpdateMenuDisplay(VOID)
|
|
{
|
|
UINT x, y, nLines;
|
|
BYTE *p;
|
|
DWORD d;
|
|
|
|
#if defined DEBUG_DISPLAY
|
|
{
|
|
TCHAR buffer[256];
|
|
wsprintf(buffer,_T("%.5lx: Update Menu Display\n"),Chipset.pc);
|
|
OutputDebugString(buffer);
|
|
}
|
|
#endif
|
|
|
|
if (!(Chipset.IORam[BITOFFSET]&DON)) return;
|
|
|
|
nLines = LINES(Chipset.lcounter);
|
|
if (nLines == 64) return; // menu disabled
|
|
|
|
_ASSERT(nLcdZoom >= 1 && nLcdZoom <= 4);
|
|
// calculate bitmap offset
|
|
p = pbyLcd + (nLines*nLcdZoom*LCD_ROW*nLcdZoom);
|
|
d = 0; // pixel offset counter
|
|
if (nLcdZoom == 4)
|
|
{
|
|
for (y = nLines; y < 64; ++y)
|
|
{
|
|
Npeek(Buf,d+Chipset.start2,34); // 34 nibbles are viewed
|
|
for (x = 0; x < 34; ++x) // every 4 pixel
|
|
{
|
|
DIBPIXEL4(p,Pattern[Buf[x]&1]);
|
|
DIBPIXEL4(p,Pattern[(Buf[x]>>1) & 1]);
|
|
DIBPIXEL4(p,Pattern[(Buf[x]>>2) & 1]);
|
|
DIBPIXEL4(p,Pattern[(Buf[x]>>3) & 1]);
|
|
}
|
|
// adjust pointer to 36 DIBPIXEL drawing calls
|
|
p += (36-34) * 4 * sizeof(DWORD);
|
|
CopyMemory(p, p-LCD_ROW*4, LCD_ROW*4);
|
|
p+=LCD_ROW*4;
|
|
CopyMemory(p, p-LCD_ROW*8, LCD_ROW*8);
|
|
p+=LCD_ROW*8;
|
|
d+=34;
|
|
}
|
|
}
|
|
if (nLcdZoom == 3)
|
|
{
|
|
for (y = nLines; y < 64; ++y)
|
|
{
|
|
Npeek(Buf,d+Chipset.start2,34); // 34 nibbles are viewed
|
|
for (x = 0; x < 34; ++x) // every 4 pixel
|
|
{
|
|
DIBPIXEL3(p,(Buf[x]>>0) & 1);
|
|
DIBPIXEL3(p,(Buf[x]>>1) & 1);
|
|
DIBPIXEL3(p,(Buf[x]>>2) & 1);
|
|
DIBPIXEL3(p,(Buf[x]>>3) & 1);
|
|
}
|
|
// adjust pointer to 36 DIBPIXEL drawing calls
|
|
p += (36-34) * 3 * sizeof(DWORD);
|
|
CopyMemory(p, p-LCD_ROW*3, LCD_ROW*3);
|
|
p+=LCD_ROW*3;
|
|
CopyMemory(p, p-LCD_ROW*3, LCD_ROW*3);
|
|
p+=LCD_ROW*3;
|
|
d+=34;
|
|
}
|
|
}
|
|
if (nLcdZoom == 2)
|
|
{
|
|
for (y = nLines; y < 64; ++y)
|
|
{
|
|
Npeek(Buf,d+Chipset.start2,34); // 34 nibbles are viewed
|
|
for (x = 0; x < 34; ++x) // every 4 pixel
|
|
{
|
|
DIBPIXEL4(p,Pattern[Buf[x]&3]);
|
|
DIBPIXEL4(p,Pattern[Buf[x]>>2]);
|
|
}
|
|
// adjust pointer to 36 DIBPIXEL drawing calls
|
|
p += (36-34) * 2 * sizeof(DWORD);
|
|
CopyMemory(p, p-LCD_ROW*2, LCD_ROW*2);
|
|
p+=LCD_ROW*2;
|
|
d+=34;
|
|
}
|
|
}
|
|
if (nLcdZoom == 1)
|
|
{
|
|
for (y = nLines; y < 64; ++y)
|
|
{
|
|
Npeek(Buf,d+Chipset.start2,34); // 34 nibbles are viewed
|
|
for (x = 0; x < 34; ++x) // every 4 pixel
|
|
{
|
|
DIBPIXEL4(p,Pattern[Buf[x]]);
|
|
}
|
|
// adjust pointer to 36 DIBPIXEL drawing calls
|
|
p += (36-34) * 1 * sizeof(DWORD);
|
|
d+=34;
|
|
}
|
|
}
|
|
EnterCriticalSection(&csGDILock); // solving NT GDI problems
|
|
{
|
|
StretchBlt(hWindowDC, nLcdX, nLcdY+nLines*nLcdZoom*nGdiZoom,
|
|
131*nLcdZoom*nGdiZoom, (64-nLines)*nLcdZoom*nGdiZoom,
|
|
hLcdDC, 0, nLines*nLcdZoom, 131*nLcdZoom, (64-nLines)*nLcdZoom, SRCCOPY);
|
|
GdiFlush();
|
|
}
|
|
LeaveCriticalSection(&csGDILock);
|
|
return;
|
|
}
|
|
|
|
VOID WriteToMainDisplay(LPBYTE a, DWORD d, UINT s)
|
|
{
|
|
INT x0, x;
|
|
INT y0, y;
|
|
DWORD *p;
|
|
INT lWidth;
|
|
UINT nLines;
|
|
|
|
if (bGrayscale) return; // no direct writing in grayscale mode
|
|
|
|
lWidth = abs(Chipset.width); // display width
|
|
nLines = LINES(Chipset.lcounter); // main display lines
|
|
|
|
#if defined DEBUG_DISPLAY
|
|
{
|
|
TCHAR buffer[256];
|
|
wsprintf(buffer,_T("%.5lx: Write Main Display %x,%u\n"),Chipset.pc,d,s);
|
|
OutputDebugString(buffer);
|
|
}
|
|
#endif
|
|
|
|
if (!(Chipset.IORam[BITOFFSET]&DON)) // display off
|
|
return; // no drawing
|
|
|
|
d -= Chipset.start1; // nibble offset to DISPADDR (start of display)
|
|
d += 64 * lWidth; // make positive offset
|
|
y0 = abs((INT) d / lWidth - 64); // bitmap row
|
|
x0 = (INT) d % lWidth; // bitmap coloumn
|
|
y = y0; x = x0; // load loop variables
|
|
|
|
// outside main display area
|
|
_ASSERT(y0 >= 0 && y0 < (INT) nLines);
|
|
|
|
// illegal zoom factor
|
|
_ASSERT(nLcdZoom >= 1 && nLcdZoom <= 4);
|
|
|
|
// calculate memory position in LCD bitmap
|
|
p = (DWORD*) (pbyLcd + y0*LCD_ROW*nLcdZoom*nLcdZoom
|
|
+ x0*sizeof(*p)*nLcdZoom);
|
|
|
|
while (s--) // loop for nibbles to write
|
|
{
|
|
if (x<36) // only fill visible area
|
|
{
|
|
if (nLcdZoom == 4)
|
|
{
|
|
p[432] = p[288] = p[144] = p[0] = Pattern[(*a)&1];
|
|
p[433] = p[289] = p[145] = p[1] = Pattern[((*a)>>1)&1];
|
|
p[434] = p[290] = p[146] = p[2] = Pattern[((*a)>>2)&1];
|
|
p[435] = p[291] = p[147] = p[3] = Pattern[((*a)>>3)&1];
|
|
}
|
|
if (nLcdZoom == 3)
|
|
{
|
|
LPBYTE b = (LPBYTE) p;
|
|
b[216*4+2] = b[216*4+1] = b[216*4+0] =
|
|
b[108*4+2] = b[108*4+1] = b[108*4+0] =
|
|
b[ 0*4+2] = b[ 0*4+1] = b[ 0*4+0] = (*a)&1;
|
|
b[216*4+5] = b[216*4+4] = b[216*4+3] =
|
|
b[108*4+5] = b[108*4+4] = b[108*4+3] =
|
|
b[ 0*4+5] = b[ 0*4+4] = b[ 0*4+3] = ((*a)>>1)&1;
|
|
b[216*4+8] = b[216*4+7] = b[216*4+6] =
|
|
b[108*4+8] = b[108*4+7] = b[108*4+6] =
|
|
b[ 0*4+8] = b[ 0*4+7] = b[ 0*4+6] = ((*a)>>2)&1;
|
|
b[216*4+11] = b[216*4+10] = b[216*4+9] =
|
|
b[108*4+11] = b[108*4+10] = b[108*4+9] =
|
|
b[ 0*4+11] = b[ 0*4+10] = b[ 0*4+9] = ((*a)>>3)&1;
|
|
}
|
|
if (nLcdZoom == 2)
|
|
{
|
|
p[72] = p[0] = Pattern[(*a)&3];
|
|
p[73] = p[1] = Pattern[(*a)>>2];
|
|
}
|
|
if (nLcdZoom == 1)
|
|
{
|
|
*p = Pattern[*a];
|
|
}
|
|
}
|
|
++a; // next value to write
|
|
++x; // next x position
|
|
if ((x==lWidth)&&s) // end of display line
|
|
{
|
|
// end of main display area
|
|
if (y == (INT) nLines - 1) break;
|
|
|
|
x = 0; // first coloumn
|
|
++y; // next row
|
|
// recalculate bitmap memory position of new line
|
|
p = (DWORD*) (pbyLcd+y*LCD_ROW*nLcdZoom*nLcdZoom);
|
|
}
|
|
else
|
|
p += nLcdZoom; // next x position in bitmap
|
|
}
|
|
|
|
// update window region
|
|
if (y0 != y) // changed more than one line
|
|
{
|
|
x0 = 0; // no x-position offset
|
|
x = 131; // redraw complete lines
|
|
|
|
++y; // redraw this line as well
|
|
}
|
|
else
|
|
{
|
|
x0 <<= 2; x <<= 2; // x-position in pixel
|
|
_ASSERT(x >= x0); // can't draw negative number of pixel
|
|
x -= x0; // number of pixels to update
|
|
|
|
x0 -= Chipset.boffset; // adjust x-position with left margin
|
|
if (x0 < 0) x0 = 0;
|
|
|
|
if (x0 > 131) x0 = 131; // cut right borders
|
|
if (x+x0 > 131) x = 131 - x0;
|
|
|
|
y = y0 + 1; // draw one line
|
|
}
|
|
|
|
x0 *= nLcdZoom; // adjust dimensions to pixel size
|
|
x *= nLcdZoom;
|
|
y0 *= nLcdZoom;
|
|
y *= nLcdZoom;
|
|
|
|
EnterCriticalSection(&csGDILock);
|
|
{
|
|
StretchBlt(hWindowDC, nLcdX+x0*nGdiZoom, nLcdY+y0*nGdiZoom,
|
|
x*nGdiZoom, (y-y0)*nGdiZoom,
|
|
hLcdDC, x0+Chipset.boffset*nLcdZoom, y0, x, y-y0, SRCCOPY);
|
|
GdiFlush();
|
|
}
|
|
LeaveCriticalSection(&csGDILock);
|
|
return;
|
|
}
|
|
|
|
VOID WriteToMenuDisplay(LPBYTE a, DWORD d, UINT s)
|
|
{
|
|
UINT x0, x;
|
|
UINT y0, y;
|
|
DWORD *p;
|
|
UINT nLines;
|
|
|
|
if (bGrayscale) return; // no direct writing in grayscale mode
|
|
|
|
nLines = LINES(Chipset.lcounter); // main display lines
|
|
|
|
#if defined DEBUG_DISPLAY
|
|
{
|
|
TCHAR buffer[256];
|
|
wsprintf(buffer,_T("%.5lx: Write Menu Display %x,%u\n"),Chipset.pc,d,s);
|
|
OutputDebugString(buffer);
|
|
}
|
|
#endif
|
|
|
|
if (!(Chipset.IORam[BITOFFSET]&DON)) return;
|
|
if (nLines == 64) return; // menu disabled
|
|
|
|
d -= Chipset.start2;
|
|
y0 = y = (d / 34) + nLines;
|
|
x0 = x = d % 34;
|
|
if (x0 > 32) return; // position out of viewed area
|
|
_ASSERT(nLcdZoom >= 1 && nLcdZoom <= 4);
|
|
|
|
// calculate memory position in LCD bitmap
|
|
p = (DWORD*) (pbyLcd + y0*LCD_ROW*nLcdZoom*nLcdZoom
|
|
+ x0*sizeof(*p)*nLcdZoom);
|
|
|
|
if (nLcdZoom == 4)
|
|
{
|
|
while (s--)
|
|
{
|
|
if (x<34)
|
|
{
|
|
p[432] = p[288] = p[144] = p[0] = Pattern[(*a)&1];
|
|
p[433] = p[289] = p[145] = p[1] = Pattern[((*a)>>1) &1];
|
|
p[434] = p[290] = p[146] = p[2] = Pattern[((*a)>>2) &1];
|
|
p[435] = p[291] = p[147] = p[3] = Pattern[((*a)>>3) &1];
|
|
}
|
|
a++;
|
|
x++;
|
|
if ((x==34)&&s)
|
|
{
|
|
x=0;
|
|
y++;
|
|
if (y==64) break;
|
|
p=(DWORD*)(pbyLcd+y*LCD_ROW*16);
|
|
} else p+=4;
|
|
}
|
|
if (y0!=y) // modified more than 1 line
|
|
{
|
|
x = 34; // full line
|
|
x0 = 0; // no offset
|
|
}
|
|
x0<<=4; x<<=4; // calculate pixel address
|
|
y0<<=2; y<<=2;
|
|
if (x>524) x=524;
|
|
}
|
|
if (nLcdZoom == 3)
|
|
{
|
|
while (s--)
|
|
{
|
|
if (x<34)
|
|
{
|
|
LPBYTE b = (LPBYTE) p;
|
|
b[216*4+2] = b[216*4+1] = b[216*4+0] =
|
|
b[108*4+2] = b[108*4+1] = b[108*4+0] =
|
|
b[ 0*4+2] = b[ 0*4+1] = b[ 0*4+0] = (*a)&1;
|
|
b[216*4+5] = b[216*4+4] = b[216*4+3] =
|
|
b[108*4+5] = b[108*4+4] = b[108*4+3] =
|
|
b[ 0*4+5] = b[ 0*4+4] = b[ 0*4+3] = ((*a)>>1)&1;
|
|
b[216*4+8] = b[216*4+7] = b[216*4+6] =
|
|
b[108*4+8] = b[108*4+7] = b[108*4+6] =
|
|
b[ 0*4+8] = b[ 0*4+7] = b[ 0*4+6] = ((*a)>>2)&1;
|
|
b[216*4+11] = b[216*4+10] = b[216*4+9] =
|
|
b[108*4+11] = b[108*4+10] = b[108*4+9] =
|
|
b[ 0*4+11] = b[ 0*4+10] = b[ 0*4+9] = ((*a)>>3)&1;
|
|
}
|
|
a++;
|
|
x++;
|
|
if ((x==34)&&s)
|
|
{
|
|
x=0;
|
|
y++;
|
|
if (y==64) break;
|
|
p=(DWORD*)(pbyLcd+y*LCD_ROW*9);
|
|
} else p+=3;
|
|
}
|
|
if (y0!=y) // modified more than 1 line
|
|
{
|
|
x = 34; // full line
|
|
x0 = 0; // no offset
|
|
}
|
|
x0*=12; x*=12; // calculate pixel address
|
|
y0*=3; y*=3;
|
|
if (x>393) x=393;
|
|
}
|
|
if (nLcdZoom == 2)
|
|
{
|
|
while (s--)
|
|
{
|
|
if (x<34)
|
|
{
|
|
p[72] = p[0] = Pattern[(*a)&3];
|
|
p[73] = p[1] = Pattern[(*a)>>2];
|
|
}
|
|
a++;
|
|
x++;
|
|
if ((x==34)&&s)
|
|
{
|
|
x=0;
|
|
y++;
|
|
if (y==64) break;
|
|
p=(DWORD*)(pbyLcd+y*LCD_ROW*4);
|
|
} else p+=2;
|
|
}
|
|
if (y0!=y) // modified more than 1 line
|
|
{
|
|
x = 34; // full line
|
|
x0 = 0; // no offset
|
|
}
|
|
x0<<=3; x<<=3; // calculate pixel address
|
|
y0<<=1; y<<=1;
|
|
if (x>262) x=262;
|
|
}
|
|
if (nLcdZoom == 1)
|
|
{
|
|
while (s--)
|
|
{
|
|
if (x<34) *p = Pattern[*a];
|
|
a++;
|
|
x++;
|
|
if ((x==34)&&s)
|
|
{
|
|
x=0;
|
|
y++;
|
|
if (y==64) break;
|
|
p=(DWORD*)(pbyLcd+y*LCD_ROW);
|
|
} else p++;
|
|
}
|
|
if (y0!=y) // modified more than 1 line
|
|
{
|
|
x = 34; // full line
|
|
x0 = 0; // no offset
|
|
}
|
|
x0<<=2; x<<=2; // calculate pixel address
|
|
if (x>131) x=131;
|
|
}
|
|
|
|
EnterCriticalSection(&csGDILock); // solving NT GDI problems
|
|
{
|
|
StretchBlt(hWindowDC, nLcdX+x0*nGdiZoom, nLcdY+y0*nGdiZoom,
|
|
(x-x0)*nGdiZoom, (y-y0+nLcdZoom)*nGdiZoom,
|
|
hLcdDC, x0, y0, x-x0, y-y0+nLcdZoom, SRCCOPY);
|
|
GdiFlush();
|
|
}
|
|
LeaveCriticalSection(&csGDILock);
|
|
return;
|
|
}
|
|
|
|
VOID UpdateAnnunciators(VOID)
|
|
{
|
|
BYTE c;
|
|
|
|
c = (BYTE)(Chipset.IORam[ANNCTRL] | (Chipset.IORam[ANNCTRL+1]<<4));
|
|
// switch annunciators off if timer stopped
|
|
if ((c & AON) == 0 || (Chipset.IORam[TIMER2_CTRL] & RUN) == 0)
|
|
c = 0;
|
|
|
|
DrawAnnunciator(1,c&LA1);
|
|
DrawAnnunciator(2,c&LA2);
|
|
DrawAnnunciator(3,c&LA3);
|
|
DrawAnnunciator(4,c&LA4);
|
|
DrawAnnunciator(5,c&LA5);
|
|
DrawAnnunciator(6,c&LA6);
|
|
return;
|
|
}
|
|
|
|
VOID ResizeWindow(VOID)
|
|
{
|
|
if (hWnd != NULL) // if window created
|
|
{
|
|
RECT rectWindow;
|
|
RECT rectClient;
|
|
|
|
rectWindow.left = 0;
|
|
rectWindow.top = 0;
|
|
rectWindow.right = nBackgroundW;
|
|
rectWindow.bottom = nBackgroundH;
|
|
|
|
AdjustWindowRect(&rectWindow,
|
|
(DWORD) GetWindowLongPtr(hWnd,GWL_STYLE),
|
|
GetMenu(hWnd) != NULL || IsRectEmpty(&rectWindow));
|
|
SetWindowPos(hWnd, bAlwaysOnTop ? HWND_TOPMOST : HWND_NOTOPMOST, 0, 0,
|
|
rectWindow.right - rectWindow.left,
|
|
rectWindow.bottom - rectWindow.top,
|
|
SWP_NOMOVE);
|
|
|
|
// check if menu bar wrapped to two or more rows
|
|
GetClientRect(hWnd, &rectClient);
|
|
if (rectClient.bottom < (LONG) nBackgroundH)
|
|
{
|
|
rectWindow.bottom += (nBackgroundH - rectClient.bottom);
|
|
SetWindowPos (hWnd, NULL, 0, 0,
|
|
rectWindow.right - rectWindow.left,
|
|
rectWindow.bottom - rectWindow.top,
|
|
SWP_NOMOVE | SWP_NOZORDER);
|
|
}
|
|
|
|
_ASSERT(hWindowDC); // move destination window
|
|
SetWindowOrgEx(hWindowDC, nBackgroundX, nBackgroundY, NULL);
|
|
InvalidateRect(hWnd,NULL,TRUE);
|
|
}
|
|
return;
|
|
}
|
|
|
|
//################
|
|
//#
|
|
//# functions for gray scale implementation
|
|
//#
|
|
//################
|
|
|
|
// main display update routine
|
|
static VOID CALLBACK LcdProc(UINT uEventId, UINT uMsg, DWORD dwUser, DWORD dw1, DWORD dw2)
|
|
{
|
|
EnterCriticalSection(&csLcdLock);
|
|
{
|
|
UpdateMainDisplay(); // update display
|
|
UpdateMenuDisplay();
|
|
}
|
|
LeaveCriticalSection(&csLcdLock);
|
|
|
|
QueryPerformanceCounter(&lLcdRef); // actual time
|
|
|
|
return;
|
|
UNREFERENCED_PARAMETER(uEventId);
|
|
UNREFERENCED_PARAMETER(uMsg);
|
|
UNREFERENCED_PARAMETER(dwUser);
|
|
UNREFERENCED_PARAMETER(dw1);
|
|
UNREFERENCED_PARAMETER(dw2);
|
|
}
|
|
|
|
// LCD line counter calculation
|
|
static BYTE GetLineCounterGray(VOID)
|
|
{
|
|
LARGE_INTEGER lLC;
|
|
BYTE byTime;
|
|
|
|
if (uLcdTimerId == 0) // display off
|
|
return ((Chipset.IORam[LINECOUNT+1] & (LC5|LC4)) << 4) | Chipset.IORam[LINECOUNT];
|
|
|
|
QueryPerformanceCounter(&lLC); // get elapsed time since display update
|
|
|
|
// elapsed ticks so far
|
|
byTime = (BYTE) (((lLC.QuadPart - lLcdRef.QuadPart) << 12) / lFreq.QuadPart);
|
|
|
|
if (byTime > 0x3F) byTime = 0x3F; // all counts made
|
|
|
|
return 0x3F - byTime; // update display between VBL counter 0x3F-0x3E
|
|
}
|
|
|
|
static VOID StartDisplayGray(BYTE byInitial)
|
|
{
|
|
if (uLcdTimerId) // LCD update timer running
|
|
return; // -> quit
|
|
|
|
if (Chipset.IORam[BITOFFSET]&DON) // display on?
|
|
{
|
|
QueryPerformanceCounter(&lLcdRef); // actual time of top line
|
|
|
|
// adjust startup counter to get the right VBL value
|
|
_ASSERT(byInitial <= 0x3F); // line counter value 0 - 63
|
|
lLcdRef.QuadPart -= ((LONGLONG) (0x3F - byInitial) * lFreq.QuadPart) >> 12;
|
|
|
|
VERIFY(uLcdTimerId = timeSetEvent(DISPLAY_FREQ,0,(LPTIMECALLBACK)&LcdProc,0,TIME_PERIODIC));
|
|
}
|
|
return;
|
|
}
|
|
|
|
static VOID StopDisplayGray(VOID)
|
|
{
|
|
BYTE a[2];
|
|
ReadIO(a,LINECOUNT,2,TRUE); // update VBL at display off time
|
|
|
|
if (uLcdTimerId == 0) // timer stopped
|
|
return; // -> quit
|
|
|
|
timeKillEvent(uLcdTimerId); // stop display update
|
|
uLcdTimerId = 0; // set flag display update stopped
|
|
|
|
EnterCriticalSection(&csLcdLock); // update to last condition
|
|
{
|
|
UpdateMainDisplay(); // update display
|
|
UpdateMenuDisplay();
|
|
}
|
|
LeaveCriticalSection(&csLcdLock);
|
|
return;
|
|
}
|
|
|
|
//################
|
|
//#
|
|
//# functions for black and white implementation
|
|
//#
|
|
//################
|
|
|
|
// LCD line counter calculation in BW mode
|
|
static BYTE F4096Hz(VOID) // get a 6 bit 4096Hz down counter value
|
|
{
|
|
LARGE_INTEGER lLC;
|
|
|
|
QueryPerformanceCounter(&lLC); // get counter value
|
|
|
|
// calculate 4096 Hz frequency down counter value
|
|
return -(BYTE)(((lLC.QuadPart - lAppStart.QuadPart) << 12) / lFreq.QuadPart) & 0x3F;
|
|
}
|
|
|
|
static BYTE GetLineCounterBW(VOID) // get line counter value
|
|
{
|
|
_ASSERT(byVblRef < 0x40);
|
|
return (0x40 + F4096Hz() - byVblRef) & 0x3F;
|
|
}
|
|
|
|
static VOID StartDisplayBW(BYTE byInitial)
|
|
{
|
|
// get positive VBL difference between now and stop time
|
|
byVblRef = (0x40 + F4096Hz() - byInitial) & 0x3F;
|
|
return;
|
|
}
|
|
|
|
static VOID StopDisplayBW(VOID)
|
|
{
|
|
BYTE a[2];
|
|
ReadIO(a,LINECOUNT,2,TRUE); // update VBL at display off time
|
|
return;
|
|
}
|