{请设置计算参数:

年: PARAM#0 (1990.00--3000.00)

月: PARAM#1 (1.00--12.00)

日: PARAM#2 (1.00--31.00)

点: PARAM#3 (1.00--2.00)

点=1时取L  点=2时取H

近期: PARAM#4 (1.00--99.00)}

TC:=IF(H=HHV(H,10*近期),H,DRAWNULL);

BC:=IF(L=LLV(L,10*近期),L,DRAWNULL);

DRAWTEXT(CURRBARSCOUNT=CONST(BARSLAST(TC=H))+1,H,'近期高点'),COLOR0000FF;

DRAWNUMBER(CURRBARSCOUNT=CONST(BARSLAST(TC=H))+1,H*1.02,DATE-1000000);

DRAWTEXT(CURRBARSCOUNT=CONST(BARSLAST(BC=L))+1,L,'近期低点'),COLOR0000FF;

DRAWNUMBER(CURRBARSCOUNT=CONST(BARSLAST(BC=L))+1,L*0.98,DATE-1000000);

R周期:=(年-1900)*10000+月*100+日;

周期C:=IF(DATE>R周期,C,REF(IF(点=1,L,H),BARSLAST(DATE=R周期)));

交易日周期:=CONST(BARSLAST(DATE=R周期))+1;

交易日均线:EMA(周期C,交易日周期),COLORFF0000,LINETHICK2;

自然起期:=(年-1992)*365+INTPART((年-1989)/4)

+IF(月<=2,日+(月-1)*31,日+INTPART(13*(月+1)/5)-7+(月-1)*28

+IF(INTPART(年/4)=年/4,1,0));

自然终期:=(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));

自然日周期:=CONST(自然终期-自然起期),NODRAW;

自然日均线:EMA(周期C,自然日周期),COLORFF00FF,LINETHICK2;

异均线5:EMA(周期C,5*(自然日周期/交易日周期)),COLOR8E0000,LINETHICK2;

异均线10:EMA(周期C,10*(自然日周期/交易日周期)),COLOR00FFFF,LINETHICK2;

异均线20:EMA(周期C,20*(自然日周期/交易日周期)),COLOR0055FF,LINETHICK2;