#pragma num_alias_table_entries	14
#pragma enable_multiple_baud

IO_0 output bitshift numbits(8) clockedge(+) io_data;
IO_2 output bit en;

IO_6 input bit up;


int x = 0;

when(io_changes(up)to 0)
{
	x = x + 1;
	io_out(en, 1);
	if(x == 1)
	{
		io_out(io_data, 0b01000001UL);
	}
	else if(x == 2)
	{
		io_out(io_data, 0b01000010UL);
	}
	else if(x == 3)
	{
		io_out(io_data, 0b01000011UL);
	}
	else
	{
		x = 0;
		io_out(io_data, 0b00000000UL);
	}
	io_out(en, 0);
}

    Source: geocities.com/hk/cloud_fan_school/Program/LCD/other

               ( geocities.com/hk/cloud_fan_school/Program/LCD)                   ( geocities.com/hk/cloud_fan_school/Program)                   ( geocities.com/hk/cloud_fan_school)                   ( geocities.com/hk)