dual_ram.c

基于51单片机的双口RAMIDT7131的驱动程序

#include <SST89x5x4.H>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define lcd_bus P0
#define key_bus P2

sbit ce=P3^4;
sbit rs=P1^5;
sbit rw=P1^3;
sbit e =P1^1;
sbit en=P2^4;
uchar xdata sin1[2048]=0;
 uchar temp=0;
uchar code Rom[]={
0X80,0X80,0X80,0X81,0X81,0X81,0X82,0X82,0X83,0X83,0X83,0X84,0X84,0X85,0X85,0X85,
0X86,0X86,0X87,0X87,0X87,0X88,0X88,0X88,0X89,0X89,0X8a,0X8a,0X8a,0X8b,0X8b,0X8c,
0X8c,0X8c,0X8d,0X8d,0X8e,0X8e,0X8e,0X8f,0X8f,0X90,0X90,0X90,0X91,0X91,0X91,0X92,
0X92,0X93,0X93,0X93,0X94,0X94,0X95,0X95,0X95,0X96,0X96,0X96,0X97,0X97,0X98,0X98,
0X98,0X99,0X99,0X9a,0X9a,0X9a,0X9b,0X9b,0X9b,0X9c,0X9c,0X9d,0X9d,0X9d,0X9e,0X9e,
0X9e,0X9f,0X9f,0Xa0,0Xa0,0Xa0,0Xa1,0Xa1,0Xa2,0Xa2,0Xa2,0Xa3,0Xa3,0Xa3,0Xa4,0Xa4,
0Xa5,0Xa5,0Xa5,0Xa6,0Xa6,0Xa6,0Xa7,0Xa7,0Xa8,0Xa8,0Xa8,0Xa9,0Xa9,0Xa9,0Xaa,0Xaa,
0Xaa,0Xab,0Xab,0Xac,0Xac,0Xac,0Xad,0Xad,0Xad,0Xae,0Xae,0Xaf,0Xaf,0Xaf,0Xb0,0Xb0,
0Xb0,0Xb1,0Xb1,0Xb1,0Xb2,0Xb2,0Xb2,0Xb3,0Xb3,0Xb4,0Xb4,0Xb4,0Xb5,0Xb5,0Xb5,0Xb6,
0Xb6,0Xb6,0Xb7,0Xb7,0Xb7,0Xb8,0Xb8,0Xb9,0Xb9,0Xb9,0Xba,0Xba,0Xba,0Xbb,0Xbb,0Xbb,
0Xbc,0Xbc,0Xbc,0Xbd,0Xbd,0Xbd,0Xbe,0Xbe,0Xbe,0Xbf,0Xbf,0Xbf,0Xc0,0Xc0,0Xc0,0Xc1,
0Xc1,0Xc1,0Xc2,0Xc2,0Xc2,0Xc3,0Xc3,0Xc3,0Xc4,0Xc4,0Xc4,0Xc5,0Xc5,0Xc5,0Xc6,0Xc6,
0Xc6,0Xc7,0Xc7,0Xc7,0Xc8,0Xc8,0Xc8,0Xc9,0Xc9,0Xc9,0Xca,0Xca,0Xca,0Xcb,0Xcb,0Xcb,
0Xcb,0Xcc,0Xcc,0Xcc,0Xcd,0Xcd,0Xcd,0Xce,0Xce,0Xce,0Xcf,0Xcf,0Xcf,0Xd0,0Xd0,0Xd0,
0Xd0,0Xd1,0Xd1,0Xd1,0Xd2,0Xd2,0Xd2,0Xd3,0Xd3,0Xd3,0Xd3,0Xd4,0Xd4,0Xd4,0Xd5,0Xd5,
0Xd5,0Xd5,0Xd6,0Xd6,0Xd6,0Xd7,0Xd7,0Xd7,0Xd7,0Xd8,0Xd8,0Xd8,0Xd9,0Xd9,0Xd9,0Xd9,
0Xda,0Xda,0Xda,0Xdb,0Xdb,0Xdb,0Xdb,0Xdc,0Xdc,0Xdc,0Xdc,0Xdd,0Xdd,0Xdd,0Xdd,0Xde,
0Xde,0Xde,0Xdf,0Xdf,0Xdf,0Xdf,0Xe0,0Xe0,0Xe0,0Xe0,0Xe1,0Xe1,0Xe1,0Xe1,0Xe2,0Xe2,
0Xe2,0Xe2,0Xe3,0Xe3,0Xe3,0Xe3,0Xe4,0Xe4,0Xe4,0Xe4,0Xe5,0Xe5,0Xe5,0Xe5,0Xe5,0Xe6,
0Xe6,0Xe6,0Xe6,0Xe7,0Xe7,0Xe7,0Xe7,0Xe8,0Xe8,0Xe8,0Xe8,0Xe8,0Xe9,0Xe9,0Xe9,0Xe9,
0Xea,0Xea,0Xea,0Xea,0Xea,0Xeb,0Xeb,0Xeb,0Xeb,0Xeb,0Xec,0Xec,0Xec,0Xec,0Xec,0Xed,
0Xed,0Xed,0Xed,0Xed,0Xee,0Xee,0Xee,0Xee,0Xee,0Xef,0Xef,0Xef,0Xef,0Xef,0Xf0,0Xf0,
0Xf0,0Xf0,0Xf0,0Xf1,0Xf1,0Xf1,0Xf1,0Xf1,0Xf1,0Xf2,0Xf2,0Xf2,0Xf2,0Xf2,0Xf2,0Xf3,
0Xf3,0Xf3,0Xf3,0Xf3,0Xf3,0Xf4,0Xf4,0Xf4,0Xf4,0Xf4,0Xf4,0Xf5,0Xf5,0Xf5,0Xf5,0Xf5,
0Xf5,0Xf5,0Xf6,0Xf6,0Xf6,0Xf6,0Xf6,0Xf6,0Xf6,0Xf7,0Xf7,0Xf7,0Xf7,0Xf7,0Xf7,0Xf7,
0Xf8,0Xf8,0Xf8,0Xf8,0Xf8,0Xf8,0Xf8,0Xf8,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,
0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfb,0Xfb,0Xfb,0Xfb,0Xfb,0Xfb,0Xfb,
0Xfb,0Xfb,0Xfb,0Xfb,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,
0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfe,0Xfe,
0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,
0Xfe,0Xfe,0Xfe,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,
0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,
0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,
0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xff,0Xfe,0Xfe,0Xfe,
0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,
0Xfe,0Xfe,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,0Xfd,
0Xfd,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfc,0Xfb,0Xfb,0Xfb,
0Xfb,0Xfb,0Xfb,0Xfb,0Xfb,0Xfb,0Xfb,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,0Xfa,
0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf8,0Xf8,0Xf8,0Xf8,0Xf8,0Xf8,0Xf8,
0Xf8,0Xf7,0Xf7,0Xf7,0Xf7,0Xf7,0Xf7,0Xf7,0Xf6,0Xf6,0Xf6,0Xf6,0Xf6,0Xf6,0Xf6,0Xf5,
0Xf5,0Xf5,0Xf5,0Xf5,0Xf5,0Xf4,0Xf4,0Xf4,0Xf4,0Xf4,0Xf4,0Xf4,0Xf3,0Xf3,0Xf3,0Xf3,
0Xf3,0Xf3,0Xf2,0Xf2,0Xf2,0Xf2,0Xf2,0Xf2,0Xf1,0Xf1,0Xf1,0Xf1,0Xf1,0Xf0,0Xf0,0Xf0,
0Xf0,0Xf0,0Xf0,0Xef,0Xef,0Xef,0Xef,0Xef,0Xee,0Xee,0Xee,0Xee,0Xee,0Xed,0Xed,0Xed,
0Xed,0Xed,0Xec,0Xec,0Xec,0Xec,0Xec,0Xeb,0Xeb,0Xeb,0Xeb,0Xeb,0Xea,0Xea,0Xea,0Xea,
0Xe9,0Xe9,0Xe9,0Xe9,0Xe9,0Xe8,0Xe8,0Xe8,0Xe8,0Xe7,0Xe7,0Xe7,0Xe7,0Xe7,0Xe6,0Xe6,
0Xe6,0Xe6,0Xe5,0Xe5,0Xe5,0Xe5,0Xe4,0Xe4,0Xe4,0Xe4,0Xe3,0Xe3,0Xe3,0Xe3,0Xe2,0Xe2,
0Xe2,0Xe2,0Xe1,0Xe1,0Xe1,0Xe1,0Xe0,0Xe0,0Xe0,0Xe0,0Xdf,0Xdf,0Xdf,0Xdf,0Xde,0Xde,
0Xde,0Xde,0Xdd,0Xdd,0Xdd,0Xdd,0Xdc,0Xdc,0Xdc,0Xdb,0Xdb,0Xdb,0Xdb,0Xda,0Xda,0Xda,
0Xda,0Xd9,0Xd9,0Xd9,0Xd8,0Xd8,0Xd8,0Xd8,0Xd7,0Xd7,0Xd7,0Xd6,0Xd6,0Xd6,0Xd6,0Xd5,
0Xd5,0Xd5,0Xd4,0Xd4,0Xd4,0Xd4,0Xd3,0Xd3,0Xd3,0Xd2,0Xd2,0Xd2,0Xd1,0Xd1,0Xd1,0Xd1,
0Xd0,0Xd0,0Xd0,0Xcf,0Xcf,0Xcf,0Xce,0Xce,0Xce,0Xce,0Xcd,0Xcd,0Xcd,0Xcc,0Xcc,0Xcc,
0Xcb,0Xcb,0Xcb,0Xca,0Xca,0Xca,0Xc9,0Xc9,0Xc9,0Xc8,0Xc8,0Xc8,0Xc8,0Xc7,0Xc7,0Xc7,
0Xc6,0Xc6,0Xc6,0Xc5,0Xc5,0Xc5,0Xc4,0Xc4,0Xc4,0Xc3,0Xc3,0Xc3,0Xc2,0Xc2,0Xc2,0Xc1,
0Xc1,0Xc1,0Xc0,0Xc0,0Xc0,0Xbf,0Xbf,0Xbf,0Xbe,0Xbe,0Xbe,0Xbd,0Xbd,0Xbc,0Xbc,0Xbc,
0Xbb,0Xbb,0Xbb,0Xba,0Xba,0Xba,0Xb9,0Xb9,0Xb9,0Xb8,0Xb8,0Xb8,0Xb7,0Xb7,0Xb7,0Xb6,
0Xb6,0Xb6,0Xb5,0Xb5,0Xb4,0Xb4,0Xb4,0Xb3,0Xb3,0Xb3,0Xb2,0Xb2,0Xb2,0Xb1,0Xb1,0Xb1,
0Xb0,0Xb0,0Xaf,0Xaf,0Xaf,0Xae,0Xae,0Xae,0Xad,0Xad,0Xad,0Xac,0Xac,0Xab,0Xab,0Xab,
0Xaa,0Xaa,0Xaa,0Xa9,0Xa9,0Xa8,0Xa8,0Xa8,0Xa7,0Xa7,0Xa7,0Xa6,0Xa6,0Xa5,0Xa5,0Xa5,
0Xa4,0Xa4,0Xa4,0Xa3,0Xa3,0Xa2,0Xa2,0Xa2,0Xa1,0Xa1,0Xa1,0Xa0,0Xa0,0X9f,0X9f,0X9f,
0X9e,0X9e,0X9e,0X9d,0X9d,0X9c,0X9c,0X9c,0X9b,0X9b,0X9b,0X9a,0X9a,0X99,0X99,0X99,
0X98,0X98,0X97,0X97,0X97,0X96,0X96,0X96,0X95,0X95,0X94,0X94,0X94,0X93,0X93,0X92,
0X92,0X92,0X91,0X91,0X90,0X90,0X90,0X8f,0X8f,0X8f,0X8e,0X8e,0X8d,0X8d,0X8d,0X8c,
0X8c,0X8b,0X8b,0X8b,0X8a,0X8a,0X89,0X89,0X89,0X88,0X88,0X88,0X87,0X87,0X86,0X86,
0X86,0X85,0X85,0X84,0X84,0X84,0X83,0X83,0X82,0X82,0X82,0X81,0X81,0X80,0X80,0X80,
0X7f,0X7f,0X7f,0X7e,0X7e,0X7d,0X7d,0X7d,0X7c,0X7c,0X7b,0X7b,0X7b,0X7a,0X7a,0X79,
0X79,0X79,0X78,0X78,0X77,0X77,0X77,0X76,0X76,0X76,0X75,0X75,0X74,0X74,0X74,0X73,
0X73,0X72,0X72,0X72,0X71,0X71,0X70,0X70,0X70,0X6f,0X6f,0X6f,0X6e,0X6e,0X6d,0X6d,
0X6d,0X6c,0X6c,0X6b,0X6b,0X6b,0X6a,0X6a,0X6a,0X69,0X69,0X68,0X68,0X68,0X67,0X67,
0X66,0X66,0X66,0X65,0X65,0X65,0X64,0X64,0X63,0X63,0X63,0X62,0X62,0X61,0X61,0X61,
0X60,0X60,0X60,0X5f,0X5f,0X5e,0X5e,0X5e,0X5d,0X5d,0X5d,0X5c,0X5c,0X5b,0X5b,0X5b,
0X5a,0X5a,0X5a,0X59,0X59,0X58,0X58,0X58,0X57,0X57,0X57,0X56,0X56,0X55,0X55,0X55,
0X54,0X54,0X54,0X53,0X53,0X53,0X52,0X52,0X51,0X51,0X51,0X50,0X50,0X50,0X4f,0X4f,
0X4f,0X4e,0X4e,0X4d,0X4d,0X4d,0X4c,0X4c,0X4c,0X4b,0X4b,0X4b,0X4a,0X4a,0X4a,0X49,
0X49,0X48,0X48,0X48,0X47,0X47,0X47,0X46,0X46,0X46,0X45,0X45,0X45,0X44,0X44,0X44,
0X43,0X43,0X43,0X42,0X42,0X41,0X41,0X41,0X40,0X40,0X40,0X3f,0X3f,0X3f,0X3e,0X3e,
0X3e,0X3d,0X3d,0X3d,0X3c,0X3c,0X3c,0X3b,0X3b,0X3b,0X3a,0X3a,0X3a,0X39,0X39,0X39,
0X38,0X38,0X38,0X38,0X37,0X37,0X37,0X36,0X36,0X36,0X35,0X35,0X35,0X34,0X34,0X34,
0X33,0X33,0X33,0X32,0X32,0X32,0X32,0X31,0X31,0X31,0X30,0X30,0X30,0X2f,0X2f,0X2f,
0X2e,0X2e,0X2e,0X2e,0X2d,0X2d,0X2d,0X2c,0X2c,0X2c,0X2b,0X2b,0X2b,0X2b,0X2a,0X2a,
0X2a,0X29,0X29,0X29,0X29,0X28,0X28,0X28,0X27,0X27,0X27,0X27,0X26,0X26,0X26,0X25,
0X25,0X25,0X25,0X24,0X24,0X24,0X24,0X23,0X23,0X23,0X22,0X22,0X22,0X22,0X21,0X21,
0X21,0X21,0X20,0X20,0X20,0X20,0X1f,0X1f,0X1f,0X1f,0X1e,0X1e,0X1e,0X1e,0X1d,0X1d,
0X1d,0X1d,0X1c,0X1c,0X1c,0X1c,0X1b,0X1b,0X1b,0X1b,0X1a,0X1a,0X1a,0X1a,0X19,0X19,
0X19,0X19,0X18,0X18,0X18,0X18,0X18,0X17,0X17,0X17,0X17,0X16,0X16,0X16,0X16,0X16,
0X15,0X15,0X15,0X15,0X14,0X14,0X14,0X14,0X14,0X13,0X13,0X13,0X13,0X13,0X12,0X12,
0X12,0X12,0X12,0X11,0X11,0X11,0X11,0X11,0X10,0X10,0X10,0X10,0X10,0X0f,0X0f,0X0f,
0X0f,0X0f,0X0f,0X0e,0X0e,0X0e,0X0e,0X0e,0X0e,0X0d,0X0d,0X0d,0X0d,0X0d,0X0c,0X0c,
0X0c,0X0c,0X0c,0X0c,0X0b,0X0b,0X0b,0X0b,0X0b,0X0b,0X0b,0X0a,0X0a,0X0a,0X0a,0X0a,
0X0a,0X09,0X09,0X09,0X09,0X09,0X09,0X09,0X08,0X08,0X08,0X08,0X08,0X08,0X08,0X07,
0X07,0X07,0X07,0X07,0X07,0X07,0X07,0X06,0X06,0X06,0X06,0X06,0X06,0X06,0X06,0X06,
0X05,0X05,0X05,0X05,0X05,0X05,0X05,0X05,0X05,0X04,0X04,0X04,0X04,0X04,0X04,0X04,
0X04,0X04,0X04,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X02,
0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X01,0X01,
0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,
0X01,0X01,0X01,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,
0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X01,0X01,0X01,
0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,0X01,
0X01,0X01,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,0X02,
0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X03,0X04,0X04,0X04,0X04,
0X04,0X04,0X04,0X04,0X04,0X04,0X04,0X05,0X05,0X05,0X05,0X05,0X05,0X05,0X05,0X05,
0X06,0X06,0X06,0X06,0X06,0X06,0X06,0X06,0X07,0X07,0X07,0X07,0X07,0X07,0X07,0X07,
0X08,0X08,0X08,0X08,0X08,0X08,0X08,0X09,0X09,0X09,0X09,0X09,0X09,0X09,0X0a,0X0a,
0X0a,0X0a,0X0a,0X0a,0X0a,0X0b,0X0b,0X0b,0X0b,0X0b,0X0b,0X0c,0X0c,0X0c,0X0c,0X0c,
0X0c,0X0d,0X0d,0X0d,0X0d,0X0d,0X0d,0X0e,0X0e,0X0e,0X0e,0X0e,0X0e,0X0f,0X0f,0X0f,
0X0f,0X0f,0X10,0X10,0X10,0X10,0X10,0X11,0X11,0X11,0X11,0X11,0X11,0X12,0X12,0X12,
0X12,0X13,0X13,0X13,0X13,0X13,0X14,0X14,0X14,0X14,0X14,0X15,0X15,0X15,0X15,0X15,
0X16,0X16,0X16,0X16,0X17,0X17,0X17,0X17,0X17,0X18,0X18,0X18,0X18,0X19,0X19,0X19,
0X19,0X1a,0X1a,0X1a,0X1a,0X1a,0X1b,0X1b,0X1b,0X1b,0X1c,0X1c,0X1c,0X1c,0X1d,0X1d,
0X1d,0X1d,0X1e,0X1e,0X1e,0X1e,0X1f,0X1f,0X1f,0X1f,0X20,0X20,0X20,0X20,0X21,0X21,
0X21,0X22,0X22,0X22,0X22,0X23,0X23,0X23,0X23,0X24,0X24,0X24,0X24,0X25,0X25,0X25,
0X26,0X26,0X26,0X26,0X27,0X27,0X27,0X28,0X28,0X28,0X28,0X29,0X29,0X29,0X2a,0X2a,
0X2a,0X2a,0X2b,0X2b,0X2b,0X2c,0X2c,0X2c,0X2c,0X2d,0X2d,0X2d,0X2e,0X2e,0X2e,0X2f,
0X2f,0X2f,0X2f,0X30,0X30,0X30,0X31,0X31,0X31,0X32,0X32,0X32,0X33,0X33,0X33,0X33,
0X34,0X34,0X34,0X35,0X35,0X35,0X36,0X36,0X36,0X37,0X37,0X37,0X38,0X38,0X38,0X39,
0X39,0X39,0X3a,0X3a,0X3a,0X3b,0X3b,0X3b,0X3c,0X3c,0X3c,0X3d,0X3d,0X3d,0X3e,0X3e,
0X3e,0X3f,0X3f,0X3f,0X40,0X40,0X40,0X41,0X41,0X41,0X42,0X42,0X42,0X43,0X43,0X43,
0X44,0X44,0X44,0X45,0X45,0X45,0X46,0X46,0X46,0X47,0X47,0X48,0X48,0X48,0X49,0X49,
0X49,0X4a,0X4a,0X4a,0X4b,0X4b,0X4b,0X4c,0X4c,0X4d,0X4d,0X4d,0X4e,0X4e,0X4e,0X4f,
0X4f,0X4f,0X50,0X50,0X50,0X51,0X51,0X52,0X52,0X52,0X53,0X53,0X53,0X54,0X54,0X55,
0X55,0X55,0X56,0X56,0X56,0X57,0X57,0X57,0X58,0X58,0X59,0X59,0X59,0X5a,0X5a,0X5a,
0X5b,0X5b,0X5c,0X5c,0X5c,0X5d,0X5d,0X5d,0X5e,0X5e,0X5f,0X5f,0X5f,0X60,0X60,0X60,
0X61,0X61,0X62,0X62,0X62,0X63,0X63,0X64,0X64,0X64,0X65,0X65,0X65,0X66,0X66,0X67,
0X67,0X67,0X68,0X68,0X69,0X69,0X69,0X6a,0X6a,0X6a,0X6b,0X6b,0X6c,0X6c,0X6c,0X6d,
0X6d,0X6e,0X6e,0X6e,0X6f,0X6f,0X6f,0X70,0X70,0X71,0X71,0X71,0X72,0X72,0X73,0X73,
0X73,0X74,0X74,0X75,0X75,0X75,0X76,0X76,0X76,0X77,0X77,0X78,0X78,0X78,0X79,0X79,
0X7a,0X7a,0X7a,0X7b,0X7b,0X7c,0X7c,0X7c,0X7d,0X7d,0X7e,0X7e,0X7e,0X7f,0X7f,0X7f,
};



