mirror of
https://github.com/rigreco/Runge-Kutta-Simulation.git
synced 2024-12-27 21:29:30 +00:00
62 lines
2.3 KiB
C
62 lines
2.3 KiB
C
/* ------------------------------------------------------------------------
|
|
System : Manx Aztec C65 Version 3.2b
|
|
MS-DOS cross-development environment
|
|
Platform : Apple IIe 128K PRODOS 8
|
|
Program : dxlut.c
|
|
Description : G2 Library Routine
|
|
LUT's (look-up tables) for discrete DHGR pixel color values
|
|
which correspond to the 7 pixels in the 4 byte block.
|
|
Using these to write DHGR pixels eliminates the need to
|
|
extract these values from the dhrbytes array at runtime
|
|
so results in slightly quicker code.
|
|
|
|
Quite abstract really... and in Lo-Res color order
|
|
for consistency with the other related G2 library routines.
|
|
|
|
Written by : Bill Buckels
|
|
Date Written : January 2013
|
|
Revision : 1.0 First Release
|
|
Licence : You may use this routine for whatever you wish as long
|
|
as you agree that Bill Buckels has no warranty or
|
|
liability obligations whatsoever from said use.
|
|
------------------------------------------------------------------------ */
|
|
|
|
/* auxiliary memory */
|
|
unsigned char dhapix[16][7] = {
|
|
0x00,0x00,0x00,0x00,0x00,0x00,0x00,
|
|
0x08,0x00,0x00,0x02,0x20,0x00,0x00,
|
|
0x01,0x10,0x00,0x00,0x04,0x40,0x00,
|
|
0x09,0x10,0x00,0x02,0x24,0x40,0x00,
|
|
0x02,0x20,0x00,0x00,0x08,0x00,0x00,
|
|
0x0A,0x20,0x00,0x02,0x28,0x00,0x00,
|
|
0x03,0x30,0x00,0x00,0x0C,0x40,0x00,
|
|
0x0B,0x30,0x00,0x02,0x2C,0x40,0x00,
|
|
0x04,0x40,0x00,0x01,0x10,0x00,0x00,
|
|
0x0C,0x40,0x00,0x03,0x30,0x00,0x00,
|
|
0x05,0x50,0x00,0x01,0x14,0x40,0x00,
|
|
0x0D,0x50,0x00,0x03,0x34,0x40,0x00,
|
|
0x06,0x60,0x00,0x01,0x18,0x00,0x00,
|
|
0x0E,0x60,0x00,0x03,0x38,0x00,0x00,
|
|
0x07,0x70,0x00,0x01,0x1C,0x40,0x00,
|
|
0x0F,0x70,0x00,0x03,0x3C,0x40,0x00};
|
|
|
|
/* main memory */
|
|
unsigned char dhmpix[16][7] = {
|
|
0x00,0x00,0x00,0x00,0x00,0x00,0x00,
|
|
0x00,0x01,0x10,0x00,0x00,0x04,0x40,
|
|
0x00,0x00,0x02,0x20,0x00,0x00,0x08,
|
|
0x00,0x01,0x12,0x20,0x00,0x04,0x48,
|
|
0x00,0x00,0x04,0x40,0x00,0x01,0x10,
|
|
0x00,0x01,0x14,0x40,0x00,0x05,0x50,
|
|
0x00,0x00,0x06,0x60,0x00,0x01,0x18,
|
|
0x00,0x01,0x16,0x60,0x00,0x05,0x58,
|
|
0x00,0x00,0x08,0x00,0x00,0x02,0x20,
|
|
0x00,0x01,0x18,0x00,0x00,0x06,0x60,
|
|
0x00,0x00,0x0A,0x20,0x00,0x02,0x28,
|
|
0x00,0x01,0x1A,0x20,0x00,0x06,0x68,
|
|
0x00,0x00,0x0C,0x40,0x00,0x03,0x30,
|
|
0x00,0x01,0x1C,0x40,0x00,0x07,0x70,
|
|
0x00,0x00,0x0E,0x60,0x00,0x03,0x38,
|
|
0x00,0x01,0x1E,0x60,0x00,0x07,0x78};
|
|
|