int romw(int addr,int data)
 {
  memory_buffer[addr - 0x2000] = data;
  return(0);
 }


 int rom_write(void)
 {
  romw(0x2c00,0x3e);  /*ramp*/
  romw(0x2c01,0x00);
  romw(0x2c02,0xd3);
  romw(0x2c03,0x01);
  romw(0x2c04,0x3c);
  romw(0x2c05,0xc3);
  romw(0x2c06,0x02);
  romw(0x2c07,0x2c);
  romw(0x2c10,0x3e);    /*triangular*/
  romw(0x2c11,0x00);
  romw(0x2c12,0xd3);
  romw(0x2c13,0x01);
  romw(0x2c14,0x3c);
  romw(0x2c15,0xc2);
  romw(0x2c16,0x12);
  romw(0x2c17,0x2c);
  romw(0x2c18,0x3d);
  romw(0x2c19,0xd3);
  romw(0x2c1a,0x01);
  romw(0x2c1b,0xc2);
  romw(0x2c1c,0x18);
  romw(0x2c1d,0x2c);
  romw(0x2c1e,0xc3);
  romw(0x2c1f,0x12);
  romw(0x2c20,0x2c);
  romw(0x2c30,0x3e);      /*square*/
  romw(0x2c31,0xff);
  romw(0x2c32,0x06);
  romw(0x2c33,0xff);
  romw(0x2c34,0xd3);
  romw(0x2c35,0x01);
  romw(0x2c36,0x05);
  romw(0x2c37,0xc2);
  romw(0x2c38,0x36);
  romw(0x2c39,0x2c);
  romw(0x2c3a,0x2f);
  romw(0x2c3b,0xc3);
  romw(0x2c3c,0x34);
  romw(0x2c3d,0x2c);
  romw(0x2c50,0x3e);        /*mix*/
  romw(0x2c51,0xa0);
  romw(0x2c52,0xd3);
  romw(0x2c53,0x01);
  romw(0x2c54,0x3e);
  romw(0x2c55,0x00);
  romw(0x2c56,0xd3);
  romw(0x2c57,0x02);
  romw(0x2c58,0x3c);
  romw(0x2c59,0xc2);
  romw(0x2c5a,0x56);
  romw(0x2c5b,0x2c);
  romw(0x2c5c,0xd3);
  romw(0x2c5d,0x01);
  romw(0x2c5e,0x3d);
  romw(0x2c5f,0xd3);
  romw(0x2c60,0x02);
  romw(0x2c61,0xc2);
  romw(0x2c62,0x5e);
  romw(0x2c63,0x2c);
  romw(0x2c64,0xc3);
  romw(0x2c65,0x50);
  romw(0x2c66,0x2c);
  return(0);
 }/*close of rom_write*/