ZRR:=(YEAR-1992)*365+INTPART((YEAR-1989)/4)+IF(MONTH<=2,DAY+(MONTH-1)*31,DAY+

INTPART(13*(MONTH+1)/5)-7+(MONTH-1)*28+IF(INTPART(YEAR/4)=YEAR/4,1,0));

T:=BARSLAST(ZRR-REF(ZRR,1)>WEEKDAY-REF(WEEKDAY,1))+1;

T1:=REF(T,T)+T;

T2:=REF(T,T1)+T1;

T3:=REF(T,T2)+T2;

T4:=REF(T,T3)+T3;

T5:=REF(T,T4)+T4;

T6:=REF(T,T5)+T5;

T7:=REF(T,T6)+T6;

T8:=REF(T,T7)+T7;

T9:=REF(T,T8)+T8;

T10:=REF(T,T9)+T9;

五周:(REF(CLOSE,T)+REF(CLOSE,T1)+REF(CLOSE,T2)+REF(CLOSE,T3)+CLOSE)/5,LINETHICK1,COLOR00AA00;

十周:(REF(CLOSE,T)+REF(CLOSE,T1)+REF(CLOSE,T2)+REF(CLOSE,T3)+REF(CLOSE,T4)+REF(CLOSE,T5)+REF(CLOSE,T6)+REF(CLOSE,T7)+REF(CLOSE,T8)+CLOSE)/10,COLORYELLOW;