TITLE "EPLD for FTV2.x project";--expander.tdf--software for expander core to make a franpatg for the Cyclic.--	----Eric Funke--I2C core provided by Frank Budzelaar, Philips Research--2nd of november 2004INCLUDE "i2cSlave.inc";INCLUDE "i2cregin.inc";INCLUDE "i2cregout.inc";SUBDESIGN expander(sda							: 	BIDIR;  -- the sda pin for PW164scl							: 	BIDIR;  -- the scl pin	for P164expander_data_out[7..0]					:	OUTPUT;clk1							:	INPUT; 	-- pin 55)VARIABLEI2Cslavecore_one	: 	i2cSlave  WITH (SUBADDRESSBITS=8);expander_data		:	i2cregout WITH (SUBADDRESS=0,SUBADDRESSBITS=8,OUTBITS=8,INITIALVALUE=124,RW="NO"); klok_div_8[3..0]	:	JKFF;sysClk			:	NODE;clock			:	NODE;BEGIN-- input section----------------------------------------------------------------------clock = GLOBAL(clk1);--i2c sectionklok_div_8[].J = VCC;					--clock divider for I2C coreklok_div_8[].K = VCC;klok_div_8[3].clk = klok_div_8[2].q;klok_div_8[2].clk = klok_div_8[1].q;klok_div_8[1].clk = klok_div_8[0].q;klok_div_8[0].clk = clock;sysClk=global(klok_div_8[2].q);		--I have to divide the clock for the I2C core							--because it cannot handle the full clock speed--<<SLAVE CORE1>>--I2Cslavecore_one.clk=sysClk;scl=I2Cslavecore_one.scl;sda=I2Cslavecore_one.sda;I2Cslavecore_one.slaveAddress[]=b"0110111";		--address 6E expander_data.i2cBusIn[]=I2Cslavecore_one.i2cBusOut[];I2Cslavecore_one.i2cBusIn[]=expander_data.i2cBusOut[];expander_data_out[7..0] = expander_data.out[7..0];END;