
DRAWGBK(C>0,RGB(0,0,110),RGB(0,25,0),0,' ',0);
{分类}
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0.01,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
{量化评分}
X1:=IF(MA(C,5)>MA(C,10),20,0);
X2:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
XX:=X1+X2+X3+X4+X5+X6+X8;
DRAWTEXT_FIX(V>O,0,0.1,0,STRCAT('量化评分:',
STRCAT(CON2STR(XX,0),' '))),COLORYELLOW;
市场热度:AMOUNT/REF(HHV(AMOUNT,99),1)*10.31,NODRAW,COLORYELLOW;
DRAWKLINE(H,O,L,C);
{双阴转阳}
ELY:=COUNT(C<O,3)>=2;
ESL:=COUNT(VOL<REF(VOL,1),3)>=2;
双连阴:=ELY AND ESL AND O<C AND VOL>REF(VOL,1)*1.2;
SLY:=COUNT(C<O,4)>=3;
SSL:=COUNT(VOL<REF(VOL,1),4)>=3;
三连阴:=SLY AND SSL AND O<C AND VOL>REF(VOL,1)*1.2;
双阴转阳:STICKLINE(CROSS(双连阴,0.5),C,O,-1,0),COLORYELLOW;
DRAWTEXT(双阴转阳,L*0.99,' 阴转阳'),COLORYELLOW;
{2560}
M5:=MA(CLOSE,5),COLORWHITE;
MA25:=MA(CLOSE,25),COLORYELLOW;
VM5:=MA(VOL,5);
VM60:=MA(VOL,60);
JCX:=CROSS(M5,MA25);
XG7:=MA25>REF(MA25,1) AND VM5>VM60 AND JCX;
STICKLINE(XG7,C,O,0.1,0),COLOR0088FF;
STICKLINE(XG7,L+(H-L)/2,L+(H-L)/1.8,2.5,0),COLOR0088FF;
DRAWTEXT(XG7,L*0.99,'启动'),COLOR0088FF;
FD:=(C-REF(C,1))/REF(C,1)*100;
DF:=FD<-5;
TTP01:=BARSLAST(DF);
KPI01:=BACKSET(ISLASTBAR,TTP01+1) AND REF(BACKSET(ISLASTBAR,TTP01+1),1)=0;
情绪线:REF(O,BARSLAST(KPI01)),LINETHICK1,COLORMAGENTA;
DRAWTEXT(BARSLAST(KPI01),情绪线*1.005,STRCAT(('情绪:'),CON2STR(情绪线,2))),COLORMAGENTA;
{断量}
MV5:=MA(V,5);
破5:=CROSS(MV5,V);
TTP001:=BARSLAST(破5);
KPI001:=BACKSET(ISLASTBAR,TTP001+1) AND REF(BACKSET(ISLASTBAR,TTP001+1),1)=0;
断量:REF(C,BARSLAST(KPI001)),LINETHICK1,COLORWHITE;
DRAWTEXT(BARSLAST(KPI001),断量*1.005,STRCAT(('断量:'),CON2STR(断量,2))),COLORWHITE;
{锅盖}
CLT:=LLVBARS(L,60);
CLTT:=BARSLAST(CURRBARSCOUNT=CONST(CLT)+1);
CHT:=FINDHIGHBARS(H,CLT+1,60,1);
锅盖:DRAWLINE(CURRBARSCOUNT=CONST(CHT)+1,H,ISLASTBAR,REF(H,CHT),0),COLORGREEN,LINETHICK2;
TT1:=BARSLAST(CURRBARSCOUNT=CONST(CHT)+1);
DRAWTEXT(TT1=0,REF(H,TT1)*1.01,VARCAT(VARCAT('锅盖:',VAR2STR(REF(H,TT1),2)),'')),COLORGREEN;
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。胜亿配资提示:文章来自网络,不代表本站观点。