SC0:=WEEkdAY>=1 AND WEEKDAY<=5 AND (DAY=3 OR DAY=5 OR DAY=8 OR DAY=13 OR DAY=21);
SC1:=WEEKDAY=5 AND (DAY=2 OR DAY=4 OR DAY=7 OR DAY=12 OR DAY=20);
SC2:=WEEKDAY=1 AND (DAY=4 OR DAY=6 OR DAY=9 OR DAY=14 OR DAY=22);
SC3:=MONTH<>REF(MONTH,1);
NOTEXT_SC:DRAWSL((SC0 OR SC1 OR SC2 OR SC3)AND PERIOD=5,C,10000,1000,2),COLOR800040;