1
0
mirror of https://github.com/cc65/cc65.git synced 2024-06-08 15:29:37 +00:00

ASCII to PETSCII lookup

This commit is contained in:
Dave Plummer 2023-10-09 19:09:08 -07:00
parent c6cca00513
commit c32ca8bd27
12 changed files with 375 additions and 334 deletions

View File

@ -1,4 +1,4 @@
# Run 'make SYS=<target>'; or, set a SYS env.
# var. to build for another target system.
SYS ?= kim1
@ -56,14 +56,17 @@ endif
subs.o: subs.asm
$(AS) subs.asm -o subs.o
ramfont.o: ramfont.asm
$(AS) ramfont.asm -o ramfont.o
kimLife.bin: kimLife.c
$(CL) -t kim1 -C kim1-mtu60k.cfg -Oi -o kimLife.bin kimLife.c
$(CL) -t kim1 -C kim1-60k.cfg -Oi -o kimLife.bin kimLife.c
kimTest.bin: kimTest.c
$(CL) -t kim1 -C kim1-60k.cfg -Oi -o kimTest.bin kimTest.c
kimGFX.bin: kimGFX.c ramfont.c subs.o
$(CL) -t kim1 -C kim1-mtu60k.cfg -Oi -o kimGFX.bin kimGFX.c subs.o
kimGFX.bin: kimGFX.c subs.o ramfont.o
$(CL) -t kim1 -C kim1-60k.cfg -Oi -o kimGFX.bin kimGFX.c subs.o ramfont.o
kimSieve.bin: kimSieve.c
$(CL) -t kim1 -C kim1-60k.cfg -O -o kimSieve.bin kimSieve.c
@ -71,13 +74,6 @@ kimSieve.bin: kimSieve.c
kimHello.bin: kimHello.c
$(CL) -t kim1 -O -o kimHello.bin kimHello.c
# Convert a C64/PET ROM font binary into a C table we can use for looking up character definitions
ramfont.c: font.rom
cat font.rom | python -c "import sys; print('unsigned char font8x8_basic[256][8] = {'); \
[print(' {' + ', '.join([f'0x{byte:02x}' for byte in row]) + f'}}, // PETSCII code {i}') for i, row in \
enumerate(iter(lambda: sys.stdin.buffer.read(8), b''), 0)]; print('};')" > ramfont.c
# To build an intel-format file for the CORSHAM SD card reader
kimLife.hex: kimLife.bin

BIN
samples/kim1/kimGFX.bin Normal file

Binary file not shown.

View File