uchar code Rom1[]={
0X80,0X80,0X80,0X80,0X80,0X81,0X81,0X81,0X81,0X82,0X82,0X82,0X82,0X83,0X83,0X83,
0X83,0X84,0X84,0X84,0X84,0X85,0X85,0X85,0X85,0X86,0X86,0X86,0X86,0X87,0X87,0X87,
0X87,0X88,0X88,0X88,0X88,0X89,0X89,0X89,0X89,0X8a,0X8a,0X8a,0X8a,0X8b,0X8b,0X8b,
0X8b,0X8c,0X8c,0X8c,0X8c,0X8d,0X8d,0X8d,0X8d,0X8e,0X8e,0X8e,0X8e,0X8f,0X8f,0X8f,
0X8f,0X90,0X90,0X90,0X90,0X91,0X91,0X91,0X91,0X92,0X92,0X92,0X92,0X93,0X93,0X93,
0X93,0X94,0X94,0X94,0X94,0X95,0X95,0X95,0X95,0X96,0X96,0X96,0X96,0X97,0X97,0X97,
0X97,0X98,0X98,0X98,0X98,0X99,0X99,0X99,0X99,0X9a,0X9a,0X9a,0X9a,0X9b,0X9b,0X9b,
0X9b,0X9c,0X9c,0X9c,0X9c,0X9d,0X9d,0X9d,0X9d,0X9e,0X9e,0X9e,0X9e,0X9f,0X9f,0X9f,
0X9f,0Xa0,0Xa0,0Xa0,0Xa0,0Xa1,0Xa1,0Xa1,0Xa1,0Xa2,0Xa2,0Xa2,0Xa2,0Xa3,0Xa3,0Xa3,
0Xa3,0Xa4,0Xa4,0Xa4,0Xa4,0Xa5,0Xa5,0Xa5,0Xa5,0Xa6,0Xa6,0Xa6,0Xa6,0Xa7,0Xa7,0Xa7,
0Xa7,0Xa8,0Xa8,0Xa8,0Xa8,0Xa9,0Xa9,0Xa9,0Xa9,0Xaa,0Xaa,0Xaa,0Xaa,0Xab,0Xab,0Xab,
0Xab,0Xac,0Xac,0Xac,0Xac,0Xad,0Xad,0Xad,0Xad,0Xae,0Xae,0Xae,0Xae,0Xaf,0Xaf,0Xaf,
0Xaf,0Xb0,0Xb0,0Xb0,0Xb0,0Xb1,0Xb1,0Xb1,0Xb1,0Xb2,0Xb2,0Xb2,0Xb2,0Xb3,0Xb3,0Xb3,
0Xb3,0Xb4,0Xb4,0Xb4,0Xb4,0Xb5,0Xb5,0Xb5,0Xb5,0Xb6,0Xb6,0Xb6,0Xb6,0Xb7,0Xb7,0Xb7,
0Xb7,0Xb8,0Xb8,0Xb8,0Xb8,0Xb9,0Xb9,0Xb9,0Xb9,0Xba,0Xba,0Xba,0Xba,0Xbb,0Xbb,0Xbb,
0Xbb,0Xbc,0Xbc,0Xbc,0Xbc,0Xbd,0Xbd,0Xbd,0Xbd,0Xbe,0Xbe,0Xbe,0Xbe,0Xbf,0Xbf,0Xbf,
0Xbf,0Xc0,0Xc0,0Xc0,0Xc0,0Xc1,0Xc1,0Xc1,0Xc1,0Xc2,0Xc2,0Xc2,0Xc2,0Xc3,0Xc3,0Xc3,
0Xc3,0Xc4,0Xc4,0Xc4,0Xc4,0Xc5,0Xc5,0Xc5,0Xc5,0Xc6,0Xc6,0Xc6,0Xc6,0Xc7,0Xc7,0Xc7,
0Xc7,0Xc8,0Xc8,0Xc8,0Xc8,0Xc8,0Xc9,0Xc9,0Xc9,0Xca,0Xca,0Xca,0Xca,0Xcb,0Xcb,0Xcb,
0Xcb,0Xcb,0Xcc,0Xcc,0Xcc,0Xcc,0Xcd,0Xcd,0Xcd,0Xcd,0Xce,0Xce,0Xce,0Xce,0Xcf,0Xcf,
0Xcf,0Xcf,0Xd0,0Xd0,0Xd0,0Xd0,0Xd1,0Xd1,0Xd1,0Xd1,0Xd2,0Xd2,0Xd2,0Xd2,0Xd3,0Xd3,
0Xd3,0Xd3,0Xd4,0Xd4,0Xd4,0Xd4,0Xd5,0Xd5,0Xd5,0Xd5,0Xd6,0Xd6,0Xd6,0Xd6,0Xd7,0Xd7,
0Xd7,0Xd7,0Xd8,0Xd8,0Xd8,0Xd8,0Xd9,0Xd9,0Xd9,0Xd9,0Xda,0Xda,0Xda,0Xda,0Xdb,0Xdb,
0Xdb,0Xdb,0Xdc,0Xdc,0Xdc,0Xdc,0Xdd,0Xdd,0Xdd,0Xdd,0Xde,0Xde,0Xde,0Xde,0Xdf,0Xdf,
0Xdf,0Xdf,0Xe0,0Xe0,0Xe0,0Xe0,0Xe1,0Xe1,0Xe1,0Xe1,0Xe2,0Xe2,0Xe2,0Xe2,0Xe3,0Xe3,
0Xe3,0Xe3,0Xe4,0Xe4,0Xe4,0Xe4,0Xe5,0Xe5,0Xe5,0Xe5,0Xe6,0Xe6,0Xe6,0Xe6,0Xe7,0Xe7,
0Xe7,0Xe7,0Xe8,0Xe8,0Xe8,0Xe8,0Xe9,0Xe9,0Xe9,0Xe9,0Xea,0Xea,0Xea,0Xea,0Xeb,0Xeb,
0Xeb,0Xeb,0Xec,0Xec,0Xec,0Xec,0Xed,0Xed,0Xed,0Xed,0Xee,0Xee,0Xee,0Xee,0Xef,0Xef,
0Xef,0Xef,0Xf0,0Xf0,0Xf0,0Xf0,0Xf1,0Xf1,0Xf1,0Xf1,0Xf2,0Xf2,0Xf2,0Xf2,0Xf3,0Xf3,
0Xf3,0Xf3,0Xf4,0Xf4,0Xf4,0Xf4,0Xf5,0Xf5,0Xf5,0Xf5,0Xf6,0Xf6,0Xf6,0Xf6,0Xf7,0Xf7,
0Xf7,0Xf7,0Xf8,0Xf8,0Xf8,0Xf8,0Xf9,0Xf9,0Xf9,0Xf9,0Xfa,0Xfa,0Xfa,0Xfa,0Xfb,0Xfb,
0Xfb,0Xfb,0Xfc,0Xfc,0Xfc,0Xfc,0Xfd,0Xfd,0Xfd,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,
0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfe,0Xfd,0Xfd,0Xfd,0Xfd,0Xfc,0Xfc,0Xfc,0Xfb,0Xfb,
0Xfb,0Xfb,0Xfa,0Xfa,0Xfa,0Xfa,0Xf9,0Xf9,0Xf9,0Xf9,0Xf9,0Xf8,0Xf8,0Xf8,0Xf7,0Xf7,
0Xf7,0Xf7,0Xf6,0Xf6,0Xf6,0Xf6,0Xf5,0Xf5,0Xf5,0Xf5,0Xf4,0Xf4,0Xf4,0Xf4,0Xf4,0Xf3,
0Xf3,0Xf3,0Xf3,0Xf2,0Xf2,0Xf2,0Xf1,0Xf1,0Xf1,0Xf1,0Xf0,0Xf0,0Xf0,0Xf0,0Xf0,0Xef,
0Xef,0Xef,0Xef,0Xee,0Xee,0Xee,0Xee,0Xed,0Xed,0Xed,0Xec,0Xec,0Xec,0Xec,0Xeb,0Xeb,
0Xeb,0Xeb,0Xeb,0Xea,0Xea,0Xea,0Xea,0Xe9,0Xe9,0Xe9,0Xe9,0Xe8,0Xe8,0Xe8,0Xe8,0Xe7,
0Xe7,0Xe7,0Xe7,0Xe6,0Xe6,0Xe6,0Xe6,0Xe5,0Xe5,0Xe5,0Xe5,0Xe4,0Xe4,0Xe4,0Xe4,0Xe3,
0Xe3,0Xe3,0Xe3,0Xe2,0Xe2,0Xe2,0Xe2,0Xe1,0Xe1,0Xe1,0Xe1,0Xe0,0Xe0,0Xe0,0Xe0,0Xdf,
0Xdf,0Xdf,0Xdf,0Xde,0Xde,0Xde,0Xde,0Xdd,0Xdd,0Xdd,0Xdd,0Xdc,0Xdc,0Xdc,0Xdc,0Xdb,
0Xdb,0Xdb,0Xdb,0Xda,0Xda,0Xda,0Xda,0Xd9,0Xd9,0Xd9,0Xd9,0Xd8,0Xd8,0Xd8,0Xd8,0Xd7,
0Xd7,0Xd7,0Xd7,0Xd6,0Xd6,0Xd6,0Xd6,0Xd5,0Xd5,0Xd5,0Xd5,0Xd4,0Xd4,0Xd4,0Xd4,0Xd3,
0Xd3,0Xd3,0Xd3,0Xd2,0Xd2,0Xd2,0Xd2,0Xd1,0Xd1,0Xd1,0Xd1,0Xd0,0Xd0,0Xd0,0Xd0,0Xcf,
0Xcf,0Xcf,0Xcf,0Xce,0Xce,0Xce,0Xce,0Xcd,0Xcd,0Xcd,0Xcd,0Xcc,0Xcc,0Xcc,0Xcc,0Xcb,
0Xcb,0Xcb,0Xcb,0Xca,0Xca,0Xca,0Xca,0Xc9,0Xc9,0Xc9,0Xc9,0Xc8,0Xc8,0Xc8,0Xc8,0Xc7,
0Xc7,0Xc7,0Xc7,0Xc6,0Xc6,0Xc6,0Xc6,0Xc5,0Xc5,0Xc5,0Xc5,0Xc4,0Xc4,0Xc4,0Xc4,0Xc3,
0Xc3,0Xc3,0Xc3,0Xc2,0Xc2,0Xc2,0Xc2,0Xc1,0Xc1,0Xc1,0Xc1,0Xc0,0Xc0,0Xc0,0Xc0,0Xbf,
0Xbf,0Xbf,0Xbf,0Xbe,0Xbe,0Xbe,0Xbe,0Xbd,0Xbd,0Xbd,0Xbd,0Xbc,0Xbc,0Xbc,0Xbc,0Xbb,
0Xbb,0Xbb,0Xbb,0Xba,0Xba,0Xba,0Xba,0Xb9,0Xb9,0Xb9,0Xb9,0Xb8,0Xb8,0Xb8,0Xb8,0Xb7,
0Xb7,0Xb7,0Xb7,0Xb6,0Xb6,0Xb6,0Xb6,0Xb5,0Xb5,0Xb5,0Xb5,0Xb4,0Xb4,0Xb4,0Xb4,0Xb3,
0Xb3,0Xb3,0Xb3,0Xb2,0Xb2,0Xb2,0Xb2,0Xb1,0Xb1,0Xb1,0Xb1,0Xb0,0Xb0,0Xb0,0Xb0,0Xaf,
0Xaf,0Xaf,0Xaf,0Xae,0Xae,0Xae,0Xae,0Xad,0Xad,0Xad,0Xad,0Xac,0Xac,0Xac,0Xac,0Xab,
0Xab,0Xab,0Xab,0Xaa,0Xaa,0Xaa,0Xaa,0Xa9,0Xa9,0Xa9,0Xa9,0Xa8,0Xa8,0Xa8,0Xa8,0Xa8,
0Xa7,0Xa7,0Xa7,0Xa7,0Xa6,0Xa6,0Xa6,0Xa6,0Xa5,0Xa5,0Xa5,0Xa4,0Xa4,0Xa4,0Xa4,0Xa4,
0Xa3,0Xa3,0Xa3,0Xa3,0Xa2,0Xa2,0Xa2,0Xa2,0Xa1,0Xa1,0Xa1,0Xa1,0Xa0,0Xa0,0Xa0,0Xa0,
0X9f,0X9f,0X9f,0X9f,0X9e,0X9e,0X9e,0X9e,0X9d,0X9d,0X9d,0X9d,0X9c,0X9c,0X9c,0X9c,
0X9b,0X9b,0X9b,0X9b,0X9a,0X9a,0X9a,0X9a,0X99,0X99,0X99,0X99,0X98,0X98,0X98,0X98,
0X97,0X97,0X97,0X97,0X96,0X96,0X96,0X96,0X95,0X95,0X95,0X95,0X94,0X94,0X94,0X94,
0X93,0X93,0X93,0X93,0X92,0X92,0X92,0X92,0X91,0X91,0X91,0X91,0X90,0X90,0X90,0X90,
0X8f,0X8f,0X8f,0X8f,0X8e,0X8e,0X8e,0X8e,0X8d,0X8d,0X8d,0X8d,0X8c,0X8c,0X8c,0X8c,
0X8b,0X8b,0X8b,0X8b,0X8a,0X8a,0X8a,0X8a,0X89,0X89,0X89,0X89,0X88,0X88,0X88,0X88,
0X87,0X87,0X87,0X87,0X86,0X86,0X86,0X86,0X85,0X85,0X85,0X85,0X84,0X84,0X84,0X84,
0X83,0X83,0X83,0X83,0X82,0X82,0X82,0X82,0X81,0X81,0X81,0X81,0X80,0X80,0X80,0X80,
0X7f,0X7f,0X7f,0X7f,0X7e,0X7e,0X7e,0X7e,0X7d,0X7d,0X7d,0X7d,0X7c,0X7c,0X7c,0X7c,
0X7b,0X7b,0X7b,0X7b,0X7a,0X7a,0X7a,0X7a,0X79,0X79,0X79,0X79,0X78,0X78,0X78,0X78,
0X77,0X77,0X77,0X77,0X76,0X76,0X76,0X76,0X75,0X75,0X75,0X75,0X74,0X74,0X74,0X74,
0X73,0X73,0X73,0X73,0X72,0X72,0X72,0X72,0X71,0X71,0X71,0X71,0X70,0X70,0X70,0X70,
0X6f,0X6f,0X6f,0X6f,0X6e,0X6e,0X6e,0X6e,0X6d,0X6d,0X6d,0X6d,0X6c,0X6c,0X6c,0X6c,
0X6b,0X6b,0X6b,0X6b,0X6a,0X6a,0X6a,0X6a,0X69,0X69,0X69,0X69,0X68,0X68,0X68,0X68,
0X67,0X67,0X67,0X67,0X66,0X66,0X66,0X66,0X65,0X65,0X65,0X65,0X64,0X64,0X64,0X64,
0X63,0X63,0X63,0X63,0X62,0X62,0X62,0X62,0X61,0X61,0X61,0X61,0X60,0X60,0X60,0X60,
0X5f,0X5f,0X5f,0X5f,0X5e,0X5e,0X5e,0X5e,0X5d,0X5d,0X5d,0X5d,0X5c,0X5c,0X5c,0X5c,
0X5c,0X5b,0X5b,0X5b,0X5b,0X5a,0X5a,0X5a,0X5a,0X59,0X59,0X59,0X59,0X58,0X58,0X58,
0X58,0X57,0X57,0X57,0X57,0X56,0X56,0X56,0X56,0X55,0X55,0X55,0X55,0X54,0X54,0X54,
0X54,0X53,0X53,0X53,0X53,0X52,0X52,0X52,0X52,0X51,0X51,0X51,0X51,0X50,0X50,0X50,
0X50,0X4f,0X4f,0X4f,0X4f,0X4e,0X4e,0X4e,0X4e,0X4d,0X4d,0X4d,0X4d,0X4c,0X4c,0X4c,
0X4c,0X4b,0X4b,0X4b,0X4b,0X4a,0X4a,0X4a,0X4a,0X49,0X49,0X49,0X49,0X48,0X48,0X48,
0X48,0X47,0X47,0X47,0X47,0X46,0X46,0X46,0X46,0X45,0X45,0X45,0X45,0X44,0X44,0X44,
0X44,0X43,0X43,0X43,0X43,0X42,0X42,0X42,0X42,0X41,0X41,0X41,0X41,0X40,0X40,0X40,
0X40,0X3f,0X3f,0X3f,0X3f,0X3e,0X3e,0X3e,0X3e,0X3d,0X3d,0X3d,0X3d,0X3c,0X3c,0X3c,
0X3c,0X3b,0X3b,0X3b,0X3b,0X3a,0X3a,0X3a,0X3a,0X39,0X39,0X39,0X39,0X38,0X38,0X38,
0X38,0X37,0X37,0X37,0X37,0X36,0X36,0X36,0X36,0X35,0X35,0X35,0X35,0X34,0X34,0X34,
0X34,0X33,0X33,0X33,0X33,0X32,0X32,0X32,0X32,0X31,0X31,0X31,0X31,0X30,0X30,0X30,
0X30,0X2f,0X2f,0X2f,0X2f,0X2e,0X2e,0X2e,0X2e,0X2d,0X2d,0X2d,0X2d,0X2c,0X2c,0X2c,