% 81188 configuration to allow reading/writing of its attached SRAM %
% from the ISA bus. %

DESIGN IS mem2
BEGIN
	DEVICE mem2 IS EPF81188GC232
	BEGIN
	/wr   @ T13: BIDIR;     % RAM write enable (active low) %
	/oe   @ T8      : BIDIR;        % RAM output enable (active low) %
	/cs   @ T6      : BIDIR;        % RAM chip select (active low) %

		a0    @ U5      : BIDIR;        % RAM address line A0  %
		a1    @ U6  : BIDIR;    % RAM address line A1  %
		a2    @ U7      : BIDIR;        % RAM address line A2  %
		a3    @ U8      : BIDIR;        % RAM address line A3  %
		a4    @ U9      : BIDIR;        % RAM address line A4  %
		a5    @ U10     : BIDIR;        % RAM address line A5  %
		a6    @ U11     : BIDIR;        % RAM address line A6  %
		a7    @ U12     : BIDIR;        % RAM address line A7  %
		a8    @ T11     : BIDIR;        % RAM address line A8  %
		a9    @ T10     : BIDIR;        % RAM address line A9  %
		a10   @ T7      : BIDIR;        % RAM address line A10 %
		a11   @ T9      : BIDIR;        % RAM address line A11 %
		a12   @ U13     : BIDIR;        % RAM address line A12 %
		a13   @ T12     : BIDIR;        % RAM address line A13 %
		a14   @ U14     : BIDIR;        % RAM address line A14 %
		a15   @ T15     : BIDIR;        % RAM address line A15 %
		a16   @ U15     : BIDIR;        % RAM address line A16 %
		a17   @ T14     : BIDIR;        % RAM address line A17 %
		a18   @ U16     : BIDIR;        % RAM address line A18 %

		d0    @ U4      : BIDIR;        % RAM data line IO1 %
		d1    @ U3      : BIDIR;        % RAM data line IO2 %
		d2    @ U2      : BIDIR;        % RAM data line IO3 %
		d3    @ R3      : BIDIR;        % RAM data line IO4 %
		d4    @ T2      : BIDIR;        % RAM data line IO5 %
		d5    @ T3      : BIDIR;        % RAM data line IO6 %
		d6    @ T4      : BIDIR;        % RAM data line IO7 %
		d7    @ T5      : BIDIR;        % RAM data line IO8 %

		blue00 @ T16    : BIDIR;
		blue01 @ R15    : BIDIR;
		blue02 @ P14    : BIDIR;
		blue03 @ R13    : BIDIR;
		blue04 @ P13    : BIDIR;
		blue05 @ R12    : BIDIR;
		blue06 @ R11    : BIDIR;
		blue07 @ R10    : BIDIR;
		blue08 @ R9     : BIDIR;
		blue09 @ P9     : BIDIR;
		blue10 @ R8     : BIDIR;
		blue11 @ R7     : BIDIR;
		blue12 @ R6     : BIDIR;
		blue13 @ R5     : BIDIR;
		blue14 @ P5     : BIDIR;
		blue15 @ P4     : BIDIR;
		
		yellow00 @ B16  : BIDIR;
		yellow01 @ B15  : BIDIR;
		yellow02 @ A14  : BIDIR;
		yellow03 @ B14  : BIDIR;
		yellow04 @ D14  : BIDIR;
		yellow05 @ A13  : BIDIR;
		yellow06 @ C13  : BIDIR;
		yellow07 @ D13  : BIDIR;
		yellow08 @ A12  : BIDIR;
		yellow09 @ B12  : BIDIR;
		yellow10 @ C12  : BIDIR;
		yellow11 @ A10  : BIDIR;
		yellow12 @ B10  : BIDIR;
		yellow13 @ C10  : BIDIR;
		yellow14 @ A9   : BIDIR;
		yellow15 @ B9   : BIDIR;
		yellow16 @ C9   : BIDIR;
		yellow17 @ D9   : BIDIR;
		yellow18 @ A8   : BIDIR;
		yellow19 @ B8   : BIDIR;
		yellow20 @ C8   : BIDIR;
		yellow21 @ A6   : BIDIR;
		yellow22 @ B6   : BIDIR;
		yellow23 @ C6   : BIDIR;
		yellow24 @ A5   : BIDIR;
		yellow25 @ C5   : BIDIR;
		yellow26 @ D5   : BIDIR;
		yellow27 @ A4   : BIDIR;
		yellow28 @ B4   : BIDIR;
		yellow29 @ D4   : BIDIR;
		yellow30 @ B3   : BIDIR;
		yellow31 @ B2   : BIDIR;
		
		green00 @ B1    : BIDIR;
		green01 @ C2    : BIDIR;
		green02 @ C3    : BIDIR;
		green03 @ D1    : BIDIR;
		green04 @ D2    : BIDIR;
		green05 @ D3    : BIDIR;
		green06 @ E1    : BIDIR;
		green07 @ F1    : BIDIR;
		green08 @ F2    : BIDIR;
		green09 @ F3    : BIDIR;
		green10 @ G1    : BIDIR;
		green11 @ G2    : BIDIR;
		green12 @ H1    : BIDIR;
		green13 @ H3    : BIDIR;
		green14 @ J1    : BIDIR;
		green15 @ J2    : BIDIR;
		green16 @ J3    : BIDIR;
		green17 @ J4    : BIDIR;
		green18 @ K1    : BIDIR;
		green19 @ K3    : BIDIR;
		green20 @ L1    : BIDIR;
		green21 @ L2    : BIDIR;
		green22 @ M1    : BIDIR;
		green23 @ M2    : BIDIR;
		green24 @ M3    : BIDIR;
		green25 @ M4    : BIDIR;
		green26 @ N2    : BIDIR;
		green27 @ N3    : BIDIR;
		green28 @ P2    : BIDIR;
		green29 @ P3    : BIDIR;
		green30 @ R2    : BIDIR;
		green31 @ T1    : BIDIR;
		
		red00 @ B17             : BIDIR;
		red01 @ C16             : BIDIR;
		red02 @ C15     : BIDIR;
		red03 @ D17             : BIDIR;
		red04 @ D16             : BIDIR;
		red05 @ D15             : BIDIR;
		red06 @ E17             : BIDIR;
		red07 @ F17             : BIDIR;
		red08 @ F16             : BIDIR;
		red09 @ F15             : BIDIR;
		red10 @ G17             : BIDIR;
		red11 @ G16             : BIDIR;
		red12 @ H17             : BIDIR;
		red13 @ H15             : BIDIR;
		red14 @ J17             : BIDIR;
		red15 @ J16             : BIDIR;
		red16 @ J15             : BIDIR;
		red17 @ J14             : BIDIR;
		red18 @ K17             : BIDIR;
		red19 @ K15             : BIDIR;
		red20 @ L17             : BIDIR;
		red21 @ L16             : BIDIR;
		red22 @ M17             : BIDIR;
		red23 @ M16             : BIDIR;
		red24 @ M15             : BIDIR;
		red25 @ M14             : BIDIR;
		red26 @ N16             : BIDIR;
		red27 @ N15             : BIDIR;
		red28 @ P16             : BIDIR;
		red29 @ P15             : BIDIR;
		red30 @ R16             : BIDIR;
		red31 @ T17             : BIDIR;

		global00 @ P1   : BIDIR;
		global01 @ N1   : BIDIR;
		global02 @ H2   : BIDIR;
		global03 @ E2   : BIDIR;
		global04 @ A2   : BIDIR;
		global05 @ A3   : BIDIR;
		global06 @ B5   : BIDIR;
		global07 @ D7   : BIDIR;
		global08 @ C7   : BIDIR;
		global09 @ B7   : BIDIR;
		global10 @ D8   : BIDIR;
		global11 @ A7   : BIDIR;
		global12 @ D10  : BIDIR;
		global13 @ D11  : BIDIR;
		global14 @ C11  : BIDIR;
		global15 @ B11  : BIDIR;
		global16 @ A11  : BIDIR;
		global17 @ D12  : BIDIR;
		global18 @ B13  : BIDIR;
		global19 @ A15  : BIDIR;
		global20 @ A16  : BIDIR;
		global21 @ A17  : BIDIR;
		global22 @ E15  : BIDIR;
		global23 @ E16  : BIDIR;
		global24 @ F14  : BIDIR;
		global25 @ H16  : BIDIR;
		global26 @ K16  : BIDIR;
		global27 @ N17  : BIDIR;
		global28 @ P17  : BIDIR;
		global29 @ U17  : BIDIR;
		global30 @ P11  : BIDIR;
		global31 @ P10  : BIDIR;
		global32 @ P8   : BIDIR;
		global33 @ P7   : BIDIR;
		global34 @ P6   : BIDIR;
		global35 @ F4   : BIDIR;

		fast0 @ C1              : INPUT;
		fast1 @ C17             : INPUT;
		fast2 @ R1              : INPUT;
		fast3 @ R17             : INPUT;

		cs   @ E3               : BIDIR;
		rdy  @ K2               : BIDIR;
	END;