@ -15,18 +15,24 @@
typedef unsigned char byte;
extern void ClearScreen(void); // In subs.asm
extern void ScrollScreen(void); // In subs.asm
extern void DrawCircle(void); // In subs.asm
extern void ScrollScreen(void);
extern void DrawCircle(void);
extern void SetPixel(void);
extern void ClearPixel(void);
extern byte __fastcall__ AscToPet(byte in);
extern unsigned char font8x8_basic[256][8];
extern int x1cord;
extern int y1cord;
extern int x2cord;
extern int y2cord;
#pragma zpsym("x1cord")
#pragma zpsym("x2cord")
#pragma zpsym("y1cord")
#pragma zpsym("y2cord")
// If in zeropage:
//
// #pragma zpsym("x1cord")
// #pragma zpsym("x2cord")
// #pragma zpsym("y1cord")
// #pragma zpsym("y2cord")
// Screen memory is placed at A000-BFFF, 320x200 pixels, mapped right to left within each horizontal byte
@ -55,14 +61,13 @@ int CursorY = 0;
void SETPIXEL(int x, int y, byte b)
{
byte * pb = screen;
pb += x >> 3;
pb += y * BYTESPERROW;
x1cord = x;
y1cord = y;
if (b)
*(pb) |= (0b10000000 >> (x & 7));
SetPixel();
else
*(pb) &= ~(0b10000000 >> (x & 7));
ClearPixel();
}
// DRAWPIXEL
@ -74,59 +79,11 @@ void SETPIXEL(int x, int y, byte b)
void DRAWPIXEL(int x, int y)
{
byte * pb = screen;
pb += x >> 3;
pb += y * BYTESPERROW;
*(pb) |= (0b10000000 >> (x & 7));
x1cord = x;
y1cord = y;
SetPixel();
}
/* kimmon9000.hex - Not used yet, but available for conversion from PETSCIi to ASCII
const unsigned char petToAscTable[256] =
{
0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x14,0x09,0x0d,0x11,0x93,0x0a,0x0e,0x0f,
0x10,0x0b,0x12,0x13,0x08,0x15,0x16,0x17,0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f,
0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2a,0x2b,0x2c,0x2d,0x2e,0x2f,
0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3a,0x3b,0x3c,0x3d,0x3e,0x3f,
0x40,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6a,0x6b,0x6c,0x6d,0x6e,0x6f,
0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7a,0x5b,0x5c,0x5d,0x5e,0x5f,
0xc0,0xc1,0xc2,0xc3,0xc4,0xc5,0xc6,0xc7,0xc8,0xc9,0xca,0xcb,0xcc,0xcd,0xce,0xcf,
0xd0,0xd1,0xd2,0xd3,0xd4,0xd5,0xd6,0xd7,0xd8,0xd9,0xda,0xdb,0xdc,0xdd,0xde,0xdf,
0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f,
0x90,0x91,0x92,0x0c,0x94,0x95,0x96,0x97,0x98,0x99,0x9a,0x9b,0x9c,0x9d,0x9e,0x9f,
0xa0,0xa1,0xa2,0xa3,0xa4,0xa5,0xa6,0xa7,0xa8,0xa9,0xaa,0xab,0xac,0xad,0xae,0xaf,
0xb0,0xb1,0xb2,0xb3,0xb4,0xb5,0xb6,0xb7,0xb8,0xb9,0xba,0xbb,0xbc,0xbd,0xbe,0xbf,
0x60,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4a,0x4b,0x4c,0x4d,0x4e,0x4f,
0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5a,0x7b,0x7c,0x7d,0x7e,0x7f,
0xa0,0xa1,0xa2,0xa3,0xa4,0xa5,0xa6,0xa7,0xa8,0xa9,0xaa,0xab,0xac,0xad,0xae,0xaf,
0xb0,0xb1,0xb2,0xb3,0xb4,0xb5,0xb6,0xb7,0xb8,0xb9,0xba,0xbb,0xbc,0xbd,0xbe,0xbf
};
*/
// ascToPetTable
//
// Translation lookup table to go from ASCII to PETSCII
const unsigned char ascToPetTable[256] =
{
0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x14,0x20,0x0d,0x11,0x93,0x0a,0x0e,0x0f,
0x10,0x0b,0x12,0x13,0x08,0x15,0x16,0x17,0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f,
0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2a,0x2b,0x2c,0x2d,0x2e,0x2f,
0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3a,0x3b,0x3c,0x3d,0x3e,0x3f,
0x40,0xc1,0xc2,0xc3,0xc4,0xc5,0xc6,0xc7,0xc8,0xc9,0xca,0xcb,0xcc,0xcd,0xce,0xcf,
0xd0,0xd1,0xd2,0xd3,0xd4,0xd5,0xd6,0xd7,0xd8,0xd9,0xda,0x5b,0x5c,0x5d,0x5e,0x5f,
0xc0,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4a,0x4b,0x4c,0x4d,0x4e,0x4f,
0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5a,0xdb,0xdc,0xdd,0xde,0xdf,
0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f,
0x90,0x91,0x92,0x0c,0x94,0x95,0x96,0x97,0x98,0x99,0x9a,0x9b,0x9c,0x9d,0x9e,0x9f,
0xa0,0xa1,0xa2,0xa3,0xa4,0xa5,0xa6,0xa7,0xa8,0xa9,0xaa,0xab,0xac,0xad,0xae,0xaf,
0xb0,0xb1,0xb2,0xb3,0xb4,0xb5,0xb6,0xb7,0xb8,0xb9,0xba,0xbb,0xbc,0xbd,0xbe,0xbf,
0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6a,0x6b,0x6c,0x6d,0x6e,0x6f,
0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7a,0x7b,0x7c,0x7d,0x7e,0x7f,
0xe0,0xe1,0xe2,0xe3,0xe4,0xe5,0xe6,0xe7,0xe8,0xe9,0xea,0xeb,0xec,0xed,0xee,0xef,
0xf0,0xf1,0xf2,0xf3,0xf4,0xf5,0xf6,0xf7,0xf8,0xf9,0xfa,0xfb,0xfc,0xfd,0xfe,0xff
};
// DrawChar
//
// 0 <= x < 40
@ -138,7 +95,7 @@ void DrawChar(int x, int y, char petscii)
{
byte * pb = screen;
int i;
char c = ascToPetTable[petscii];
char c = AscToPet(petscii);
if (x < 0 || y < 0 || x >= CHARSPERROW || y >= ROWSPERCOLUMN)
return;
@ -286,6 +243,32 @@ void DrawScreenMoire(int left, int top, int right, int bottom)
}
void OldDrawCircleC(int x0, int y0, int radius, byte val)
{
int x = radius;
int y = 0;
int err = 0;
while (x >= y)
{
SETPIXEL(x0 + x, y0 + y, val);
SETPIXEL(x0 + y, y0 + x, val);
SETPIXEL(x0 - y, y0 + x, val);
SETPIXEL(x0 - x, y0 + y, val);
SETPIXEL(x0 - x, y0 - y, val);
SETPIXEL(x0 - y, y0 - x, val);
SETPIXEL(x0 + y, y0 - x, val);
SETPIXEL(x0 + x, y0 - y, val);
y++;
err += 1 + 2 * y;
if (2 * (err - x) + 1 > 0) {
x--;
err += 1 - 2 * x;
}
}
}
int main (void)
{
int i;
@ -294,10 +277,11 @@ int main (void)
ClearScreen();
// Draw the welcome banner at the top of the screen
DrawTextAt(0, 0, " *** COMMODORE KIM-1 SYSTEM ***");
DrawTextAt(0, 0, " *** COMMODORE KIM-1 SHELL v1.1 ***");
DrawTextAt(0, 2, " 60K RAM SYSTEM. 49152 BYTES FREE.");
DrawTextAt(0, 4, "READY.\n");
// DrawScreenMoire(0,30, 319, 199);
// Print the numbers from 0-9999, forcing the screen to scroll
for (i = 5; i < 75; i+=5)

BIN
samples/kim1/kimHello.bin Normal file

Binary file not shown.

BIN
samples/kim1/kimLife.bin Normal file

Binary file not shown.

BIN
samples/kim1/kimSieve.bin Normal file

Binary file not shown.

BIN
samples/kim1/kimTest.bin Normal file

Binary file not shown.

272
samples/kim1/ramfont.asm Normal file
View File

@ -0,0 +1,272 @@
;-----------------------------------------------------------------------------------
; KIMGFX: Simple pixel graphics for the MOS/Commodore KIM-1
;-----------------------------------------------------------------------------------
; (c) Plummer's Software Ltd, 04/25/2023 Created
; David Plummer
;-----------------------------------------------------------------------------------
;
; File: ramfont.s
; Magnetic OCR (check number style) Font data
;
;-----------------------------------------------------------------------------------
.segment "CODE"
.export _font8x8_basic
_font8x8_basic:
.byte $1c, $22, $4a, $56, $4c, $20, $1e, $00 ; PETSCII code 0
.byte $3c, $24, $24, $7e, $62, $62, $62, $00 ; PETSCII code 1
.byte $78, $44, $44, $7c, $62, $62, $7e, $00 ; PETSCII code 2
.byte $7e, $42, $40, $60, $60, $62, $7e, $00 ; PETSCII code 3
.byte $7c, $46, $42, $62, $62, $66, $7c, $00 ; PETSCII code 4
.byte $7e, $40, $40, $7c, $60, $60, $7e, $00 ; PETSCII code 5
.byte $7e, $40, $40, $7e, $60, $60, $60, $00 ; PETSCII code 6
.byte $7e, $42, $40, $6e, $62, $62, $7e, $00 ; PETSCII code 7
.byte $42, $42, $42, $7e, $62, $62, $62, $00 ; PETSCII code 8
.byte $08, $08, $08, $0c, $0c, $0c, $0c, $00 ; PETSCII code 9
.byte $04, $04, $04, $06, $06, $46, $7e, $00 ; PETSCII code 10
.byte $42, $44, $48, $7c, $62, $62, $62, $00 ; PETSCII code 11
.byte $40, $40, $40, $60, $60, $60, $7e, $00 ; PETSCII code 12
.byte $7e, $4a, $4a, $6a, $6a, $6a, $6a, $00 ; PETSCII code 13
.byte $7e, $42, $42, $62, $62, $62, $62, $00 ; PETSCII code 14
.byte $7e, $46, $42, $42, $42, $42, $7e, $00 ; PETSCII code 15
.byte $7e, $42, $42, $7e, $60, $60, $60, $00 ; PETSCII code 16
.byte $7e, $42, $42, $42, $4a, $4e, $7e, $00 ; PETSCII code 17
.byte $7c, $44, $44, $7c, $62, $62, $62, $00 ; PETSCII code 18
.byte $7e, $42, $40, $7e, $06, $46, $7e, $00 ; PETSCII code 19
.byte $3e, $10, $10, $18, $18, $18, $18, $00 ; PETSCII code 20
.byte $42, $42, $42, $62, $62, $62, $7e, $00 ; PETSCII code 21
.byte $62, $62, $62, $66, $24, $24, $3c, $00 ; PETSCII code 22
.byte $4a, $4a, $4a, $6a, $6a, $6a, $7e, $00 ; PETSCII code 23
.byte $42, $42, $66, $18, $66, $62, $62, $00 ; PETSCII code 24
.byte $22, $22, $22, $3e, $18, $18, $18, $00 ; PETSCII code 25
.byte $7e, $42, $06, $18, $60, $62, $7e, $00 ; PETSCII code 26
.byte $3c, $20, $20, $20, $20, $20, $3c, $00 ; PETSCII code 27
.byte $00, $40, $20, $10, $08, $04, $02, $00 ; PETSCII code 28
.byte $3c, $04, $04, $04, $04, $04, $3c, $00 ; PETSCII code 29
.byte $00, $08, $1c, $2a, $08, $08, $14, $14 ; PETSCII code 30
.byte $00, $00, $10, $20, $7f, $20, $10, $00 ; PETSCII code 31
.byte $00, $00, $00, $00, $00, $00, $00, $00 ; PETSCII code 32
.byte $08, $08, $08, $0c, $0c, $00, $0c, $00 ; PETSCII code 33
.byte $6c, $24, $6c, $00, $00, $00, $00, $00 ; PETSCII code 34
.byte $24, $24, $7e, $24, $7e, $24, $24, $00 ; PETSCII code 35
.byte $08, $3e, $20, $3e, $06, $3e, $08, $00 ; PETSCII code 36
.byte $00, $62, $64, $08, $10, $26, $46, $00 ; PETSCII code 37
.byte $3c, $20, $24, $7e, $64, $64, $7c, $00 ; PETSCII code 38
.byte $1c, $18, $10, $00, $00, $00, $00, $00 ; PETSCII code 39
.byte $04, $08, $10, $10, $10, $08, $04, $00 ; PETSCII code 40
.byte $20, $10, $08, $08, $08, $10, $20, $00 ; PETSCII code 41
.byte $08, $2a, $1c, $3e, $1c, $2a, $08, $00 ; PETSCII code 42
.byte $00, $08, $08, $3e, $08, $08, $00, $00 ; PETSCII code 43
.byte $00, $00, $00, $00, $00, $18, $18, $08 ; PETSCII code 44
.byte $00, $00, $00, $7e, $00, $00, $00, $00 ; PETSCII code 45
.byte $00, $00, $00, $00, $00, $18, $18, $00 ; PETSCII code 46
.byte $00, $02, $04, $08, $10, $20, $40, $00 ; PETSCII code 47
.byte $7e, $62, $52, $4a, $46, $46, $7e, $00 ; PETSCII code 48
.byte $18, $08, $08, $18, $18, $1a, $3e, $00 ; PETSCII code 49
.byte $7e, $42, $02, $7e, $60, $60, $7e, $00 ; PETSCII code 50
.byte $7c, $44, $04, $1e, $06, $46, $7e, $00 ; PETSCII code 51
.byte $44, $44, $44, $44, $7e, $0c, $0c, $00 ; PETSCII code 52
.byte $7e, $40, $7e, $06, $06, $46, $7e, $00 ; PETSCII code 53
.byte $7e, $42, $40, $7e, $46, $46, $7e, $00 ; PETSCII code 54
.byte $7e, $02, $02, $06, $06, $06, $06, $00 ; PETSCII code 55
.byte $3c, $24, $24, $7e, $46, $46, $7e, $00 ; PETSCII code 56
.byte $7e, $42, $42, $7e, $06, $06, $06, $00 ; PETSCII code 57
.byte $00, $00, $18, $00, $00, $18, $00, $00 ; PETSCII code 58
.byte $00, $00, $18, $00, $00, $18, $18, $08 ; PETSCII code 59
.byte $0e, $18, $30, $60, $30, $18, $0e, $00 ; PETSCII code 60
.byte $00, $00, $7e, $00, $7e, $00, $00, $00 ; PETSCII code 61
.byte $70, $18, $0c, $06, $0c, $18, $70, $00 ; PETSCII code 62
.byte $7e, $02, $02, $7e, $60, $00, $60, $00 ; PETSCII code 63
.byte $00, $00, $00, $00, $ff, $00, $00, $00 ; PETSCII code 64
.byte $08, $1c, $3e, $7f, $7f, $1c, $3e, $00 ; PETSCII code 65
.byte $10, $10, $10, $10, $10, $10, $10, $10 ; PETSCII code 66
.byte $00, $00, $00, $ff, $00, $00, $00, $00 ; PETSCII code 67
.byte $00, $00, $ff, $00, $00, $00, $00, $00 ; PETSCII code 68
.byte $00, $ff, $00, $00, $00, $00, $00, $00 ; PETSCII code 69
.byte $00, $00, $00, $00, $00, $ff, $00, $00 ; PETSCII code 70
.byte $20, $20, $20, $20, $20, $20, $20, $20 ; PETSCII code 71
.byte $04, $04, $04, $04, $04, $04, $04, $04 ; PETSCII code 72
.byte $00, $00, $00, $00, $e0, $10, $08, $08 ; PETSCII code 73
.byte $08, $08, $08, $04, $03, $00, $00, $00 ; PETSCII code 74
.byte $08, $08, $08, $10, $e0, $00, $00, $00 ; PETSCII code 75
.byte $80, $80, $80, $80, $80, $80, $80, $ff ; PETSCII code 76
.byte $80, $40, $20, $10, $08, $04, $02, $01 ; PETSCII code 77
.byte $01, $02, $04, $08, $10, $20, $40, $80 ; PETSCII code 78
.byte $ff, $80, $80, $80, $80, $80, $80, $80 ; PETSCII code 79
.byte $ff, $01, $01, $01, $01, $01, $01, $01 ; PETSCII code 80
.byte $00, $3c, $7e, $7e, $7e, $7e, $3c, $00 ; PETSCII code 81
.byte $00, $00, $00, $00, $00, $00, $ff, $00 ; PETSCII code 82
.byte $36, $7f, $7f, $7f, $3e, $1c, $08, $00 ; PETSCII code 83
.byte $40, $40, $40, $40, $40, $40, $40, $40 ; PETSCII code 84
.byte $00, $00, $00, $00, $03, $04, $08, $08 ; PETSCII code 85
.byte $81, $42, $24, $18, $18, $24, $42, $81 ; PETSCII code 86
.byte $00, $3c, $42, $42, $42, $42, $3c, $00 ; PETSCII code 87
.byte $08, $1c, $2a, $77, $2a, $08, $08, $00 ; PETSCII code 88
.byte $02, $02, $02, $02, $02, $02, $02, $02 ; PETSCII code 89
.byte $08, $1c, $3e, $7f, $3e, $1c, $08, $00 ; PETSCII code 90
.byte $08, $08, $08, $08, $ff, $08, $08, $08 ; PETSCII code 91
.byte $a0, $50, $a0, $50, $a0, $50, $a0, $50 ; PETSCII code 92
.byte $08, $08, $08, $08, $08, $08, $08, $08 ; PETSCII code 93
.byte $00, $00, $01, $3e, $54, $14, $14, $00 ; PETSCII code 94
.byte $ff, $7f, $3f, $1f, $0f, $07, $03, $01 ; PETSCII code 95
.byte $00, $00, $00, $00, $00, $00, $00, $00 ; PETSCII code 96
.byte $f0, $f0, $f0, $f0, $f0, $f0, $f0, $f0 ; PETSCII code 97
.byte $00, $00, $00, $00, $ff, $ff, $ff, $ff ; PETSCII code 98
.byte $ff, $00, $00, $00, $00, $00, $00, $00 ; PETSCII code 99
.byte $00, $00, $00, $00, $00, $00, $00, $ff ; PETSCII code 100
.byte $80, $80, $80, $80, $80, $80, $80, $80 ; PETSCII code 101
.byte $aa, $55, $aa, $55, $aa, $55, $aa, $55 ; PETSCII code 102
.byte $01, $01, $01, $01, $01, $01, $01, $01 ; PETSCII code 103
.byte $00, $00, $00, $00, $aa, $55, $aa, $55 ; PETSCII code 104
.byte $ff, $fe, $fc, $f8, $f0, $e0, $c0, $80 ; PETSCII code 105
.byte $03, $03, $03, $03, $03, $03, $03, $03 ; PETSCII code 106
.byte $08, $08, $08, $08, $0f, $08, $08, $08 ; PETSCII code 107
.byte $00, $00, $00, $00, $0f, $0f, $0f, $0f ; PETSCII code 108
.byte $08, $08, $08, $08, $0f, $00, $00, $00 ; PETSCII code 109
.byte $00, $00, $00, $00, $f8, $08, $08, $08 ; PETSCII code 110
.byte $00, $00, $00, $00, $00, $00, $ff, $ff ; PETSCII code 111
.byte $00, $00, $00, $00, $0f, $08, $08, $08 ; PETSCII code 112
.byte $08, $08, $08, $08, $ff, $00, $00, $00 ; PETSCII code 113
.byte $00, $00, $00, $00, $ff, $08, $08, $08 ; PETSCII code 114
.byte $08, $08, $08, $08, $f8, $08, $08, $08 ; PETSCII code 115
.byte $c0, $c0, $c0, $c0, $c0, $c0, $c0, $c0 ; PETSCII code 116
.byte $e0, $e0, $e0, $e0, $e0, $e0, $e0, $e0 ; PETSCII code 117
.byte $07, $07, $07, $07, $07, $07, $07, $07 ; PETSCII code 118
.byte $ff, $ff, $00, $00, $00, $00, $00, $00 ; PETSCII code 119
.byte $ff, $ff, $ff, $00, $00, $00, $00, $00 ; PETSCII code 120
.byte $00, $00, $00, $00, $00, $ff, $ff, $ff ; PETSCII code 121
.byte $01, $01, $01, $01, $01, $01, $01, $ff ; PETSCII code 122
.byte $00, $00, $00, $00, $f0, $f0, $f0, $f0 ; PETSCII code 123
.byte $0f, $0f, $0f, $0f, $00, $00, $00, $00 ; PETSCII code 124
.byte $08, $08, $08, $08, $f8, $00, $00, $00 ; PETSCII code 125
.byte $f0, $f0, $f0, $f0, $00, $00, $00, $00 ; PETSCII code 126
.byte $f0, $f0, $f0, $f0, $0f, $0f, $0f, $0f ; PETSCII code 127
.byte $1c, $22, $4a, $56, $4c, $20, $1e, $00 ; PETSCII code 128
.byte $00, $00, $3c, $04, $7c, $64, $7c, $00 ; PETSCII code 129
.byte $40, $40, $7e, $42, $62, $62, $7e, $00 ; PETSCII code 130
.byte $00, $00, $7e, $42, $60, $62, $7e, $00 ; PETSCII code 131
.byte $02, $02, $7e, $42, $62, $62, $7e, $00 ; PETSCII code 132
.byte $00, $00, $7e, $42, $7e, $60, $7e, $00 ; PETSCII code 133
.byte $1e, $12, $10, $7c, $18, $18, $18, $00 ; PETSCII code 134
.byte $00, $00, $7e, $42, $62, $7e, $02, $7e ; PETSCII code 135
.byte $40, $40, $7e, $42, $62, $62, $62, $00 ; PETSCII code 136
.byte $18, $00, $10, $10, $18, $18, $18, $00 ; PETSCII code 137
.byte $0c, $00, $08, $0c, $0c, $0c, $44, $7c ; PETSCII code 138
.byte $40, $40, $44, $48, $78, $64, $64, $00 ; PETSCII code 139
.byte $10, $10, $10, $10, $18, $18, $18, $00 ; PETSCII code 140
.byte $00, $00, $7f, $49, $6d, $6d, $6d, $00 ; PETSCII code 141
.byte $00, $00, $7e, $42, $62, $62, $62, $00 ; PETSCII code 142
.byte $00, $00, $7e, $42, $62, $62, $7e, $00 ; PETSCII code 143
.byte $00, $00, $7e, $42, $62, $7e, $40, $40 ; PETSCII code 144
.byte $00, $00, $7e, $42, $46, $7e, $02, $02 ; PETSCII code 145
.byte $00, $00, $7e, $40, $60, $60, $60, $00 ; PETSCII code 146
.byte $00, $00, $7e, $40, $7e, $06, $7e, $00 ; PETSCII code 147
.byte $10, $10, $7c, $10, $18, $18, $18, $00 ; PETSCII code 148
.byte $00, $00, $42, $42, $62, $62, $7e, $00 ; PETSCII code 149
.byte $00, $00, $62, $62, $66, $24, $3c, $00 ; PETSCII code 150
.byte $00, $00, $49, $49, $6d, $6d, $7f, $00 ; PETSCII code 151
.byte $00, $00, $42, $42, $3c, $62, $62, $00 ; PETSCII code 152
.byte $00, $00, $62, $62, $42, $7e, $02, $7e ; PETSCII code 153
.byte $00, $00, $7e, $06, $18, $60, $7e, $00 ; PETSCII code 154
.byte $3c, $20, $20, $20, $20, $20, $3c, $00 ; PETSCII code 155
.byte $00, $40, $20, $10, $08, $04, $02, $00 ; PETSCII code 156
.byte $3c, $04, $04, $04, $04, $04, $3c, $00 ; PETSCII code 157
.byte $00, $08, $1c, $2a, $08, $08, $14, $14 ; PETSCII code 158
.byte $00, $00, $10, $20, $7f, $20, $10, $00 ; PETSCII code 159
.byte $00, $00, $00, $00, $00, $00, $00, $00 ; PETSCII code 160
.byte $08, $08, $08, $0c, $0c, $00, $0c, $00 ; PETSCII code 161
.byte $6c, $24, $6c, $00, $00, $00, $00, $00 ; PETSCII code 162
.byte $24, $24, $7e, $24, $7e, $24, $24, $00 ; PETSCII code 163
.byte $08, $3e, $20, $3e, $06, $3e, $08, $00 ; PETSCII code 164
.byte $00, $62, $64, $08, $10, $26, $46, $00 ; PETSCII code 165
.byte $3c, $20, $24, $7e, $64, $64, $7c, $00 ; PETSCII code 166
.byte $1c, $18, $10, $00, $00, $00, $00, $00 ; PETSCII code 167
.byte $04, $08, $10, $10, $10, $08, $04, $00 ; PETSCII code 168
.byte $20, $10, $08, $08, $08, $10, $20, $00 ; PETSCII code 169
.byte $08, $2a, $1c, $3e, $1c, $2a, $08, $00 ; PETSCII code 170
.byte $00, $08, $08, $3e, $08, $08, $00, $00 ; PETSCII code 171
.byte $00, $00, $00, $00, $00, $18, $18, $08 ; PETSCII code 172
.byte $00, $00, $00, $7e, $00, $00, $00, $00 ; PETSCII code 173
.byte $00, $00, $00, $00, $00, $18, $18, $00 ; PETSCII code 174
.byte $00, $02, $04, $08, $10, $20, $40, $00 ; PETSCII code 175
.byte $7e, $62, $52, $4a, $46, $46, $7e, $00 ; PETSCII code 176
.byte $38, $08, $08, $18, $18, $1a, $3e, $00 ; PETSCII code 177
.byte $7e, $42, $02, $7e, $60, $60, $7e, $00 ; PETSCII code 178
.byte $7c, $44, $04, $1e, $06, $46, $7e, $00 ; PETSCII code 179
.byte $44, $44, $44, $44, $7e, $0c, $0c, $00 ; PETSCII code 180
.byte $7e, $40, $7e, $06, $06, $46, $7e, $00 ; PETSCII code 181
.byte $7e, $42, $40, $7e, $46, $46, $7e, $00 ; PETSCII code 182
.byte $7e, $02, $02, $06, $06, $06, $06, $00 ; PETSCII code 183
.byte $3c, $24, $24, $7e, $46, $46, $7e, $00 ; PETSCII code 184
.byte $7e, $42, $42, $7e, $06, $06, $06, $00 ; PETSCII code 185
.byte $00, $00, $18, $00, $00, $18, $00, $00 ; PETSCII code 186
.byte $00, $00, $18, $00, $00, $18, $18, $08 ; PETSCII code 187
.byte $0e, $18, $30, $60, $30, $18, $0e, $00 ; PETSCII code 188
.byte $00, $00, $7e, $00, $7e, $00, $00, $00 ; PETSCII code 189
.byte $70, $18, $0c, $06, $0c, $18, $70, $00 ; PETSCII code 190
.byte $7e, $02, $02, $7e, $60, $00, $60, $00 ; PETSCII code 191
.byte $00, $00, $00, $00, $ff, $00, $00, $00 ; PETSCII code 192
.byte $3c, $24, $24, $7e, $62, $62, $62, $00 ; PETSCII code 193
.byte $78, $44, $44, $7c, $62, $62, $7e, $00 ; PETSCII code 194
.byte $7e, $42, $40, $60, $60, $62, $7e, $00 ; PETSCII code 195
.byte $7c, $46, $42, $62, $62, $66, $7c, $00 ; PETSCII code 196
.byte $7e, $40, $40, $78, $60, $60, $7e, $00 ; PETSCII code 197
.byte $7e, $40, $40, $7e, $60, $60, $60, $00 ; PETSCII code 198
.byte $7e, $42, $40, $6e, $62, $62, $7e, $00 ; PETSCII code 199
.byte $42, $42, $42, $7e, $62, $62, $62, $00 ; PETSCII code 200
.byte $08, $08, $08, $0c, $0c, $0c, $0c, $00 ; PETSCII code 201
.byte $04, $04, $04, $06, $06, $46, $7e, $00 ; PETSCII code 202
.byte $42, $44, $48, $7c, $62, $62, $62, $00 ; PETSCII code 203
.byte $40, $40, $40, $60, $60, $60, $7e, $00 ; PETSCII code 204
.byte $7e, $4a, $4a, $6a, $6a, $6a, $6a, $00 ; PETSCII code 205
.byte $7e, $42, $42, $62, $62, $62, $62, $00 ; PETSCII code 206
.byte $7e, $46, $42, $42, $42, $42, $7e, $00 ; PETSCII code 207
.byte $7e, $42, $42, $7e, $60, $60, $60, $00 ; PETSCII code 208
.byte $7e, $42, $42, $42, $4a, $4e, $7e, $00 ; PETSCII code 209
.byte $7c, $44, $44, $7c, $62, $62, $62, $00 ; PETSCII code 210
.byte $7e, $42, $40, $7e, $06, $46, $7e, $00 ; PETSCII code 211
.byte $3e, $10, $10, $18, $18, $18, $18, $00 ; PETSCII code 212
.byte $42, $42, $42, $62, $62, $62, $7e, $00 ; PETSCII code 213
.byte $62, $62, $62, $66, $24, $24, $3c, $00 ; PETSCII code 214
.byte $4a, $4a, $4a, $6a, $6a, $6a, $7e, $00 ; PETSCII code 215
.byte $42, $42, $66, $3c, $66, $62, $62, $00 ; PETSCII code 216
.byte $22, $22, $22, $3e, $18, $18, $18, $00 ; PETSCII code 217
.byte $7e, $42, $06, $18, $60, $62, $7e, $00 ; PETSCII code 218
.byte $08, $08, $08, $08, $ff, $08, $08, $08 ; PETSCII code 219
.byte $a0, $50, $a0, $50, $a0, $50, $a0, $50 ; PETSCII code 220
.byte $08, $08, $08, $08, $08, $08, $08, $08 ; PETSCII code 221
.byte $cc, $cc, $33, $33, $cc, $cc, $33, $33 ; PETSCII code 222
.byte $cc, $66, $33, $99, $cc, $66, $33, $99 ; PETSCII code 223
.byte $00, $00, $00, $00, $00, $00, $00, $00 ; PETSCII code 224
.byte $f0, $f0, $f0, $f0, $f0, $f0, $f0, $f0 ; PETSCII code 225
.byte $00, $00, $00, $00, $ff, $ff, $ff, $ff ; PETSCII code 226
.byte $ff, $00, $00, $00, $00, $00, $00, $00 ; PETSCII code 227
.byte $00, $00, $00, $00, $00, $00, $00, $ff ; PETSCII code 228
.byte $80, $80, $80, $80, $80, $80, $80, $80 ; PETSCII code 229
.byte $aa, $55, $aa, $55, $aa, $55, $aa, $55 ; PETSCII code 230
.byte $01, $01, $01, $01, $01, $01, $01, $01 ; PETSCII code 231
.byte $00, $00, $00, $00, $aa, $55, $aa, $55 ; PETSCII code 232
.byte $99, $33, $66, $cc, $99, $33, $66, $cc ; PETSCII code 233
.byte $03, $03, $03, $03, $03, $03, $03, $03 ; PETSCII code 234
.byte $08, $08, $08, $08, $0f, $08, $08, $08 ; PETSCII code 235
.byte $00, $00, $00, $00, $0f, $0f, $0f, $0f ; PETSCII code 236
.byte $08, $08, $08, $08, $0f, $00, $00, $00 ; PETSCII code 237
.byte $00, $00, $00, $00, $f8, $08, $08, $08 ; PETSCII code 238
.byte $00, $00, $00, $00, $00, $00, $ff, $ff ; PETSCII code 239
.byte $00, $00, $00, $00, $0f, $08, $08, $08 ; PETSCII code 240
.byte $08, $08, $08, $08, $ff, $00, $00, $00 ; PETSCII code 241
.byte $00, $00, $00, $00, $ff, $08, $08, $08 ; PETSCII code 242
.byte $08, $08, $08, $08, $f8, $08, $08, $08 ; PETSCII code 243
.byte $c0, $c0, $c0, $c0, $c0, $c0, $c0, $c0 ; PETSCII code 244
.byte $e0, $e0, $e0, $e0, $e0, $e0, $e0, $e0 ; PETSCII code 245
.byte $07, $07, $07, $07, $07, $07, $07, $07 ; PETSCII code 246
.byte $ff, $ff, $00, $00, $00, $00, $00, $00 ; PETSCII code 247
.byte $ff, $ff, $ff, $00, $00, $00, $00, $00 ; PETSCII code 248
.byte $00, $00, $00, $00, $00, $ff, $ff, $ff ; PETSCII code 249
.byte $01, $02, $44, $48, $50, $60, $40, $00 ; PETSCII code 250
.byte $00, $00, $00, $00, $f0, $f0, $f0, $f0 ; PETSCII code 251
.byte $0f, $0f, $0f, $0f, $00, $00, $00, $00 ; PETSCII code 252
.byte $08, $08, $08, $08, $f8, $00, $00, $00 ; PETSCII code 253
.byte $f0, $f0, $f0, $f0, $00, $00, $00, $00 ; PETSCII code 254
.byte $f0, $f0, $f0, $f0, $0f, $0f, $0f, $0f ; PETSCII code 255

View File

@ -1,258 +0,0 @@
unsigned char font8x8_basic[256][8] = {
{0x1c, 0x22, 0x4a, 0x56, 0x4c, 0x20, 0x1e, 0x00}, // PETSCII code 0
{0x3c, 0x24, 0x24, 0x7e, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 1
{0x78, 0x44, 0x44, 0x7c, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 2
{0x7e, 0x42, 0x40, 0x60, 0x60, 0x62, 0x7e, 0x00}, // PETSCII code 3
{0x7c, 0x46, 0x42, 0x62, 0x62, 0x66, 0x7c, 0x00}, // PETSCII code 4
{0x7e, 0x40, 0x40, 0x7c, 0x60, 0x60, 0x7e, 0x00}, // PETSCII code 5
{0x7e, 0x40, 0x40, 0x7e, 0x60, 0x60, 0x60, 0x00}, // PETSCII code 6
{0x7e, 0x42, 0x40, 0x6e, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 7
{0x42, 0x42, 0x42, 0x7e, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 8
{0x08, 0x08, 0x08, 0x0c, 0x0c, 0x0c, 0x0c, 0x00}, // PETSCII code 9
{0x04, 0x04, 0x04, 0x06, 0x06, 0x46, 0x7e, 0x00}, // PETSCII code 10
{0x42, 0x44, 0x48, 0x7c, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 11
{0x40, 0x40, 0x40, 0x60, 0x60, 0x60, 0x7e, 0x00}, // PETSCII code 12
{0x7e, 0x4a, 0x4a, 0x6a, 0x6a, 0x6a, 0x6a, 0x00}, // PETSCII code 13
{0x7e, 0x42, 0x42, 0x62, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 14
{0x7e, 0x46, 0x42, 0x42, 0x42, 0x42, 0x7e, 0x00}, // PETSCII code 15
{0x7e, 0x42, 0x42, 0x7e, 0x60, 0x60, 0x60, 0x00}, // PETSCII code 16
{0x7e, 0x42, 0x42, 0x42, 0x4a, 0x4e, 0x7e, 0x00}, // PETSCII code 17
{0x7c, 0x44, 0x44, 0x7c, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 18
{0x7e, 0x42, 0x40, 0x7e, 0x06, 0x46, 0x7e, 0x00}, // PETSCII code 19
{0x3e, 0x10, 0x10, 0x18, 0x18, 0x18, 0x18, 0x00}, // PETSCII code 20
{0x42, 0x42, 0x42, 0x62, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 21
{0x62, 0x62, 0x62, 0x66, 0x24, 0x24, 0x3c, 0x00}, // PETSCII code 22
{0x4a, 0x4a, 0x4a, 0x6a, 0x6a, 0x6a, 0x7e, 0x00}, // PETSCII code 23
{0x42, 0x42, 0x66, 0x18, 0x66, 0x62, 0x62, 0x00}, // PETSCII code 24
{0x22, 0x22, 0x22, 0x3e, 0x18, 0x18, 0x18, 0x00}, // PETSCII code 25
{0x7e, 0x42, 0x06, 0x18, 0x60, 0x62, 0x7e, 0x00}, // PETSCII code 26
{0x3c, 0x20, 0x20, 0x20, 0x20, 0x20, 0x3c, 0x00}, // PETSCII code 27
{0x00, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x00}, // PETSCII code 28
{0x3c, 0x04, 0x04, 0x04, 0x04, 0x04, 0x3c, 0x00}, // PETSCII code 29
{0x00, 0x08, 0x1c, 0x2a, 0x08, 0x08, 0x14, 0x14}, // PETSCII code 30
{0x00, 0x00, 0x10, 0x20, 0x7f, 0x20, 0x10, 0x00}, // PETSCII code 31
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 32
{0x08, 0x08, 0x08, 0x0c, 0x0c, 0x00, 0x0c, 0x00}, // PETSCII code 33
{0x6c, 0x24, 0x6c, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 34
{0x24, 0x24, 0x7e, 0x24, 0x7e, 0x24, 0x24, 0x00}, // PETSCII code 35
{0x08, 0x3e, 0x20, 0x3e, 0x06, 0x3e, 0x08, 0x00}, // PETSCII code 36
{0x00, 0x62, 0x64, 0x08, 0x10, 0x26, 0x46, 0x00}, // PETSCII code 37
{0x3c, 0x20, 0x24, 0x7e, 0x64, 0x64, 0x7c, 0x00}, // PETSCII code 38
{0x1c, 0x18, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 39
{0x04, 0x08, 0x10, 0x10, 0x10, 0x08, 0x04, 0x00}, // PETSCII code 40
{0x20, 0x10, 0x08, 0x08, 0x08, 0x10, 0x20, 0x00}, // PETSCII code 41
{0x08, 0x2a, 0x1c, 0x3e, 0x1c, 0x2a, 0x08, 0x00}, // PETSCII code 42
{0x00, 0x08, 0x08, 0x3e, 0x08, 0x08, 0x00, 0x00}, // PETSCII code 43
{0x00, 0x00, 0x00, 0x00, 0x00, 0x18, 0x18, 0x08}, // PETSCII code 44
{0x00, 0x00, 0x00, 0x7e, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 45
{0x00, 0x00, 0x00, 0x00, 0x00, 0x18, 0x18, 0x00}, // PETSCII code 46
{0x00, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x00}, // PETSCII code 47
{0x7e, 0x62, 0x52, 0x4a, 0x46, 0x46, 0x7e, 0x00}, // PETSCII code 48
{0x18, 0x08, 0x08, 0x18, 0x18, 0x1a, 0x3e, 0x00}, // PETSCII code 49
{0x7e, 0x42, 0x02, 0x7e, 0x60, 0x60, 0x7e, 0x00}, // PETSCII code 50
{0x7c, 0x44, 0x04, 0x1e, 0x06, 0x46, 0x7e, 0x00}, // PETSCII code 51
{0x44, 0x44, 0x44, 0x44, 0x7e, 0x0c, 0x0c, 0x00}, // PETSCII code 52
{0x7e, 0x40, 0x7e, 0x06, 0x06, 0x46, 0x7e, 0x00}, // PETSCII code 53
{0x7e, 0x42, 0x40, 0x7e, 0x46, 0x46, 0x7e, 0x00}, // PETSCII code 54
{0x7e, 0x02, 0x02, 0x06, 0x06, 0x06, 0x06, 0x00}, // PETSCII code 55
{0x3c, 0x24, 0x24, 0x7e, 0x46, 0x46, 0x7e, 0x00}, // PETSCII code 56
{0x7e, 0x42, 0x42, 0x7e, 0x06, 0x06, 0x06, 0x00}, // PETSCII code 57
{0x00, 0x00, 0x18, 0x00, 0x00, 0x18, 0x00, 0x00}, // PETSCII code 58
{0x00, 0x00, 0x18, 0x00, 0x00, 0x18, 0x18, 0x08}, // PETSCII code 59
{0x0e, 0x18, 0x30, 0x60, 0x30, 0x18, 0x0e, 0x00}, // PETSCII code 60
{0x00, 0x00, 0x7e, 0x00, 0x7e, 0x00, 0x00, 0x00}, // PETSCII code 61
{0x70, 0x18, 0x0c, 0x06, 0x0c, 0x18, 0x70, 0x00}, // PETSCII code 62
{0x7e, 0x02, 0x02, 0x7e, 0x60, 0x00, 0x60, 0x00}, // PETSCII code 63
{0x00, 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00}, // PETSCII code 64
{0x08, 0x1c, 0x3e, 0x7f, 0x7f, 0x1c, 0x3e, 0x00}, // PETSCII code 65
{0x10, 0x10, 0x10, 0x10, 0x10, 0x10, 0x10, 0x10}, // PETSCII code 66
{0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 67
{0x00, 0x00, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 68
{0x00, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 69
{0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0x00, 0x00}, // PETSCII code 70
{0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20}, // PETSCII code 71
{0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04}, // PETSCII code 72
{0x00, 0x00, 0x00, 0x00, 0xe0, 0x10, 0x08, 0x08}, // PETSCII code 73
{0x08, 0x08, 0x08, 0x04, 0x03, 0x00, 0x00, 0x00}, // PETSCII code 74
{0x08, 0x08, 0x08, 0x10, 0xe0, 0x00, 0x00, 0x00}, // PETSCII code 75
{0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0xff}, // PETSCII code 76
{0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01}, // PETSCII code 77
{0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80}, // PETSCII code 78
{0xff, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80}, // PETSCII code 79
{0xff, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01}, // PETSCII code 80
{0x00, 0x3c, 0x7e, 0x7e, 0x7e, 0x7e, 0x3c, 0x00}, // PETSCII code 81
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0x00}, // PETSCII code 82
{0x36, 0x7f, 0x7f, 0x7f, 0x3e, 0x1c, 0x08, 0x00}, // PETSCII code 83
{0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40}, // PETSCII code 84
{0x00, 0x00, 0x00, 0x00, 0x03, 0x04, 0x08, 0x08}, // PETSCII code 85
{0x81, 0x42, 0x24, 0x18, 0x18, 0x24, 0x42, 0x81}, // PETSCII code 86
{0x00, 0x3c, 0x42, 0x42, 0x42, 0x42, 0x3c, 0x00}, // PETSCII code 87
{0x08, 0x1c, 0x2a, 0x77, 0x2a, 0x08, 0x08, 0x00}, // PETSCII code 88
{0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02}, // PETSCII code 89
{0x08, 0x1c, 0x3e, 0x7f, 0x3e, 0x1c, 0x08, 0x00}, // PETSCII code 90
{0x08, 0x08, 0x08, 0x08, 0xff, 0x08, 0x08, 0x08}, // PETSCII code 91
{0xa0, 0x50, 0xa0, 0x50, 0xa0, 0x50, 0xa0, 0x50}, // PETSCII code 92
{0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08}, // PETSCII code 93
{0x00, 0x00, 0x01, 0x3e, 0x54, 0x14, 0x14, 0x00}, // PETSCII code 94
{0xff, 0x7f, 0x3f, 0x1f, 0x0f, 0x07, 0x03, 0x01}, // PETSCII code 95
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 96
{0xf0, 0xf0, 0xf0, 0xf0, 0xf0, 0xf0, 0xf0, 0xf0}, // PETSCII code 97
{0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff}, // PETSCII code 98
{0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 99
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff}, // PETSCII code 100
{0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80}, // PETSCII code 101
{0xaa, 0x55, 0xaa, 0x55, 0xaa, 0x55, 0xaa, 0x55}, // PETSCII code 102
{0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01}, // PETSCII code 103
{0x00, 0x00, 0x00, 0x00, 0xaa, 0x55, 0xaa, 0x55}, // PETSCII code 104
{0xff, 0xfe, 0xfc, 0xf8, 0xf0, 0xe0, 0xc0, 0x80}, // PETSCII code 105
{0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03}, // PETSCII code 106
{0x08, 0x08, 0x08, 0x08, 0x0f, 0x08, 0x08, 0x08}, // PETSCII code 107
{0x00, 0x00, 0x00, 0x00, 0x0f, 0x0f, 0x0f, 0x0f}, // PETSCII code 108
{0x08, 0x08, 0x08, 0x08, 0x0f, 0x00, 0x00, 0x00}, // PETSCII code 109
{0x00, 0x00, 0x00, 0x00, 0xf8, 0x08, 0x08, 0x08}, // PETSCII code 110
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff}, // PETSCII code 111
{0x00, 0x00, 0x00, 0x00, 0x0f, 0x08, 0x08, 0x08}, // PETSCII code 112
{0x08, 0x08, 0x08, 0x08, 0xff, 0x00, 0x00, 0x00}, // PETSCII code 113
{0x00, 0x00, 0x00, 0x00, 0xff, 0x08, 0x08, 0x08}, // PETSCII code 114
{0x08, 0x08, 0x08, 0x08, 0xf8, 0x08, 0x08, 0x08}, // PETSCII code 115
{0xc0, 0xc0, 0xc0, 0xc0, 0xc0, 0xc0, 0xc0, 0xc0}, // PETSCII code 116
{0xe0, 0xe0, 0xe0, 0xe0, 0xe0, 0xe0, 0xe0, 0xe0}, // PETSCII code 117
{0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07}, // PETSCII code 118
{0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 119
{0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 120
{0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff}, // PETSCII code 121
{0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0xff}, // PETSCII code 122
{0x00, 0x00, 0x00, 0x00, 0xf0, 0xf0, 0xf0, 0xf0}, // PETSCII code 123
{0x0f, 0x0f, 0x0f, 0x0f, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 124
{0x08, 0x08, 0x08, 0x08, 0xf8, 0x00, 0x00, 0x00}, // PETSCII code 125
{0xf0, 0xf0, 0xf0, 0xf0, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 126
{0xf0, 0xf0, 0xf0, 0xf0, 0x0f, 0x0f, 0x0f, 0x0f}, // PETSCII code 127
{0x1c, 0x22, 0x4a, 0x56, 0x4c, 0x20, 0x1e, 0x00}, // PETSCII code 128
{0x00, 0x00, 0x3c, 0x04, 0x7c, 0x64, 0x7c, 0x00}, // PETSCII code 129
{0x40, 0x40, 0x7e, 0x42, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 130
{0x00, 0x00, 0x7e, 0x42, 0x60, 0x62, 0x7e, 0x00}, // PETSCII code 131
{0x02, 0x02, 0x7e, 0x42, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 132
{0x00, 0x00, 0x7e, 0x42, 0x7e, 0x60, 0x7e, 0x00}, // PETSCII code 133
{0x1e, 0x12, 0x10, 0x7c, 0x18, 0x18, 0x18, 0x00}, // PETSCII code 134
{0x00, 0x00, 0x7e, 0x42, 0x62, 0x7e, 0x02, 0x7e}, // PETSCII code 135
{0x40, 0x40, 0x7e, 0x42, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 136
{0x18, 0x00, 0x10, 0x10, 0x18, 0x18, 0x18, 0x00}, // PETSCII code 137
{0x0c, 0x00, 0x08, 0x0c, 0x0c, 0x0c, 0x44, 0x7c}, // PETSCII code 138
{0x40, 0x40, 0x44, 0x48, 0x78, 0x64, 0x64, 0x00}, // PETSCII code 139
{0x10, 0x10, 0x10, 0x10, 0x18, 0x18, 0x18, 0x00}, // PETSCII code 140
{0x00, 0x00, 0x7f, 0x49, 0x6d, 0x6d, 0x6d, 0x00}, // PETSCII code 141
{0x00, 0x00, 0x7e, 0x42, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 142
{0x00, 0x00, 0x7e, 0x42, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 143
{0x00, 0x00, 0x7e, 0x42, 0x62, 0x7e, 0x40, 0x40}, // PETSCII code 144
{0x00, 0x00, 0x7e, 0x42, 0x46, 0x7e, 0x02, 0x02}, // PETSCII code 145
{0x00, 0x00, 0x7e, 0x40, 0x60, 0x60, 0x60, 0x00}, // PETSCII code 146
{0x00, 0x00, 0x7e, 0x40, 0x7e, 0x06, 0x7e, 0x00}, // PETSCII code 147
{0x10, 0x10, 0x7c, 0x10, 0x18, 0x18, 0x18, 0x00}, // PETSCII code 148
{0x00, 0x00, 0x42, 0x42, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 149
{0x00, 0x00, 0x62, 0x62, 0x66, 0x24, 0x3c, 0x00}, // PETSCII code 150
{0x00, 0x00, 0x49, 0x49, 0x6d, 0x6d, 0x7f, 0x00}, // PETSCII code 151
{0x00, 0x00, 0x42, 0x42, 0x3c, 0x62, 0x62, 0x00}, // PETSCII code 152
{0x00, 0x00, 0x62, 0x62, 0x42, 0x7e, 0x02, 0x7e}, // PETSCII code 153
{0x00, 0x00, 0x7e, 0x06, 0x18, 0x60, 0x7e, 0x00}, // PETSCII code 154
{0x3c, 0x20, 0x20, 0x20, 0x20, 0x20, 0x3c, 0x00}, // PETSCII code 155
{0x00, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x00}, // PETSCII code 156
{0x3c, 0x04, 0x04, 0x04, 0x04, 0x04, 0x3c, 0x00}, // PETSCII code 157
{0x00, 0x08, 0x1c, 0x2a, 0x08, 0x08, 0x14, 0x14}, // PETSCII code 158
{0x00, 0x00, 0x10, 0x20, 0x7f, 0x20, 0x10, 0x00}, // PETSCII code 159
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 160
{0x08, 0x08, 0x08, 0x0c, 0x0c, 0x00, 0x0c, 0x00}, // PETSCII code 161
{0x6c, 0x24, 0x6c, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 162
{0x24, 0x24, 0x7e, 0x24, 0x7e, 0x24, 0x24, 0x00}, // PETSCII code 163
{0x08, 0x3e, 0x20, 0x3e, 0x06, 0x3e, 0x08, 0x00}, // PETSCII code 164
{0x00, 0x62, 0x64, 0x08, 0x10, 0x26, 0x46, 0x00}, // PETSCII code 165
{0x3c, 0x20, 0x24, 0x7e, 0x64, 0x64, 0x7c, 0x00}, // PETSCII code 166
{0x1c, 0x18, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 167
{0x04, 0x08, 0x10, 0x10, 0x10, 0x08, 0x04, 0x00}, // PETSCII code 168
{0x20, 0x10, 0x08, 0x08, 0x08, 0x10, 0x20, 0x00}, // PETSCII code 169
{0x08, 0x2a, 0x1c, 0x3e, 0x1c, 0x2a, 0x08, 0x00}, // PETSCII code 170
{0x00, 0x08, 0x08, 0x3e, 0x08, 0x08, 0x00, 0x00}, // PETSCII code 171
{0x00, 0x00, 0x00, 0x00, 0x00, 0x18, 0x18, 0x08}, // PETSCII code 172
{0x00, 0x00, 0x00, 0x7e, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 173
{0x00, 0x00, 0x00, 0x00, 0x00, 0x18, 0x18, 0x00}, // PETSCII code 174
{0x00, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x00}, // PETSCII code 175
{0x7e, 0x62, 0x52, 0x4a, 0x46, 0x46, 0x7e, 0x00}, // PETSCII code 176
{0x38, 0x08, 0x08, 0x18, 0x18, 0x1a, 0x3e, 0x00}, // PETSCII code 177
{0x7e, 0x42, 0x02, 0x7e, 0x60, 0x60, 0x7e, 0x00}, // PETSCII code 178
{0x7c, 0x44, 0x04, 0x1e, 0x06, 0x46, 0x7e, 0x00}, // PETSCII code 179
{0x44, 0x44, 0x44, 0x44, 0x7e, 0x0c, 0x0c, 0x00}, // PETSCII code 180
{0x7e, 0x40, 0x7e, 0x06, 0x06, 0x46, 0x7e, 0x00}, // PETSCII code 181
{0x7e, 0x42, 0x40, 0x7e, 0x46, 0x46, 0x7e, 0x00}, // PETSCII code 182
{0x7e, 0x02, 0x02, 0x06, 0x06, 0x06, 0x06, 0x00}, // PETSCII code 183
{0x3c, 0x24, 0x24, 0x7e, 0x46, 0x46, 0x7e, 0x00}, // PETSCII code 184
{0x7e, 0x42, 0x42, 0x7e, 0x06, 0x06, 0x06, 0x00}, // PETSCII code 185
{0x00, 0x00, 0x18, 0x00, 0x00, 0x18, 0x00, 0x00}, // PETSCII code 186
{0x00, 0x00, 0x18, 0x00, 0x00, 0x18, 0x18, 0x08}, // PETSCII code 187
{0x0e, 0x18, 0x30, 0x60, 0x30, 0x18, 0x0e, 0x00}, // PETSCII code 188
{0x00, 0x00, 0x7e, 0x00, 0x7e, 0x00, 0x00, 0x00}, // PETSCII code 189
{0x70, 0x18, 0x0c, 0x06, 0x0c, 0x18, 0x70, 0x00}, // PETSCII code 190
{0x7e, 0x02, 0x02, 0x7e, 0x60, 0x00, 0x60, 0x00}, // PETSCII code 191
{0x00, 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00}, // PETSCII code 192
{0x3c, 0x24, 0x24, 0x7e, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 193
{0x78, 0x44, 0x44, 0x7c, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 194
{0x7e, 0x42, 0x40, 0x60, 0x60, 0x62, 0x7e, 0x00}, // PETSCII code 195
{0x7c, 0x46, 0x42, 0x62, 0x62, 0x66, 0x7c, 0x00}, // PETSCII code 196
{0x7e, 0x40, 0x40, 0x78, 0x60, 0x60, 0x7e, 0x00}, // PETSCII code 197
{0x7e, 0x40, 0x40, 0x7e, 0x60, 0x60, 0x60, 0x00}, // PETSCII code 198
{0x7e, 0x42, 0x40, 0x6e, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 199
{0x42, 0x42, 0x42, 0x7e, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 200
{0x08, 0x08, 0x08, 0x0c, 0x0c, 0x0c, 0x0c, 0x00}, // PETSCII code 201
{0x04, 0x04, 0x04, 0x06, 0x06, 0x46, 0x7e, 0x00}, // PETSCII code 202
{0x42, 0x44, 0x48, 0x7c, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 203
{0x40, 0x40, 0x40, 0x60, 0x60, 0x60, 0x7e, 0x00}, // PETSCII code 204
{0x7e, 0x4a, 0x4a, 0x6a, 0x6a, 0x6a, 0x6a, 0x00}, // PETSCII code 205
{0x7e, 0x42, 0x42, 0x62, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 206
{0x7e, 0x46, 0x42, 0x42, 0x42, 0x42, 0x7e, 0x00}, // PETSCII code 207
{0x7e, 0x42, 0x42, 0x7e, 0x60, 0x60, 0x60, 0x00}, // PETSCII code 208
{0x7e, 0x42, 0x42, 0x42, 0x4a, 0x4e, 0x7e, 0x00}, // PETSCII code 209
{0x7c, 0x44, 0x44, 0x7c, 0x62, 0x62, 0x62, 0x00}, // PETSCII code 210
{0x7e, 0x42, 0x40, 0x7e, 0x06, 0x46, 0x7e, 0x00}, // PETSCII code 211
{0x3e, 0x10, 0x10, 0x18, 0x18, 0x18, 0x18, 0x00}, // PETSCII code 212
{0x42, 0x42, 0x42, 0x62, 0x62, 0x62, 0x7e, 0x00}, // PETSCII code 213
{0x62, 0x62, 0x62, 0x66, 0x24, 0x24, 0x3c, 0x00}, // PETSCII code 214
{0x4a, 0x4a, 0x4a, 0x6a, 0x6a, 0x6a, 0x7e, 0x00}, // PETSCII code 215
{0x42, 0x42, 0x66, 0x3c, 0x66, 0x62, 0x62, 0x00}, // PETSCII code 216
{0x22, 0x22, 0x22, 0x3e, 0x18, 0x18, 0x18, 0x00}, // PETSCII code 217
{0x7e, 0x42, 0x06, 0x18, 0x60, 0x62, 0x7e, 0x00}, // PETSCII code 218
{0x08, 0x08, 0x08, 0x08, 0xff, 0x08, 0x08, 0x08}, // PETSCII code 219
{0xa0, 0x50, 0xa0, 0x50, 0xa0, 0x50, 0xa0, 0x50}, // PETSCII code 220
{0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08}, // PETSCII code 221
{0xcc, 0xcc, 0x33, 0x33, 0xcc, 0xcc, 0x33, 0x33}, // PETSCII code 222
{0xcc, 0x66, 0x33, 0x99, 0xcc, 0x66, 0x33, 0x99}, // PETSCII code 223
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 224
{0xf0, 0xf0, 0xf0, 0xf0, 0xf0, 0xf0, 0xf0, 0xf0}, // PETSCII code 225
{0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff}, // PETSCII code 226
{0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 227
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff}, // PETSCII code 228
{0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80}, // PETSCII code 229
{0xaa, 0x55, 0xaa, 0x55, 0xaa, 0x55, 0xaa, 0x55}, // PETSCII code 230
{0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01}, // PETSCII code 231
{0x00, 0x00, 0x00, 0x00, 0xaa, 0x55, 0xaa, 0x55}, // PETSCII code 232
{0x99, 0x33, 0x66, 0xcc, 0x99, 0x33, 0x66, 0xcc}, // PETSCII code 233
{0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03}, // PETSCII code 234
{0x08, 0x08, 0x08, 0x08, 0x0f, 0x08, 0x08, 0x08}, // PETSCII code 235
{0x00, 0x00, 0x00, 0x00, 0x0f, 0x0f, 0x0f, 0x0f}, // PETSCII code 236
{0x08, 0x08, 0x08, 0x08, 0x0f, 0x00, 0x00, 0x00}, // PETSCII code 237
{0x00, 0x00, 0x00, 0x00, 0xf8, 0x08, 0x08, 0x08}, // PETSCII code 238
{0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff}, // PETSCII code 239
{0x00, 0x00, 0x00, 0x00, 0x0f, 0x08, 0x08, 0x08}, // PETSCII code 240
{0x08, 0x08, 0x08, 0x08, 0xff, 0x00, 0x00, 0x00}, // PETSCII code 241
{0x00, 0x00, 0x00, 0x00, 0xff, 0x08, 0x08, 0x08}, // PETSCII code 242
{0x08, 0x08, 0x08, 0x08, 0xf8, 0x08, 0x08, 0x08}, // PETSCII code 243
{0xc0, 0xc0, 0xc0, 0xc0, 0xc0, 0xc0, 0xc0, 0xc0}, // PETSCII code 244
{0xe0, 0xe0, 0xe0, 0xe0, 0xe0, 0xe0, 0xe0, 0xe0}, // PETSCII code 245
{0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07}, // PETSCII code 246
{0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 247
{0xff, 0xff, 0xff, 0x00, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 248
{0x00, 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff}, // PETSCII code 249
{0x01, 0x02, 0x44, 0x48, 0x50, 0x60, 0x40, 0x00}, // PETSCII code 250
{0x00, 0x00, 0x00, 0x00, 0xf0, 0xf0, 0xf0, 0xf0}, // PETSCII code 251
{0x0f, 0x0f, 0x0f, 0x0f, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 252
{0x08, 0x08, 0x08, 0x08, 0xf8, 0x00, 0x00, 0x00}, // PETSCII code 253
{0xf0, 0xf0, 0xf0, 0xf0, 0x00, 0x00, 0x00, 0x00}, // PETSCII code 254
{0xf0, 0xf0, 0xf0, 0xf0, 0x0f, 0x0f, 0x0f, 0x0f}, // PETSCII code 255
};

BIN
samples/kim1/ramfont.o Normal file

Binary file not shown.

View File

@ -17,6 +17,7 @@
.export _SetPixel
.export _ClearPixel
.export _DrawCircle
.export _AscToPet
SCREEN = $A000
@ -491,4 +492,50 @@ updateerr: lda xval ; temp = xval * 2
sta err+1
doneLoop: jmp circleloop
ascToPetTable: .byte $00,$01,$02,$03,$04,$05,$06,$07,$14,$20,$0d,$11,$93,$0a,$0e,$0f
.byte $10,$0b,$12,$13,$08,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f
.byte $20,$21,$22,$23,$24,$25,$26,$27,$28,$29,$2a,$2b,$2c,$2d,$2e,$2f
.byte $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$3a,$3b,$3c,$3d,$3e,$3f
.byte $40,$c1,$c2,$c3,$c4,$c5,$c6,$c7,$c8,$c9,$ca,$cb,$cc,$cd,$ce,$cf
.byte $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$5b,$5c,$5d,$5e,$5f
.byte $c0,$41,$42,$43,$44,$45,$46,$47,$48,$49,$4a,$4b,$4c,$4d,$4e,$4f
.byte $50,$51,$52,$53,$54,$55,$56,$57,$58,$59,$5a,$db,$dc,$dd,$de,$df
.byte $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f
.byte $90,$91,$92,$0c,$94,$95,$96,$97,$98,$99,$9a,$9b,$9c,$9d,$9e,$9f
.byte $a0,$a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$aa,$ab,$ac,$ad,$ae,$af
.byte $b0,$b1,$b2,$b3,$b4,$b5,$b6,$b7,$b8,$b9,$ba,$bb,$bc,$bd,$be,$bf
.byte $60,$61,$62,$63,$64,$65,$66,$67,$68,$69,$6a,$6b,$6c,$6d,$6e,$6f
.byte $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f
.byte $e0,$e1,$e2,$e3,$e4,$e5,$e6,$e7,$e8,$e9,$ea,$eb,$ec,$ed,$ee,$ef
.byte $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff
; PETSCI to Ascii lookup table - not current used, so commented out, but can be used to map fonts
;
;
; petToAscTable: .byte $00,$01,$02,$03,$04,$05,$06,$07,$14,$09,$0d,$11,$93,$0a,$0e,$0f
; .byte $10,$0b,$12,$13,$08,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f
; .byte $20,$21,$22,$23,$24,$25,$26,$27,$28,$29,$2a,$2b,$2c,$2d,$2e,$2f
; .byte $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$3a,$3b,$3c,$3d,$3e,$3f
; .byte $40,$61,$62,$63,$64,$65,$66,$67,$68,$69,$6a,$6b,$6c,$6d,$6e,$6f
; .byte $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$5b,$5c,$5d,$5e,$5f
; .byte $c0,$c1,$c2,$c3,$c4,$c5,$c6,$c7,$c8,$c9,$ca,$cb,$cc,$cd,$ce,$cf
; .byte $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$db,$dc,$dd,$de,$df
; .byte $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f
; .byte $90,$91,$92,$0c,$94,$95,$96,$97,$98,$99,$9a,$9b,$9c,$9d,$9e,$9f
; .byte $a0,$a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$aa,$ab,$ac,$ad,$ae,$af
; .byte $b0,$b1,$b2,$b3,$b4,$b5,$b6,$b7,$b8,$b9,$ba,$bb,$bc,$bd,$be,$bf
; .byte $60,$41,$42,$43,$44,$45,$46,$47,$48,$49,$4a,$4b,$4c,$4d,$4e,$4f
; .byte $50,$51,$52,$53,$54,$55,$56,$57,$58,$59,$5a,$7b,$7c,$7d,$7e,$7f
; .byte $a0,$a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$aa,$ab,$ac,$ad,$ae,$af
; .byte $b0,$b1,$b2,$b3,$b4,$b5,$b6,$b7,$b8,$b9,$ba,$bb,$bc,$bd,$be,$bf
;-----------------------------------------------------------------------------------
; PetToAsc - Convert a PETSCII character to ASCII
;-----------------------------------------------------------------------------------
; A - Character to convert
;-----------------------------------------------------------------------------------
_AscToPet: tay
lda ascToPetTable, y
rts

BIN
samples/kim1/subs.o Normal file

Binary file not shown.