296 lines
16 KiB
C++
296 lines
16 KiB
C++
/*
|
|
AppleWin : An Apple //e emulator for Windows
|
|
|
|
Copyright (C) 2010-2011, William S Simms
|
|
|
|
AppleWin is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
AppleWin is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with AppleWin; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include "StdAfx.h"
|
|
#include "NTSC_CharSet.h"
|
|
|
|
unsigned char csbits_enhanced2e[2][256][8]; // Enhanced //e
|
|
unsigned char csbits_2e[2][256][8]; // Original //e (no mousetext)
|
|
unsigned char csbits_a2[1][256][8]; // ][ and ][+
|
|
unsigned char csbits_pravets82[1][256][8]; // Pravets 82
|
|
unsigned char csbits_pravets8M[1][256][8]; // Pravets 8M
|
|
unsigned char csbits_pravets8C[2][256][8]; // Pravets 8A & 8C
|
|
|
|
#if 1
|
|
|
|
static const UINT bitmapWidth = 256;
|
|
static const UINT bitmapWidthBytes = bitmapWidth/8;
|
|
static const UINT bitmapHeight = 768;
|
|
|
|
static const UINT charWidth = 16;
|
|
static const UINT charWidthBytes = 16/8;
|
|
static const UINT charHeight = 16;
|
|
|
|
void get_csbits_xy (csbits_t csbits, UINT ch, UINT cx, UINT cy, const BYTE* pBitmap)
|
|
{
|
|
_ASSERT(ch < 256);
|
|
_ASSERT((cx < bitmapWidth/charWidth) && (cy < bitmapHeight/charHeight));
|
|
|
|
pBitmap += cy*charHeight*bitmapWidthBytes + cx*charWidthBytes;
|
|
|
|
for (UINT y=0; y<8; y++)
|
|
{
|
|
BYTE n = 0;
|
|
for (int x=0; x<14; x+=2)
|
|
{
|
|
UINT xp = x/8;
|
|
BYTE d = pBitmap[xp];
|
|
UINT b = 7 - x%8;
|
|
if (d & (1<<b)) n |= 0x80;
|
|
n >>= 1;
|
|
}
|
|
|
|
csbits[0][ch][y] = n;
|
|
pBitmap += bitmapWidthBytes*2;
|
|
}
|
|
}
|
|
|
|
void get_csbits (csbits_t csbits, const char* resourceName, const UINT cy0)
|
|
{
|
|
const UINT bufferSize = bitmapWidthBytes*bitmapHeight;
|
|
BYTE* pBuffer = new BYTE [bufferSize];
|
|
|
|
HBITMAP hCharBitmap = LoadBitmap(g_hInstance, resourceName);
|
|
GetBitmapBits(hCharBitmap, bufferSize, pBuffer);
|
|
|
|
for (UINT cy=cy0, ch=0; cy<cy0+16; cy++)
|
|
{
|
|
for (UINT cx=0; cx<16; cx++)
|
|
{
|
|
get_csbits_xy(csbits, ch++, cx, cy, pBuffer);
|
|
}
|
|
}
|
|
|
|
DeleteObject(hCharBitmap);
|
|
|
|
delete [] pBuffer;
|
|
}
|
|
|
|
void make_csbits (void)
|
|
{
|
|
get_csbits(&csbits_enhanced2e[0], TEXT("CHARSET40"), 0); // Enhanced //e: Alt char set off
|
|
get_csbits(&csbits_enhanced2e[1], TEXT("CHARSET40"), 16); // Enhanced //e: Alt char set on (mousetext)
|
|
get_csbits(&csbits_a2[0], TEXT("CHARSET40"), 32); // Apple ][, ][+
|
|
get_csbits(&csbits_pravets82[0], TEXT("CHARSET82"), 0); // Pravets 82
|
|
get_csbits(&csbits_pravets8M[0], TEXT("CHARSET8M"), 0); // Pravets 8M
|
|
get_csbits(&csbits_pravets8C[0], TEXT("CHARSET8C"), 0); // Pravets 8A / 8C: Alt char set off
|
|
get_csbits(&csbits_pravets8C[1], TEXT("CHARSET8C"), 16); // Pravets 8A / 8C: Alt char set on
|
|
|
|
// Original //e is just Enhanced //e with the 32 mousetext chars [0x40..0x5F] replaced by the non-alt charset chars [0x40..0x5F]
|
|
memcpy(csbits_2e, csbits_enhanced2e, sizeof(csbits_enhanced2e));
|
|
memcpy(&csbits_2e[1][64], &csbits_2e[0][64], 32*8);
|
|
}
|
|
|
|
#else
|
|
|
|
// NB. '(', ')' are 1 bit out of alignment
|
|
static const char *csstrs[] = {
|
|
" ### "," # "," #### "," ### "," #### "," ##### "," ##### "," #### ",
|
|
" # # "," # # "," # # "," # # "," # # "," # "," # "," # ",
|
|
" # # # "," # # "," # # "," # "," # # "," # "," # "," # ",
|
|
" # ### "," # # "," #### "," # "," # # "," #### "," #### "," # ",
|
|
" # ## "," ##### "," # # "," # "," # # "," # "," # "," # ## ",
|
|
" # "," # # "," # # "," # # "," # # "," # "," # "," # # ",
|
|
" #### "," # # "," #### "," ### "," #### "," ##### "," # "," #### ",
|
|
" "," "," "," "," "," "," "," ",
|
|
" # # "," ### "," # "," # # "," # "," # # "," # # "," ### ",
|
|
" # # "," # "," # "," # # "," # "," ## ## "," # # "," # # ",
|
|
" # # "," # "," # "," # # "," # "," # # # "," ## # "," # # ",
|
|
" ##### "," # "," # "," ## "," # "," # # # "," # # # "," # # ",
|
|
" # # "," # "," # "," # # "," # "," # # "," # ## "," # # ",
|
|
" # # "," # "," # # "," # # "," # "," # # "," # # "," # # ",
|
|
" # # "," ### "," ### "," # # "," ##### "," # # "," # # "," ### ",
|
|
" "," "," "," "," "," "," "," ",
|
|
" #### "," ### "," #### "," ### "," ##### "," # # "," # # "," # # ",
|
|
" # # "," # # "," # # "," # # "," # "," # # "," # # "," # # ",
|
|
" # # "," # # "," # # "," # "," # "," # # "," # # "," # # ",
|
|
" #### "," # # "," #### "," ### "," # "," # # "," # # "," # # # ",
|
|
" # "," # # # "," # # "," # "," # "," # # "," # # "," # # # ",
|
|
" # "," # # "," # # "," # # "," # "," # # "," # # "," ## ## ",
|
|
" # "," ## # "," # # "," ### "," # "," ### "," # "," # # ",
|
|
" "," "," "," "," "," "," "," ",
|
|
" # # "," # # "," ##### "," ##### "," "," ##### "," "," ",
|
|
" # # "," # # "," # "," ## "," # "," ## "," "," ",
|
|
" # # "," # # "," # "," ## "," # "," ## "," # "," ",
|
|
" # "," # "," # "," ## "," # "," ## "," # # "," ",
|
|
" # # "," # "," # "," ## "," # "," ## "," # # "," ",
|
|
" # # "," # "," # "," ## "," # "," ## "," "," ",
|
|
" # # "," # "," ##### "," ##### "," "," ##### "," "," ",
|
|
" "," "," "," "," "," "," "," #######",
|
|
" "," # "," # # "," # # "," # "," ## "," # "," # ",
|
|
" "," # "," # # "," # # "," #### "," ## # "," # # "," # ",
|
|
" "," # "," # # "," ##### "," # # "," # "," # # "," # ",
|
|
" "," # "," "," # # "," ### "," # "," # "," ",
|
|
" "," # "," "," ##### "," # # "," # "," # # # "," ",
|
|
" "," "," "," # # "," #### "," # ## "," # # "," ",
|
|
" "," # "," "," # # "," # "," ## "," ## # "," ",
|
|
" "," "," "," "," "," "," "," ",
|
|
" # "," # "," # "," "," "," "," "," ",
|
|
" # "," # "," # # # "," # "," "," "," "," # ",
|
|
" # "," # "," ### "," # "," "," "," "," # ",
|
|
" # "," # "," # "," ##### "," "," ##### "," "," # ",
|
|
" # "," # "," ### "," # "," # "," "," "," # ",
|
|
" # "," # "," # # # "," # "," # "," "," "," # ",
|
|
" # "," # "," # "," "," # "," "," # "," ",
|
|
" "," "," "," "," "," "," "," ",
|
|
" ### "," # "," ### "," ##### "," # "," ##### "," ### "," ##### ",
|
|
" # # "," ## "," # # "," # "," ## "," # "," # "," # ",
|
|
" # ## "," # "," # "," # "," # # "," #### "," # "," # ",
|
|
" # # # "," # "," ## "," ## "," # # "," # "," #### "," # ",
|
|
" ## # "," # "," # "," # "," ##### "," # "," # # "," # ",
|
|
" # # "," # "," # "," # # "," # "," # # "," # # "," # ",
|
|
" ### "," ### "," ##### "," ### "," # "," ### "," ### "," # ",
|
|
" "," "," "," "," "," "," "," ",
|
|
" ### "," ### "," "," "," # "," "," # "," ### ",
|
|
" # # "," # # "," "," "," # "," "," # "," # # ",
|
|
" # # "," # # "," # "," # "," # "," ##### "," # "," # ",
|
|
" ### "," #### "," "," "," # "," "," # "," # ",
|
|
" # # "," # "," # "," # "," # "," ##### "," # "," # ",
|
|
" # # "," # "," "," # "," # "," "," # "," ",
|
|
" ### "," ### "," "," # "," # "," "," # "," # ",
|
|
" "," "," "," "," "," "," "," ",
|
|
" # "," "," # "," "," # "," "," ## "," ",
|
|
" # "," "," # "," "," # "," "," # # "," ",
|
|
" # "," ### "," #### "," #### "," #### "," ### "," # "," #### ",
|
|
" "," # "," # # "," # "," # # "," # # "," #### "," # # ",
|
|
" "," #### "," # # "," # "," # # "," ##### "," # "," # # ",
|
|
" "," # # "," # # "," # "," # # "," # "," # "," #### ",
|
|
" "," #### "," #### "," #### "," #### "," #### "," # "," # ",
|
|
" "," "," "," "," "," "," "," ### ",
|
|
" # "," # "," # "," # "," ## "," "," "," ",
|
|
" # "," "," "," # "," # "," "," "," ",
|
|
" #### "," ## "," ## "," # # "," # "," ## ## "," #### "," ### ",
|
|
" # # "," # "," # "," # # "," # "," # # # "," # # "," # # ",
|
|
" # # "," # "," # "," ### "," # "," # # # "," # # "," # # ",
|
|
" # # "," # "," # "," # # "," # "," # # # "," # # "," # # ",
|
|
" # # "," ### "," # # "," # # "," ### "," # # "," # # "," ### ",
|
|
" "," "," ## "," "," "," "," "," ",
|
|
" "," "," "," "," # "," "," "," ",
|
|
" "," "," "," "," # "," "," "," ",
|
|
" #### "," #### "," # ### "," #### "," #### "," # # "," # # "," # # ",
|
|
" # # "," # # "," ## "," # "," # "," # # "," # # "," # # ",
|
|
" # # "," # # "," # "," ### "," # "," # # "," # # "," # # # ",
|
|
" #### "," #### "," # "," # "," # # "," # ## "," # # "," # # # ",
|
|
" # "," # "," # "," #### "," ## "," ## # "," # "," ## ## ",
|
|
" # "," # "," "," "," "," "," "," ",
|
|
" "," "," "," ### "," # "," ### "," ## # "," ",
|
|
" "," "," "," ## "," # "," ## "," # ## "," # # # ",
|
|
" # # "," # # "," ##### "," ## "," # "," ## "," "," # # ",
|
|
" # # "," # # "," # "," ## "," # "," ## "," "," # # # ",
|
|
" # "," # # "," # "," ## "," # "," ## "," "," # # ",
|
|
" # # "," #### "," # "," ## "," # "," ## "," "," # # # ",
|
|
" # # "," # "," ##### "," ### "," # "," ### "," "," ",
|
|
" "," ### "," "," "," # "," "," "," ",
|
|
" # "," # "," "," #######"," "," #######"," ###"," ",
|
|
" # "," # "," "," # # "," #"," ###### "," ##"," ## ",
|
|
" ## ## "," ## ## "," # "," # # "," # "," ##### #"," ######"," ### ",
|
|
" #######"," # #"," ## "," # "," # # "," ## ##"," # ## "," ",
|
|
" ###### "," # # "," ### "," # "," # # "," # # ###"," # ####"," ### ",
|
|
" ###### "," # # "," #### "," # # "," # "," ## ####"," ## "," ## ",
|
|
" ######"," # # #"," ## ## "," # # # "," # "," ## ####"," ###### "," # ",
|
|
" ## ## "," ## ## "," # #"," #######"," "," #######"," # "," ###",
|
|
" # "," "," # "," # "," #######"," #"," ###### "," ## # ",
|
|
" # "," "," # "," ### "," "," #"," ###### "," ## ",
|
|
" # "," "," # "," # # # "," "," # #"," ###### "," ### ",
|
|
" #######"," "," # "," # # #"," "," ## #"," ###### "," ######",
|
|
" # "," "," # # #"," # "," "," #######"," ###### "," ### ",
|
|
" # "," "," # # # "," # "," "," ## "," ###### "," ## ",
|
|
" # "," "," ### "," # "," "," # "," ###### "," # ",
|
|
" "," # # # "," # "," # "," "," "," ###### "," #### ##",
|
|
" # ##"," #"," #"," "," # "," # "," # # # "," # # # #",
|
|
" ## "," # #"," # #"," "," # "," # "," # # # #"," # # # ",
|
|
" ### "," # "," ### "," "," # "," # "," # # # "," # # # #",
|
|
" ###### "," #######"," ##### "," #######"," # "," #######"," # # # #"," # # # ",
|
|
" ### "," ##### "," #######"," "," # "," # "," # # # "," # # # #",
|
|
" ## "," ### "," # "," "," # "," # "," # # # #"," # # # ",
|
|
" # "," # #"," # #"," "," # "," # "," # # # "," # # # #",
|
|
" ## ####"," #"," #"," "," #######"," "," # # # #"," # # # ",
|
|
" "," "," #"," # "," #######"," # # "," #######"," # ",
|
|
" ##### "," "," #"," ### "," "," # # "," #"," # ",
|
|
" # #","####### "," #"," ##### "," "," ### ###"," #"," # ",
|
|
" # "," #"," #"," #######"," "," "," ## #"," # ",
|
|
" # "," #"," #"," ##### "," "," ### ###"," ## #"," # ",
|
|
" # "," #"," #"," ### "," "," # # "," #"," # ",
|
|
" #######","########"," #"," # "," "," # # "," #"," # ",
|
|
" "," "," #"," "," #######"," "," #######"," # ",
|
|
};
|
|
|
|
#define STRINGS_PER_CHAR 8
|
|
#define CHARS_PER_ROW 8
|
|
#define STRINGS_PER_CHAR_ROW (STRINGS_PER_CHAR * CHARS_PER_ROW)
|
|
|
|
void make_csbits (void) {
|
|
int i,j;
|
|
int szstrs = sizeof csstrs / sizeof csstrs[0];
|
|
int numchars = szstrs / STRINGS_PER_CHAR;
|
|
|
|
for (i = 0; i < numchars; ++i) {
|
|
int si = ((i / STRINGS_PER_CHAR) * STRINGS_PER_CHAR_ROW) + (i % CHARS_PER_ROW);
|
|
for (j = 0; j < STRINGS_PER_CHAR; ++j)
|
|
{
|
|
const char *sp = csstrs[si];
|
|
unsigned char cb = 0;
|
|
|
|
si += CHARS_PER_ROW;
|
|
|
|
while (*sp) {
|
|
if (*sp++ != ' ') cb |= 0x80;
|
|
cb >>= 1;
|
|
}
|
|
|
|
csbits[0][i][j] = cb;
|
|
}
|
|
}
|
|
|
|
/* move mousetext */
|
|
for (i = 96; i < 128; ++i)
|
|
for (j = 0; j < 8; ++j)
|
|
csbits[1][i-32][j] = csbits[0][i][j];
|
|
|
|
/* move lowercase */
|
|
for (i = 64; i < 96; ++i)
|
|
for (j = 0; j < 8; ++j)
|
|
csbits[1][i+32][j] = csbits[1][i+160][j] =
|
|
csbits[0][i+160][j] = csbits[0][i][j];
|
|
|
|
/* move numbers */
|
|
for (i = 32; i < 64; ++i)
|
|
for (j = 0; j < 8; ++j)
|
|
csbits[1][i][j] = csbits[1][i+128][j] =
|
|
csbits[0][i+64][j] = csbits[0][i+128][j] = csbits[0][i][j];
|
|
|
|
/* move uppercase */
|
|
for (i = 0; i < 32; ++i)
|
|
for (j = 0; j < 8; ++j)
|
|
csbits[1][i][j] = csbits[1][i+128][j] = csbits[1][i+192][j] =
|
|
csbits[0][i+64][j] = csbits[0][i+128][j] = csbits[0][i+192][j] = csbits[0][i][j];
|
|
|
|
/* invert (skip mousetext) */
|
|
for (i = 0; i < 128; ++i)
|
|
for (j = 0; j < 8; ++j)
|
|
{
|
|
csbits[0][i][j] ^= 0xFF;
|
|
if (i < 64 || i >= 96)
|
|
csbits[1][i][j] ^= 0xFF;
|
|
}
|
|
}
|
|
|
|
#endif
|