1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12

CHIP Memory {
    IN in[16], load, address[15];
    OUT out[16];

    PARTS:
	DMux4Way(in=load, sel=address[13..14], a=ramLoad0, b=ramLoad1, c=screenLoad, d=kbdLoad);
	Or(a=ramLoad0, b=ramLoad1, out=ramLoad2);
	RAM16K(in=in, load=ramLoad2, address=address[0..13], out=ramOut);
	Screen(in=in, load=screenLoad, address=address[0..12], out=screenOut);
	Keyboard(out=kbdOut);
	Mux4Way16(a=ramOut, b=ramOut, c=screenOut, d=kbdOut, sel=address[13..14], out=out);
}