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"),NODRAW;
DRAWKLINE(HH,OO,LL,CC);
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);
上证指数:=STRCAT(STRCAT('〖','上证指数'),'〗');
DRAWTEXT_FIX(CODELIKE('60') OR CODELIKE('999999'),0.4,1,0,上证指数),COLORGREEN;
深证成指:=STRCAT(STRCAT('〖','深证成指'),'〗');
DRAWTEXT_FIX(CODELIKE('000') OR CODELIKE('399001'),0.4,1,0,深证成指),COLORGREEN;
创业板指:=STRCAT(STRCAT('〖','创业板指'),'〗');
DRAWTEXT_FIX(CODELIKE('300') OR CODELIKE('399006'),0.4,1,0,创业板指),COLORGREEN;
中小板指:=STRCAT(STRCAT('〖','中小板指'),'〗');
DRAWTEXT_FIX(CODELIKE('002') OR CODELIKE('399005'),0.4,1,0,中小板指),COLORGREEN;
ZJS:=IF(CODELIKE('60') OR CODELIKE('999'),"999999$ADVANCE",IF(CODELIKE('300') OR
CODELIKE('399006'),"399006$ADVANCE",IF(CODELIKE('002') OR CODELIKE('399005'),
"399005$ADVANCE","399001$ADVANCE")));
DJS:=IF(CODELIKE('60') OR CODELIKE('999'),"999999$INDEXDEC",IF(CODELIKE('300') OR
CODELIKE('399006'),"399006$INDEXDEC",IF(CODELIKE('002') OR CODELIKE('399005'),
"399005$INDEXDEC","399001$INDEXDEC")));
AA11:=STRCAT(STRCAT(STRCAT('【','跌家数'),'】'),CON2STR(DJS,0));
AA22:=STRCAT(STRCAT(STRCAT(STRCAT('【','涨家数'),'】'),CON2STR(ZJS,0)),AA11);
DRAWTEXT_FIX(D1,0.7,1,0,AA22),COLORYELLOW;
BDGD:=CC=HHV(CC,40);
GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),20))+1;
GD:REF(HH,GDSJ),COLOR00FF00,POINTDOT,LINETHICK1;
TTP:=CROSS(CC,REF(GD,1)),COLOR00FFFF,POINTDOT,LINETHICK0;
STICKLINE(GDSJ<=6,GD,GD,8,0),COLORFF00FF;
BDDD:=CC=LLV(CC,N);
DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),N1))+1;
DDD1:REF(LL,DDSJ),COLOR00FFFF,POINTDOT,LINETHICK1;
STICKLINE(DDSJ<=6,DDD1,DDD1,8,0),COLOR00FF00;
ZS:=REF(CC,1);
QS:=SMA(MAX(CC-ZS,0),8,1)/SMA(ABS(CC-ZS),8,1)*100;
XG2:=CROSS(QS,15);
DRAWICON(XG2,LL*0.997,26);
XG3:=DDSJ=1;
DRAWICON(XG3,LL,1);
|
