热度指数同花顺副图指标

//is_main:=IF(CODELIKE('300') OR CODELIKE('301') OR CODELIKE('688'),FALSE,TRUE);

is_main:=IF(STRLEFT(CODE,2)=='30' OR STRLEFT(CODE,2)=='68',FALSE,TRUE);

OJB:=OPENVOL/REF(V,1)*100;

DOJB:=IF(REF(MONEY,1)/100000000>10,OJB*2,OJB);

MINV0:=IF(REF(MONEY,1)/100000000>10,REF(V,1)*3.2/100000000,REF(V,1)*6.4/100000000);

MAXV0:=IF(REF(MONEY,1)/100000000>10,REF(V,1)*7/100000000,REF(V,1)*14/100000000);

oRS:=(O-REF(C,1))/REF(C,1)*100;

rate:=IF(is_main,1.1,1.2);

derate:=IF(is_main,0.9,0.8);

MXP := REF(C, 1) * rate * 100;

MXP := IF(MXP - FLOOR(MXP) < 0.5, FLOOR(MXP), CEIL(MXP));

MXP := MXP / 100;

MNP := REF(C, 1) * derate * 100;

MNP := IF(MNP - FLOOR(MNP) < 0.5, FLOOR(MNP), CEIL(MNP));

MNP := MNP / 100;

zt01:=IF(INTPART(C*100)/100==ROUND(REF(C,1)*rate*100)/100 OR INTPART(C*100)/100==INTPART(REF(C,1)*rate*100)/100,TRUE,FALSE);

zt02:=IF(C>=MXP AND H>=MXP,TRUE,FALSE);

dt02:=IF(C<=MNP AND L<=MNP,TRUE,FALSE);

is_zt:=IF(zt01 OR zt02,TRUE,FALSE);

is_yz:=IF(O==H AND L==H AND H>=MXP,TRUE,FALSE);

is_tz:=IF(O==H AND L!=H AND H>=MXP AND C==H,TRUE,FALSE);

is_ozt:=IF(O>=MXP,TRUE,FALSE);

MINV:=IF(REF(is_yz,1), REF(V,1)/1000000, MINV0);

MINV:=IF(REF(is_yz,1) AND REF(is_yz,2), (REF(V,1)+REF(V,2))/1000000,MINV);

MINV:=IF(REF(is_yz,1) AND REF(is_yz,2) AND REF(is_yz,3), (REF(V,1)+REF(V,2)+REF(V,3))/1000000,MINV);

MINV:=IF(REF(is_yz,1) AND REF(is_yz,2) AND REF(is_yz,3) AND REF(is_yz,4), (REF(V,1)+REF(V,2)+REF(V,3)+REF(V,4))/1000000,MINV);

MINV:=IF(REF(is_yz,1) AND REF(is_yz,2) AND REF(is_yz,3) AND REF(is_yz,4) AND REF(is_yz,5), (REF(V,1)+REF(V,2)+REF(V,3)+REF(V,4)+REF(is_yz,5))/1000000,MINV);

MAXV:=IF(MINV>MINV0,MINV,MAXV0);

V2b01:=IF(is_zt AND REF(is_zt,1)!=TRUE AND REF(is_zt,2),TRUE,FALSE);

V2b02:=IF(is_zt AND REF(is_zt,1)!=TRUE AND REF(H,1)>=REF(MXP,1),TRUE,FALSE);

V2bexp:=IF(V2b01 OR V2b02,TRUE,FALSE);

V2bsg:=IF(REF(V2b01 OR V2b02,1),TRUE,FALSE);

IF(REF(is_yz,1)){healthy:=IF(OPENVOL/1000000>=MINV,9,0);}

ELSE{healthy:=IF(REF(is_zt,1),9,0);

healthy:=IF(REF(is_zt,1) AND OPENVOL/1000000<MINV,1,healthy);

healthy:=IF(REF(is_zt,1) AND OPENVOL/1000000>MAXV,0,healthy);}

healthy:=IF(oRS<=0,0,healthy);

healthy:=IF(V2bsg,0,healthy);

BUYsg:=IF(healthy==9,TRUE,FALSE);

诊断意见:healthy,coloryellow,POINTDOT;

情绪指数:DOJB,colorred,LINETHICK1;

STICKLINE(DOJB<6.4,0,VOL,8,1),colorblue;

STICKLINE(DOJB>=6.4 AND DOJB<14,0,VOL,8,1),coloryellow;

STICKLINE(DOJB>=14,0,VOL,8,1),colorred;

DRAWTEXT(V2bexp,VOL,'F'),colorcyan;

DRAWTEXT(V2bsg,VOL,'2'),colorcyan;

DRAWGBK(BUYsg,STRIP(RGB(255,0,0),RGB(255,255,255),1));