图片

图片

策画源码

图片

图片

图片

图片

HH:=HHV(C,20);

LL:=LLV(C,20);

HH1:=BARSLAST((HH > REF(HH,1)));

LL1:=BARSLAST((LL < REF(LL,1)));

STICKLINE((HH1 < LL1),CLOSE,OPEN,COLORRED,0);

DRAWLINE((HH1 < LL1),HIGH,(HH1 < LL1),LOW,COLORRED);

STICKLINE((HH1 > LL1),CLOSE,OPEN,COLORGREEN,0);

DRAWLINE((HH1 > LL1),HIGH,(HH1 > LL1),LOW,COLORGREEN);

DRAWTEXT(CROSS(HH1,LL1),HH,'开空');

DRAWTEXT(CROSS(LL1,HH1),LL,'开多');

T:=IFELSE(HH1>LL1,1,-1);

G:=IFELSE(HH1>LL1,HH,LL);

DRAWLINE(T=1&&REF(T,1)=1,G,T=1&&REF(T,1)=1,REF(G,1),COLORCYAN);

DRAWLINE(T=-1&&REF(T,1)=-1,G,T=-1&&REF(T,1)=-1,REF(G,1),COLORRED);

DRAWSL(T=1,G,0,1,0,COLORCYAN);

DRAWSL(T=-1,G,0,1,0,COLORRED);

VARAA:=LLV(LOW,35);

VARBB:=HHV(HIGH,30);

VARCC:=EMA((CLOSE-VARAA)/(VARBB-VARAA)*4,4)*25;

QS:= VARCC,COLORWHITE;

VARD:=87.5;

VARE:=(VARCC-LLV(VARCC,4))/(HHV(VARCC,4)-LLV(VARCC,4))*4*25;

DRAWTEXT(IFELSE(CROSS(QS,VARE) && QS>87,87,0),H,'多减');

DRAWTEXT(IFELSE(CROSS(VARE,QS) && QS<13,13,0),C,'空减');

图片

图片

图片

图片

图片

演示图

图片

图片

图片

end