mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-08-28 12:29:35 +00:00
gr-sim: text output seems to be working
This commit is contained in:
parent
2d72678f04
commit
c98fbb22e1
@ -59,10 +59,10 @@ unsigned char a2_font[256][7]={
|
|||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
}, // F
|
}, // F
|
||||||
{0x1e, // 01111
|
{0x0f, // 01111
|
||||||
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x1e, // 10000
|
|
||||||
0x13, // 10011
|
0x13, // 10011
|
||||||
0x11, // 10001
|
0x11, // 10001
|
||||||
0x0f, // 01111
|
0x0f, // 01111
|
||||||
@ -131,57 +131,393 @@ unsigned char a2_font[256][7]={
|
|||||||
0x11, // 10001
|
0x11, // 10001
|
||||||
0x0e, // 01110
|
0x0e, // 01110
|
||||||
}, // O
|
}, // O
|
||||||
{}, // P
|
{0x1e, // 11110
|
||||||
{}, // Q
|
0x11, // 10001
|
||||||
{}, // R
|
0x11, // 10001
|
||||||
{}, // S
|
0x1e, // 11110
|
||||||
{}, // T
|
0x10, // 10000
|
||||||
{}, // U
|
0x10, // 10000
|
||||||
{}, // V
|
0x10, // 10000
|
||||||
{}, // W
|
}, // P
|
||||||
{}, // X
|
{0x0e, // 01110
|
||||||
{}, // Y
|
0x11, // 10001
|
||||||
{}, // Z
|
0x11, // 10001
|
||||||
{}, // [
|
0x11, // 10001
|
||||||
{}, // \.
|
0x15, // 10101
|
||||||
{}, // ]
|
0x12, // 10010
|
||||||
{}, // ^
|
0x0d, // 01101
|
||||||
{}, // _
|
}, // Q
|
||||||
|
{0x1e, // 11110
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x1e, // 11110
|
||||||
|
0x14, // 10100
|
||||||
|
0x12, // 10010
|
||||||
|
0x11, // 10001
|
||||||
|
}, // R
|
||||||
|
{0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x10, // 10000
|
||||||
|
0x0e, // 01110
|
||||||
|
0x01, // 00001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // S
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
}, // T
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // U
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
}, // V
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x15, // 10101
|
||||||
|
0x15, // 10101
|
||||||
|
0x1b, // 11011
|
||||||
|
0x11, // 10001
|
||||||
|
}, // W
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
0x0a, // 01010
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
}, // X
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
}, // Y
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
0x10, // 10000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // Z
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // [
|
||||||
|
{0x00, // 00000
|
||||||
|
0x10, // 10000
|
||||||
|
0x08, // 01000
|
||||||
|
0x04, // 00100
|
||||||
|
0x02, // 00010
|
||||||
|
0x01, // 00001
|
||||||
|
0x00, // 00000
|
||||||
|
}, // \.
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // ]
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x0a, // 01010
|
||||||
|
0x11, // 10001
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
}, // ^
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // _
|
||||||
|
|
||||||
/* Non-control chars */
|
/* Non-control chars */
|
||||||
|
|
||||||
{}, //
|
{0x00, // 00000
|
||||||
{}, // !
|
0x00, // 00000
|
||||||
{}, // "
|
0x00, // 00000
|
||||||
{}, // #
|
0x00, // 00000
|
||||||
{}, // $
|
0x00, // 00000
|
||||||
{}, // %
|
0x00, // 00000
|
||||||
{}, // &
|
0x00, // 00000
|
||||||
{}, // '
|
}, // ' '
|
||||||
{}, // (
|
{0x04, // 00100
|
||||||
{}, // )
|
0x04, // 00100
|
||||||
{}, // *
|
0x04, // 00100
|
||||||
{}, // +
|
0x04, // 00100
|
||||||
{}, // ,
|
0x04, // 00100
|
||||||
{}, // -
|
0x00, // 00000
|
||||||
{}, // .
|
0x04, // 00100
|
||||||
{}, // /
|
}, // !
|
||||||
{}, // 0
|
{0x0a, // 01010
|
||||||
{}, // 1
|
0x0a, // 01010
|
||||||
{}, // 2
|
0x0a, // 01010
|
||||||
{}, // 3
|
0x00, // 00000
|
||||||
{}, // 4
|
0x00, // 00000
|
||||||
{}, // 5
|
0x00, // 00000
|
||||||
{}, // 6
|
0x00, // 00000
|
||||||
{}, // 7
|
}, // "
|
||||||
{}, // 8
|
{0x0a, // 01010
|
||||||
{}, // 9
|
0x0a, // 01010
|
||||||
{}, // :
|
0x1f, // 11111
|
||||||
{}, // ;
|
0x0a, // 01010
|
||||||
{}, // <
|
0x1f, // 11111
|
||||||
{}, // =
|
0x0a, // 01010
|
||||||
{}, // >
|
0x0a, // 01010
|
||||||
{}, // ?
|
}, // #
|
||||||
|
{0x04, // 00100
|
||||||
|
0x0f, // 01111
|
||||||
|
0x14, // 10100
|
||||||
|
0x0e, // 01110
|
||||||
|
0x05, // 00101
|
||||||
|
0x1e, // 11110
|
||||||
|
0x04, // 00100
|
||||||
|
}, // $
|
||||||
|
{0x18, // 11000
|
||||||
|
0x19, // 11001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
0x13, // 10011
|
||||||
|
0x03, // 00011
|
||||||
|
}, // %
|
||||||
|
{0x08, // 01000
|
||||||
|
0x14, // 10100
|
||||||
|
0x14, // 10100
|
||||||
|
0x08, // 01000
|
||||||
|
0x15, // 10101
|
||||||
|
0x12, // 10010
|
||||||
|
0x0d, // 01101
|
||||||
|
}, // &
|
||||||
|
{0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
}, // '
|
||||||
|
{0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
0x10, // 10000
|
||||||
|
0x10, // 10000
|
||||||
|
0x10, // 10000
|
||||||
|
0x08, // 01000
|
||||||
|
0x04, // 00100
|
||||||
|
}, // (
|
||||||
|
{0x04, // 00100
|
||||||
|
0x02, // 00010
|
||||||
|
0x01, // 00001
|
||||||
|
0x01, // 00001
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
}, // )
|
||||||
|
{0x04, // 00100
|
||||||
|
0x15, // 10101
|
||||||
|
0x0e, // 01110
|
||||||
|
0x04, // 00100
|
||||||
|
0x0e, // 01110
|
||||||
|
0x15, // 10101
|
||||||
|
0x04, // 00100
|
||||||
|
}, // *
|
||||||
|
{0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x1f, // 11111
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x00, // 00000
|
||||||
|
}, // +
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
}, // ,
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x1f, // 11111
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 01000
|
||||||
|
}, // -
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
}, // .
|
||||||
|
{0x00, // 00000
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
0x10, // 10000
|
||||||
|
0x00, // 00100
|
||||||
|
}, // /
|
||||||
|
{0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x13, // 10011
|
||||||
|
0x15, // 10101
|
||||||
|
0x19, // 11001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // 0
|
||||||
|
{0x04, // 00100
|
||||||
|
0x0c, // 01100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // 1
|
||||||
|
{0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x01, // 00001
|
||||||
|
0x06, // 00110
|
||||||
|
0x08, // 01000
|
||||||
|
0x10, // 10000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // 2
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x06, // 00110
|
||||||
|
0x01, // 00001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // 3
|
||||||
|
{0x02, // 00010
|
||||||
|
0x06, // 00110
|
||||||
|
0x0a, // 01010
|
||||||
|
0x12, // 10010
|
||||||
|
0x1f, // 11111
|
||||||
|
0x02, // 00010
|
||||||
|
0x02, // 00010
|
||||||
|
}, // 4
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x10, // 10000
|
||||||
|
0x1e, // 11110
|
||||||
|
0x01, // 00001
|
||||||
|
0x01, // 00001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // 5
|
||||||
|
{0x07, // 00111
|
||||||
|
0x08, // 01000
|
||||||
|
0x10, // 10000
|
||||||
|
0x1e, // 11110
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // 6
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
0x08, // 01000
|
||||||
|
0x08, // 01000
|
||||||
|
}, // 7
|
||||||
|
{0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // 8
|
||||||
|
{0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0f, // 01111
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x1c, // 11100
|
||||||
|
}, // 9
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
}, // :
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
}, // ;
|
||||||
|
{0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
0x10, // 10000
|
||||||
|
0x08, // 01000
|
||||||
|
0x04, // 00100
|
||||||
|
0x02, // 00010
|
||||||
|
}, // <
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x1f, // 11111
|
||||||
|
0x00, // 00000
|
||||||
|
0x1f, // 11111
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
}, // =
|
||||||
|
{0x08, // 01000
|
||||||
|
0x04, // 00100
|
||||||
|
0x02, // 00010
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
}, // >
|
||||||
|
{0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
}, // ?
|
||||||
{0x0e, // 01110
|
{0x0e, // 01110
|
||||||
0x11, // 10001
|
0x11, // 10001
|
||||||
0x15, // 10101
|
0x15, // 10101
|
||||||
@ -238,10 +574,10 @@ unsigned char a2_font[256][7]={
|
|||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
}, // F
|
}, // F
|
||||||
{0x1e, // 01111
|
{0x0f, // 01111
|
||||||
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x1e, // 10000
|
|
||||||
0x13, // 10011
|
0x13, // 10011
|
||||||
0x11, // 10001
|
0x11, // 10001
|
||||||
0x0f, // 01111
|
0x0f, // 01111
|
||||||
@ -310,22 +646,134 @@ unsigned char a2_font[256][7]={
|
|||||||
0x11, // 10001
|
0x11, // 10001
|
||||||
0x0e, // 01110
|
0x0e, // 01110
|
||||||
}, // O
|
}, // O
|
||||||
{}, // P
|
{0x1e, // 11110
|
||||||
{}, // Q
|
0x11, // 10001
|
||||||
{}, // R
|
0x11, // 10001
|
||||||
{}, // S
|
0x1e, // 11110
|
||||||
{}, // T
|
0x10, // 10000
|
||||||
{}, // U
|
0x10, // 10000
|
||||||
{}, // V
|
0x10, // 10000
|
||||||
{}, // W
|
}, // P
|
||||||
{}, // X
|
{0x0e, // 01110
|
||||||
{}, // Y
|
0x11, // 10001
|
||||||
{}, // Z
|
0x11, // 10001
|
||||||
{}, // [
|
0x11, // 10001
|
||||||
{}, // \.
|
0x15, // 10101
|
||||||
{}, // ]
|
0x12, // 10010
|
||||||
{}, // ^
|
0x0d, // 01101
|
||||||
{}, // _
|
}, // Q
|
||||||
|
{0x1e, // 11110
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x1e, // 11110
|
||||||
|
0x14, // 10100
|
||||||
|
0x12, // 10010
|
||||||
|
0x11, // 10001
|
||||||
|
}, // R
|
||||||
|
{0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x10, // 10000
|
||||||
|
0x0e, // 01110
|
||||||
|
0x01, // 00001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // S
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
}, // T
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // U
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
}, // V
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x15, // 10101
|
||||||
|
0x15, // 10101
|
||||||
|
0x1b, // 11011
|
||||||
|
0x11, // 10001
|
||||||
|
}, // W
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
0x0a, // 01010
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
}, // X
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
}, // Y
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
0x10, // 10000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // Z
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // [
|
||||||
|
{0x00, // 00000
|
||||||
|
0x10, // 10000
|
||||||
|
0x08, // 01000
|
||||||
|
0x04, // 00100
|
||||||
|
0x02, // 00010
|
||||||
|
0x01, // 00001
|
||||||
|
0x00, // 00000
|
||||||
|
}, // \.
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // ]
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x0a, // 01010
|
||||||
|
0x11, // 10001
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
}, // ^
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // _
|
||||||
|
|
||||||
/* Lowercase */
|
/* Lowercase */
|
||||||
|
|
||||||
@ -385,10 +833,10 @@ unsigned char a2_font[256][7]={
|
|||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
}, // F
|
}, // F
|
||||||
{0x1e, // 01111
|
{0x0f, // 01111
|
||||||
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x10, // 10000
|
0x10, // 10000
|
||||||
0x1e, // 10000
|
|
||||||
0x13, // 10011
|
0x13, // 10011
|
||||||
0x11, // 10001
|
0x11, // 10001
|
||||||
0x0f, // 01111
|
0x0f, // 01111
|
||||||
@ -457,21 +905,133 @@ unsigned char a2_font[256][7]={
|
|||||||
0x11, // 10001
|
0x11, // 10001
|
||||||
0x0e, // 01110
|
0x0e, // 01110
|
||||||
}, // O
|
}, // O
|
||||||
{}, // P
|
{0x1e, // 11110
|
||||||
{}, // Q
|
0x11, // 10001
|
||||||
{}, // R
|
0x11, // 10001
|
||||||
{}, // S
|
0x1e, // 11110
|
||||||
{}, // T
|
0x10, // 10000
|
||||||
{}, // U
|
0x10, // 10000
|
||||||
{}, // V
|
0x10, // 10000
|
||||||
{}, // W
|
}, // P
|
||||||
{}, // X
|
{0x0e, // 01110
|
||||||
{}, // Y
|
0x11, // 10001
|
||||||
{}, // Z
|
0x11, // 10001
|
||||||
{}, // [
|
0x11, // 10001
|
||||||
{}, // \.
|
0x15, // 10101
|
||||||
{}, // ]
|
0x12, // 10010
|
||||||
{}, // ^
|
0x0d, // 01101
|
||||||
{}, // _
|
}, // Q
|
||||||
|
{0x1e, // 11110
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x1e, // 11110
|
||||||
|
0x14, // 10100
|
||||||
|
0x12, // 10010
|
||||||
|
0x11, // 10001
|
||||||
|
}, // R
|
||||||
|
{0x0e, // 01110
|
||||||
|
0x11, // 10001
|
||||||
|
0x10, // 10000
|
||||||
|
0x0e, // 01110
|
||||||
|
0x01, // 00001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // S
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
}, // T
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0e, // 01110
|
||||||
|
}, // U
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
}, // V
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x15, // 10101
|
||||||
|
0x15, // 10101
|
||||||
|
0x1b, // 11011
|
||||||
|
0x11, // 10001
|
||||||
|
}, // W
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
0x0a, // 01010
|
||||||
|
0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
}, // X
|
||||||
|
{0x11, // 10001
|
||||||
|
0x11, // 10001
|
||||||
|
0x0a, // 01010
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
0x04, // 00100
|
||||||
|
}, // Y
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x01, // 00001
|
||||||
|
0x02, // 00010
|
||||||
|
0x04, // 00100
|
||||||
|
0x08, // 01000
|
||||||
|
0x10, // 10000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // Z
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x18, // 11000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // [
|
||||||
|
{0x00, // 00000
|
||||||
|
0x10, // 10000
|
||||||
|
0x08, // 01000
|
||||||
|
0x04, // 00100
|
||||||
|
0x02, // 00010
|
||||||
|
0x01, // 00001
|
||||||
|
0x00, // 00000
|
||||||
|
}, // \.
|
||||||
|
{0x1f, // 11111
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x03, // 00011
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // ]
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x04, // 00100
|
||||||
|
0x0a, // 01010
|
||||||
|
0x11, // 10001
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
}, // ^
|
||||||
|
{0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x00, // 00000
|
||||||
|
0x1f, // 11111
|
||||||
|
}, // _
|
||||||
};
|
};
|
||||||
|
|
||||||
|
220
gr-sim/gr-sim.c
220
gr-sim/gr-sim.c
@ -44,10 +44,17 @@ unsigned char a,y,x;
|
|||||||
#define GBASH 0x27
|
#define GBASH 0x27
|
||||||
#define BASL 0x28
|
#define BASL 0x28
|
||||||
#define BASH 0x29
|
#define BASH 0x29
|
||||||
|
#define BAS2L 0x2A
|
||||||
|
#define BAS2H 0x2B
|
||||||
#define H2 0x2C
|
#define H2 0x2C
|
||||||
#define V2 0x2D
|
#define V2 0x2D
|
||||||
#define MASK 0x2E
|
#define MASK 0x2E
|
||||||
#define COLOR 0x30
|
#define COLOR 0x30
|
||||||
|
#define INVFLG 0x32
|
||||||
|
#define YSAV 0x34
|
||||||
|
#define YSAV1 0x35
|
||||||
|
#define CSWL 0x36
|
||||||
|
#define CSWH 0x37
|
||||||
#define FIRST 0xF0
|
#define FIRST 0xF0
|
||||||
#define SPEEDZ 0xF1
|
#define SPEEDZ 0xF1
|
||||||
#define FLASH 0xF3
|
#define FLASH 0xF3
|
||||||
@ -268,9 +275,9 @@ int grsim_update(void) {
|
|||||||
/* FIXME: handle page2 */
|
/* FIXME: handle page2 */
|
||||||
|
|
||||||
|
|
||||||
if (j>12) bit_set=0;
|
if (j>13) bit_set=0;
|
||||||
else if (i>10) bit_set=0;
|
else if (i>11) bit_set=0;
|
||||||
else bit_set=(a2_font[ch][j/2])&(1<<(i/2));
|
else bit_set=(a2_font[ch][j/2])&(1<<(5-(i/2)));
|
||||||
|
|
||||||
if (inverse) {
|
if (inverse) {
|
||||||
if (bit_set) *t_pointer=color[0];
|
if (bit_set) *t_pointer=color[0];
|
||||||
@ -310,6 +317,13 @@ int grsim_update(void) {
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
void setnorm(void) {
|
||||||
|
|
||||||
|
y=0xff;
|
||||||
|
ram[INVFLG]=y;
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
int grsim_init(void) {
|
int grsim_init(void) {
|
||||||
|
|
||||||
int mode;
|
int mode;
|
||||||
@ -346,6 +360,10 @@ int grsim_init(void) {
|
|||||||
|
|
||||||
a=0; y=0; x=0;
|
a=0; y=0; x=0;
|
||||||
|
|
||||||
|
//FA62 RESET
|
||||||
|
|
||||||
|
setnorm();
|
||||||
|
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -508,7 +526,21 @@ clrsc3:
|
|||||||
ram[COLOR]=a;
|
ram[COLOR]=a;
|
||||||
vline();
|
vline();
|
||||||
y--;
|
y--;
|
||||||
if (y>0) goto clrsc3;
|
if (y<=0x80) goto clrsc3;
|
||||||
|
}
|
||||||
|
|
||||||
|
static void setgr(void) {
|
||||||
|
|
||||||
|
// FB40
|
||||||
|
// SETGR
|
||||||
|
soft_switch(TXTCLR); // LDA TXTCLR
|
||||||
|
soft_switch(MIXSET); // LDA MIXSET
|
||||||
|
|
||||||
|
clrtop();
|
||||||
|
|
||||||
|
a=0x14;
|
||||||
|
setwnd();
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
int gr(void) {
|
int gr(void) {
|
||||||
@ -518,14 +550,7 @@ int gr(void) {
|
|||||||
soft_switch(MIXSET); // LDA SW.MIXSET
|
soft_switch(MIXSET); // LDA SW.MIXSET
|
||||||
//JMP MON.SETGR
|
//JMP MON.SETGR
|
||||||
|
|
||||||
// FB40
|
setgr();
|
||||||
soft_switch(TXTCLR); // LDA TXTCLR
|
|
||||||
soft_switch(MIXSET); // LDA MIXSET
|
|
||||||
|
|
||||||
clrtop();
|
|
||||||
|
|
||||||
a=0x14;
|
|
||||||
setwnd();
|
|
||||||
|
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
@ -785,8 +810,176 @@ int text(void) {
|
|||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static void scroll(void) {
|
||||||
|
unsigned char s;
|
||||||
|
|
||||||
|
// fc70
|
||||||
|
|
||||||
|
a=ram[WNDTOP];
|
||||||
|
s=a;
|
||||||
|
vtabz();
|
||||||
|
|
||||||
|
// SCRL1
|
||||||
|
scrl1:
|
||||||
|
a=ram[BASL];
|
||||||
|
ram[BAS2L]=a;
|
||||||
|
a=ram[BASH];
|
||||||
|
ram[BAS2H]=a;
|
||||||
|
y=ram[WNDWDTH];
|
||||||
|
y--;
|
||||||
|
a=s;
|
||||||
|
a+=1;
|
||||||
|
if (a>=ram[WNDBTM]) {
|
||||||
|
// SCRL3
|
||||||
|
y=0;
|
||||||
|
cleolz();
|
||||||
|
vtab();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
s=a;
|
||||||
|
vtabz();
|
||||||
|
// SCRL2
|
||||||
|
scrl2:
|
||||||
|
a=ram[y_indirect(BASL,y)];
|
||||||
|
ram[y_indirect(BAS2L,y)]=a;
|
||||||
|
y--;
|
||||||
|
if (y<0x80) goto scrl2;
|
||||||
|
goto scrl1;
|
||||||
|
}
|
||||||
|
|
||||||
|
static void lf(void) {
|
||||||
|
ram[CV]=ram[CV]+1;
|
||||||
|
a=ram[CV];
|
||||||
|
if (a<ram[WNDBTM]) {
|
||||||
|
vtabz();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
ram[CV]=ram[CV]-1;
|
||||||
|
scroll();
|
||||||
|
}
|
||||||
|
|
||||||
|
static void cr(void) {
|
||||||
|
a=0x00;
|
||||||
|
ram[CH]=a;
|
||||||
|
lf();
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
static void bell1(void) {
|
||||||
|
}
|
||||||
|
|
||||||
|
static void up(void) {
|
||||||
|
|
||||||
|
a=ram[WNDTOP];
|
||||||
|
if (a>ram[CV]) return;
|
||||||
|
|
||||||
|
ram[CV]=ram[CV]-1;
|
||||||
|
vtab();
|
||||||
|
}
|
||||||
|
|
||||||
|
static void bs(void) {
|
||||||
|
|
||||||
|
ram[CH]=ram[CH]-1;
|
||||||
|
|
||||||
|
/* still positive */
|
||||||
|
if (ram[CH]<0x80) return;
|
||||||
|
|
||||||
|
a=ram[WNDWDTH];
|
||||||
|
ram[CH]=a;
|
||||||
|
ram[CH]=ram[CH]-1;
|
||||||
|
|
||||||
|
up();
|
||||||
|
}
|
||||||
|
|
||||||
|
static void storadv(void) {
|
||||||
|
|
||||||
|
// fbf0
|
||||||
|
|
||||||
|
y=ram[CH];
|
||||||
|
ram[y_indirect(BASL,y)]=a;
|
||||||
|
|
||||||
|
// advance
|
||||||
|
|
||||||
|
ram[CH]=ram[CH]+1;
|
||||||
|
a=ram[CH];
|
||||||
|
if (a>=ram[WNDWDTH]) {
|
||||||
|
cr();
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
static void vidout(void) {
|
||||||
|
// fbfd
|
||||||
|
|
||||||
|
if (a>=0xa0) {
|
||||||
|
storadv();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Control Characters */
|
||||||
|
y=a;
|
||||||
|
// if bit 7 is set then we set negative flag
|
||||||
|
// BPL storadv
|
||||||
|
if (a<0x80) {
|
||||||
|
storadv();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* carriage return */
|
||||||
|
if (a==0x8d) {
|
||||||
|
cr();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* linefeed */
|
||||||
|
if (a==0x8a) {
|
||||||
|
lf();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* backspace */
|
||||||
|
if (a==0x88) {
|
||||||
|
bs();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* any other control code, beep */
|
||||||
|
bell1();
|
||||||
|
return;
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
static void vidwait(void) {
|
||||||
|
// check if control-S being pressed
|
||||||
|
|
||||||
|
vidout();
|
||||||
|
}
|
||||||
|
|
||||||
|
static void cout1(void) {
|
||||||
|
|
||||||
|
unsigned char s;
|
||||||
|
|
||||||
|
if (a<0xa0) {
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
a=a&ram[INVFLG];
|
||||||
|
}
|
||||||
|
// coutz
|
||||||
|
ram[YSAV1]=y;
|
||||||
|
s=a;
|
||||||
|
|
||||||
|
vidwait();
|
||||||
|
|
||||||
|
a=s;
|
||||||
|
y=ram[YSAV1];
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
static void cout(void) {
|
static void cout(void) {
|
||||||
// FDED
|
// FDED
|
||||||
|
// jmp (cswl) custom handler
|
||||||
|
cout1();
|
||||||
}
|
}
|
||||||
|
|
||||||
static void wait(void) {
|
static void wait(void) {
|
||||||
@ -837,12 +1030,11 @@ void basic_htab(int xpos) {
|
|||||||
}
|
}
|
||||||
ram[CH]=a; // STA MON.CH
|
ram[CH]=a; // STA MON.CH
|
||||||
|
|
||||||
|
|
||||||
// KRW for the win!
|
// KRW for the win!
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
void basic_vtab(int y) {
|
void basic_vtab(int ypos) {
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -6,7 +6,8 @@
|
|||||||
|
|
||||||
int main(int argc, char **argv) {
|
int main(int argc, char **argv) {
|
||||||
|
|
||||||
int x,y,ch;
|
int x,y,ch,i;
|
||||||
|
char output[BUFSIZ];
|
||||||
|
|
||||||
grsim_init();
|
grsim_init();
|
||||||
|
|
||||||
@ -20,7 +21,12 @@ int main(int argc, char **argv) {
|
|||||||
|
|
||||||
basic_vtab(10);
|
basic_vtab(10);
|
||||||
|
|
||||||
basic_print("HELLO WORLD!\n");
|
basic_print("HELLO WORLD!\r\r");
|
||||||
|
|
||||||
|
for(i=0;i<128;i++) {
|
||||||
|
sprintf(output,"%c",i);
|
||||||
|
basic_print(output);
|
||||||
|
}
|
||||||
|
|
||||||
while(1) {
|
while(1) {
|
||||||
grsim_update();
|
grsim_update();
|
||||||
|
@ -465,6 +465,8 @@ put_sprite_pixel:
|
|||||||
cmp #$0 ; if all zero, transparent
|
cmp #$0 ; if all zero, transparent
|
||||||
beq put_sprite_done_draw ; don't draw it
|
beq put_sprite_done_draw ; don't draw it
|
||||||
|
|
||||||
|
; FIXME: use BIT?
|
||||||
|
|
||||||
sta COLOR ; save color for later
|
sta COLOR ; save color for later
|
||||||
and #$f0 ; check if top nibble zero
|
and #$f0 ; check if top nibble zero
|
||||||
bne put_sprite_bottom ; if not skip ahead
|
bne put_sprite_bottom ; if not skip ahead
|
||||||
|
Loading…
Reference in New Issue
Block a user