r1:=ZDMR[-1];
r2:=BDMR[-1];
r3:=-ZDMC[-1];
r4:=-BDMC[-1];
a:=(r1+r2);
b:=(r3+r4);
STICKLINE(C,a,0,4,0),colorred;
STICKLINE(C,a,0,3,0),colorred;
STICKLINE(C,a,0,2,0),colorred;
STICKLINE(C,a,0,1,0),colorred;
STICKLINE(C,a,r1,4,0),colorgray;
STICKLINE(C,a,r1,3,0),colorgray;;
STICKLINE(C,a,r1,2,0),colorgray;
STICKLINE(C,a,r1,1,0),colorgray;
STICKLINE(C,b,0,4,0),colorgreen;
STICKLINE(C,b,0,3,0),colorgreen;
STICKLINE(C,b,0,2,0),colorgreen;
STICKLINE(C,b,0,1,0),colorgreen;
STICKLINE(C,b,r3,4,0),colorlicyan;
STICKLINE(C,b,r3,3,0),colorlicyan;
STICKLINE(C,b,r3,2,0),colorlicyan;
STICKLINE(C,b,r3,1,0),colorlicyan;