MODULE simmstick_ether

title 'SimmStick Ethernet module'

"Inputs
        C, D, CE        pin 1, 6, 9;

"Outputs
        A1, A2, A3, _IOR   pin 18, 17, 16, 12 istype 'reg';
        !IOR, !IOW, AEN, A0     pin 13, 14, 15, 19;

Equations


A0 = D;

A1 := D;
A2 := A1;
A3 := A2;
_IOR := !A3;

IOR = CE * _IOR;
IOW = CE * !_IOR;

A1.CLK = C;
A2.CLK = C;
A3.CLK = C;
_IOR.CLK = C;

AEN = 0;


Test_Vectors ([  C, D, CE] -> [A0, A1, A2, A3,!IOR,!IOW])

              [.c. ,0,  0] -> [ 0,  0,.x.,.x.,   1,   1];
              [.c. ,0,  0] -> [ 0,  0,  0,.x.,   1,   1];
              [.c. ,0,  0] -> [ 0,  0,  0,  0,   1,   1];
              [.c. ,0,  0] -> [ 0,  0,  0,  0,   1,   1];

              [ 0  ,1,  1] -> [ 1,  0,  0,  0,   0,   1];

              [.c. ,1,  0] -> [ 1,  1,  0,  0,   1,   1];
              [.c. ,0,  0] -> [ 0,  0,  1,  0,   1,   1];
              [.c. ,0,  0] -> [ 0,  0,  0,  1,   1,   1];
              [.c. ,0,  0] -> [ 0,  0,  0,  0,   1,   1];

              [ 0  ,1,  1] -> [ 1,  0,  0,  0,   1,   0];
END