END;

SUBDESIGN mem2
(
	global[35..00]  : BIDIR;        % ram address, data, and control info %
	/cs                             : BIDIR;        % ram chip select %
	/oe                             : BIDIR;        % ram output enable %
	/wr                             : BIDIR;        % ram write enable %
	a[18..0]                : BIDIR;        % ram address %
	d[7..0]                 : BIDIR;        % ram data %
	cs                              : BIDIR;        % enables output onto global bus %

	% the following signals are not used %
	rdy                             : BIDIR;        % ready signal for configuration %
	blue[15..00]    : BIDIR;        % local bus %
	yellow[31..00]  : BIDIR;        % local bus %
	green[31..00]   : BIDIR;        % local bus %
	red[31..00]             : BIDIR;        % local bus %
	fast[3..0]              : INPUT;        % fast input bus %
)
VARIABLE
	read                    : NODE;         % active when memory is being read %
	write                   : NODE;         % active when memory is being written %
BEGIN

	a0  = TRI(LCELL(LCELL(global08)),VCC);
	a1  = TRI(LCELL(LCELL(global09)),VCC);
	a2  = TRI(LCELL(LCELL(global10)),VCC);
	a3  = TRI(LCELL(LCELL(global11)),VCC);
	a4  = TRI(LCELL(LCELL(global12)),VCC);
	a5  = TRI(LCELL(LCELL(global13)),VCC);
	a6  = TRI(LCELL(LCELL(global14)),VCC);
	a7  = TRI(LCELL(LCELL(global15)),VCC);
	a8  = TRI(LCELL(LCELL(global16)),VCC);
	a9  = TRI(LCELL(LCELL(global17)),VCC);
	a10 = TRI(LCELL(LCELL(global18)),VCC);
	a11 = TRI(LCELL(LCELL(global19)),VCC);
	a12 = TRI(LCELL(LCELL(global20)),VCC);
	a13 = TRI(LCELL(LCELL(global21)),VCC);
	a14 = TRI(LCELL(LCELL(global22)),VCC);
	a15 = TRI(LCELL(LCELL(global23)),VCC);
	a16 = TRI(LCELL(LCELL(global24)),VCC);
	a17 = TRI(LCELL(LCELL(global25)),VCC);
	a18 = TRI(LCELL(LCELL(global26)),VCC);

	read = LCELL( global28 & LCELL(cs) );
	global00 = TRI(LCELL(LCELL(d0)),read);
	global01 = TRI(LCELL(LCELL(d1)),read);
	global02 = TRI(LCELL(LCELL(d2)),read);
	global03 = TRI(LCELL(LCELL(d3)),read);
	global04 = TRI(LCELL(LCELL(d4)),read);
	global05 = TRI(LCELL(LCELL(d5)),read);
	global06 = TRI(LCELL(LCELL(d6)),read);
	global07 = TRI(LCELL(LCELL(d7)),read);

	write = LCELL( global27 & LCELL(cs) );
	d0 = TRI(LCELL(LCELL(global00)),write);
	d1 = TRI(LCELL(LCELL(global01)),write);
	d2 = TRI(LCELL(LCELL(global02)),write);
	d3 = TRI(LCELL(LCELL(global03)),write);
	d4 = TRI(LCELL(LCELL(global04)),write);
	d5 = TRI(LCELL(LCELL(global05)),write);
	d6 = TRI(LCELL(LCELL(global06)),write);
	d7 = TRI(LCELL(LCELL(global07)),write);

	/cs = GND;
	/oe = TRI(LCELL(!read),VCC);
	/wr = TRI(LCELL(!write),VCC);


	% disable unused outputs %

	rdy = TRI(GND,GND);
	cs =  TRI(GND,GND);

	global08 = TRI(GND,GND);
	global09 = TRI(GND,GND);
	global10 = TRI(GND,GND);
	global11 = TRI(GND,GND);
	global12 = TRI(GND,GND);
	global13 = TRI(GND,GND);
	global14 = TRI(GND,GND);
	global15 = TRI(GND,GND);
	global16 = TRI(GND,GND);
	global17 = TRI(GND,GND);
	global18 = TRI(GND,GND);
	global19 = TRI(GND,GND);
	global20 = TRI(GND,GND);
	global21 = TRI(GND,GND);
	global22 = TRI(GND,GND);
	global23 = TRI(GND,GND);
	global24 = TRI(GND,GND);
	global25 = TRI(GND,GND);
	global26 = TRI(GND,GND);
	global27 = TRI(GND,GND);
	global28 = TRI(GND,GND);
	global29 = TRI(GND,GND);
	global30 = TRI(GND,GND);
	global31 = TRI(GND,GND);
	global32 = TRI(GND,GND);
	global33 = TRI(GND,GND);
	global34 = TRI(GND,GND);
	global35 = TRI(GND,GND);

	blue00 = TRI(GND,GND);
	blue01 = TRI(GND,GND);
	blue02 = TRI(GND,GND);
	blue03 = TRI(GND,GND);
	blue04 = TRI(GND,GND);
	blue05 = TRI(GND,GND);
	blue06 = TRI(GND,GND);
	blue07 = TRI(GND,GND);
	blue08 = TRI(GND,GND);
	blue09 = TRI(GND,GND);
	blue10 = TRI(GND,GND);
	blue11 = TRI(GND,GND);
	blue12 = TRI(GND,GND);
	blue13 = TRI(GND,GND);
	blue14 = TRI(GND,GND);
	blue15 = TRI(GND,GND);

	yellow00 = TRI(GND,GND);
	yellow01 = TRI(GND,GND);
	yellow02 = TRI(GND,GND);
	yellow03 = TRI(GND,GND);
	yellow04 = TRI(GND,GND);
	yellow05 = TRI(GND,GND);
	yellow06 = TRI(GND,GND);
	yellow07 = TRI(GND,GND);
	yellow08 = TRI(GND,GND);
	yellow09 = TRI(GND,GND);
	yellow10 = TRI(GND,GND);
	yellow11 = TRI(GND,GND);
	yellow12 = TRI(GND,GND);
	yellow13 = TRI(GND,GND);
	yellow14 = TRI(GND,GND);
	yellow15 = TRI(GND,GND);
	yellow16 = TRI(GND,GND);
	yellow17 = TRI(GND,GND);
	yellow18 = TRI(GND,GND);
	yellow19 = TRI(GND,GND);
	yellow20 = TRI(GND,GND);
	yellow21 = TRI(GND,GND);
	yellow22 = TRI(GND,GND);
	yellow23 = TRI(GND,GND);
	yellow24 = TRI(GND,GND);
	yellow25 = TRI(GND,GND);
	yellow26 = TRI(GND,GND);
	yellow27 = TRI(GND,GND);
	yellow28 = TRI(GND,GND);
	yellow29 = TRI(GND,GND);
	yellow30 = TRI(GND,GND);
	yellow31 = TRI(GND,GND);

	green00 = TRI(GND,GND);
	green01 = TRI(GND,GND);
	green02 = TRI(GND,GND);
	green03 = TRI(GND,GND);
	green04 = TRI(GND,GND);
	green05 = TRI(GND,GND);
	green06 = TRI(GND,GND);
	green07 = TRI(GND,GND);
	green08 = TRI(GND,GND);
	green09 = TRI(GND,GND);
	green10 = TRI(GND,GND);
	green11 = TRI(GND,GND);
	green12 = TRI(GND,GND);
	green13 = TRI(GND,GND);
	green14 = TRI(GND,GND);
	green15 = TRI(GND,GND);
	green16 = TRI(GND,GND);
	green17 = TRI(GND,GND);
	green18 = TRI(GND,GND);
	green19 = TRI(GND,GND);
	green20 = TRI(GND,GND);
	green21 = TRI(GND,GND);
	green22 = TRI(GND,GND);
	green23 = TRI(GND,GND);
	green24 = TRI(GND,GND);
	green25 = TRI(GND,GND);
	green26 = TRI(GND,GND);
	green27 = TRI(GND,GND);
	green28 = TRI(GND,GND);
	green29 = TRI(GND,GND);
	green30 = TRI(GND,GND);
	green31 = TRI(GND,GND);

	red00 = TRI(GND,GND);
	red01 = TRI(GND,GND);
	red02 = TRI(GND,GND);
	red03 = TRI(GND,GND);
	red04 = TRI(GND,GND);
	red05 = TRI(GND,GND);
	red06 = TRI(GND,GND);
	red07 = TRI(GND,GND);
	red08 = TRI(GND,GND);
	red09 = TRI(GND,GND);
	red10 = TRI(GND,GND);
	red11 = TRI(GND,GND);
	red12 = TRI(GND,GND);
	red13 = TRI(GND,GND);
	red14 = TRI(GND,GND);
	red15 = TRI(GND,GND);
	red16 = TRI(GND,GND);
	red17 = TRI(GND,GND);
	red18 = TRI(GND,GND);
	red19 = TRI(GND,GND);
	red20 = TRI(GND,GND);
	red21 = TRI(GND,GND);
	red22 = TRI(GND,GND);
	red23 = TRI(GND,GND);
	red24 = TRI(GND,GND);
	red25 = TRI(GND,GND);
	red26 = TRI(GND,GND);
	red27 = TRI(GND,GND);
	red28 = TRI(GND,GND);
	red29 = TRI(GND,GND);
	red30 = TRI(GND,GND);
	red31 = TRI(GND,GND);
END;