N@Textaporter Storage 5-9
I@Resync Resync1 X5e Y5f Z5g X6h Y6a Z6b X7c Y7d Z7e X8f Y8g Z8h X9a Y9b Z9c
O@Xe5 Yf5 Zg5 Xh6 Ya6 Zb6 Xc7 Yd7 Ze7 Xf8 Yg8 Zh8 Xa9 Yb9 Zc9 Sync Sync2 Send
Command=recv(Resync,2),Clear=recv(Resync,3)
D=recv(Resync1,4),E=recv(Resync1,5),F=recv(Resync1,6)
G=recv(Resync1,7),H=recv(Resync1,8),I=recv(Resync1,9)
X=recv(Resync1,10),Y=recv(Resync1,11),Z=recv(Resync1,12)
E1=(Command==1 & E==1),F1=(Command==1 & F==1)
G1=(Command==1 & G==1),H1=(Command==1 & H==1)
I1=(Command==1 & I==1)
E1==1 -> Xe5=X,Yf5=Y,Zg5=Z;
F1==1 -> Xh6=X,Ya6=Y,Zb6=Z;
G1==1 -> Xc7=X,Yd7=Y,Ze7=Z;
H1==1 -> Xf8=X,Yg8=Y,Zh8=Z;
I1==1 -> Xa9=X,Yb9=Y,Zc9=Z;
Clear & E -> Xe5=0,Yf5=0,Zg5=0;
Clear & F -> Xh6=0,Ya6=0,Zb6=0;
Clear & G -> Xc7=0,Yd7=0,Ze7=0;
Clear & H -> Xf8=0,Yg8=0,Zh8=0;
Clear & I -> Xa9=0,Yb9=0,Zc9=0;
Sync=send(X5e,Y5f,Z5g,X6h,Y6a,Z6b,X7c,Y7d,Z7e,X8f,Y8g,Z8h,X9a,Y9b,Z9c)
Send=0
D==1| E==1 | F==1 | G==1 | H==1 | I==1 -> Send=1;