通达信特定日期主图指标公式

DRAwrECTREL(350,0,542,115,RGB(72,61,139));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
M:=1;
年:=YEAR,NODRAW;月:=MONTH,NODRAW;日:=DAY,NODRAW;
星期:=WEEkdAY,NODRAW;
DA:=DATE,NODRAW;
S:=DATETODAY(DA),NODRAW;
前M日:REF(日,M),NODRAW;
K:=PERIOD=3 OR PERIOD=4 OR PERIOD=5 OR PERIOD=6;
D:=CURRBARSCOUNT;
DRAWNUMBER_FIX(D=M AND K=1,0.39,0.01,1,YEAR)COLORYELLOW;
DRAWTEXT_FIX(D=M AND K=1,0.395,0.01,0,'年')COLORGREEN;
DRAWNUMBER_FIX(D=M AND K=1,0.42,0.01,1,MONTH)COLORYELLOW;
DRAWTEXT_FIX(D=M AND K=1,0.43,0.01,0,'月')COLORGREEN;
DRAWNUMBER_FIX(D=M AND K=1,0.46,0.01,1,DAY)COLORYELLOW;
DRAWTEXT_FIX(D=M AND K=1,0.47,0.01,0,'日')COLORGREEN;
DRAWTEXT_FIX(D=M AND K=1,0.49,0.01,0,'星期')COLORGREEN;
DRAWNUMBER_FIX(D=M AND K=1,0.52,0.01,1,WEEKDAY)COLORYELLOW;
{DRAWTEXT(D=M AND K=1,H*1.1,'↓ 收盘价(元)')COLORMAGENTA};
{DRAWNUMBER(D=M AND K=1,H*1.09,C)COLORMAGENTA};
DRAWTEXT_FIX(D=M AND K=1,0.38,0.08,0,'收盘价：')COLORGREEN;
DRAWNUMBER_FIX(D=M AND K=1,0.46,0.08,1,C)COLORYELLOW;
DRAWTEXT_FIX(D=M AND K=1,0.47,0.08,0,'元')COLORGREEN;
DRAWTEXT(DATE=1140102,H*1.01,'一月二日'),COLORGREEN;
DRAWTEXT(DATE=1140207,H*1.01,'二月七日'),COLORGREEN;
DRAWTEXT(DATE=1140303,H*1.01,'三月三日'),COLORGREEN;
DRAWTEXT(DATE=1140401,H*1.01,'四月一日'),COLORGREEN;
DRAWTEXT(DATE=1140505,H*1.01,'五月五日'),COLORGREEN;
DRAWTEXT(DATE=1140603,H*1.01,'六月三日'),COLORGREEN;
DRAWTEXT(DATE=1140701,H*1.01,'七月一日'),COLORGREEN;
DRAWTEXT(DATE=1140801,H*1.01,'八月一日'),COLORGREEN;
DRAWTEXT(DATE=1140901,H*1.01,'九月一日'),COLORGREEN;
DRAWTEXT(DATE=1141008,H*1.01,'十月八日'),COLORGREEN;
DRAWTEXT(DATE=1141103,H*1.01,'十一月三日'),COLORGREEN;
DRAWTEXT(DATE=1141201,H*1.01,'十二月一日'),COLORGREEN;
DRAWTEXT(DATE=1130902,H*1.01,'九月二日'),COLORGREEN;
DRAWTEXT(DATE=1131008,H*1.01,'十月八日'),COLORGREEN;
DRAWTEXT(DATE=1131101,H*1.01,'十一月一日'),COLORGREEN;
DRAWTEXT(DATE=1131202,H*1.01,'十二月二日'),COLORGREEN;