N:=7;MM:=3;
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD 0 HD LD,HD,0),N);
DMM:=EXPMEMA(IF(LD 0 LD HD,LD,0),N);
pdi: DMP*100/MTR;
mdi: DMM*100/MTR;
ADX: EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,MM);
ADXR:EXPMEMA(ADX,MM);
XG:REF(PDI,1) 3.1 AND REF(ADX,1) 90 AND crOSS(ADXR,ADX)
AND C/REF(C,1) 1.039 AND COUNT(C/REF(C,1) 0.956,6) 0,COLORRED,NODRAW;
DRAWICON(XG,20,25);
HH:=IF(CODELIKE('600'), 999999$H , 399001$H
OO:=IF(CODELIKE('600'), 999999$O , 399001$O
LL:=IF(CODELIKE('600'), 999999$L , 399001$L
CC:=IF(CODELIKE('600'), 999999$C , 399001$C
沪深大盘:IF(CODELIKE('600'), 999999$C , 399001$C ),COLORRED,NODRAW;
{DRAWKLINE(HH,OO,LL,CC);
M6V:MA(CC,6),COLORWHITE;
M21:MA(CC,21),COLORGREEN;
M62:MA(CC,62),COLOR0099FF;
M125:MA(CC,125),COLOR0099FF;}
D1:=YEAR AND MONTH AND DAY;
AA1:=STRCAT(CON2STR(YEAR,0),'年');
AA2:=STRCAT(CON2STR(MONTH,0),'月');
AA3:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEkdAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',
IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));
AA:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】');
DRAWTEXT_FIX(D1,0,1,0,AA);
ZJS:=IF(CODELIKE('60') OR CODELIKE('999'), 999999$ADVANCE , 399001$ADVANCE
DJS:=IF(CODELIKE('60') OR CODELIKE('999'), 999999$INDEXDEC , 399001$INDEXDEC
AA11:=STRCAT(STRCAT(STRCAT('〖','跌家数'),'〗'),CON2STR(DJS,0));
AA22:=STRCAT(STRCAT(STRCAT(STRCAT('〖','涨家数'),'〗'),CON2STR(ZJS,0)),AA11);
DRAWTEXT_FIX(D1,0.25,1,0,AA22),COLORGREEN;

{
选股公式:
N:=7;MM:=3;
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD 0 HD LD,HD,0),N);
DMM:=EXPMEMA(IF(LD 0 LD HD,LD,0),N);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,MM);
ADXR:=EXPMEMA(ADX,MM);
XG:REF(PDI,1) 3.1 AND REF(ADX,1) 90 AND CROSS(ADXR,ADX)
AND C/REF(C,1) 1.039 AND COUNT(C/REF(C,1) 0.956,6) 0,COLORRED;
}