pin UB      = 20;				// VCC
pin MASSE   = 10;				// GND
pin DATA[8] = { 12,13,14,15,16,17,18,19 };	// P1.0-7
pin MODE[4] = { 7,8,9,11 };			// P3.3,4,5,7
pin PROG    = 6;				// P3.2
pin RDY     = 3;				// P3.1
pin CLK     = 5;				// XTAL1
pin RST     = 1;				// RST

erase()
{
	VCC(5.0);
	VPP(12.0);

	UB  = VCC;
	RST = 0;
	CLK = 0;

	RST = 1;
	PROG= 1;

	MODE = ;
	RST = VPP;

	PROG = 0;
	DELAY(10000);				// 10ms
	PROG = 1;

	RST = 1;
	CLK = 0;
	RST = 0;

	VPP(0);
	VCC(0);
}