{无名副图}
DRAWGBKLAST(CLOSE>0,STRIP(RGB(10,100,100),RGB(0,0,0),0));
VAR2:=CLOSE-REF(CLOSE,1);
VAR3:=IF(CLOSE-REF(CLOSE,1)>=0,VAR2,0);
VAR4:=REF(CLOSE,1)-CLOSE;
VAR5:=IF(CLOSE-REF(CLOSE,1)<=0,VAR4,0);
VAR6:=SUM(VAR3,55)/SUM(VAR5,55);
VAR7:=100-100/(1+VAR6);
VAR8:=EMA(VAR7,55);
VAR9:=EMA(VAR8,5);
VARA:=EMA(VAR8,3);
牛熊边界: (VAR8-VARA)*10,LINETHICK0;
牛踪熊影: (VAR9-VARA)*10,LINETHICK2;
{枫林草地: 牛熊边界, COLORSTICK;}
FILLRGN(牛熊边界,0,牛熊边界>0),COLOR5252C7;
FILLRGN(牛熊边界,0,牛熊边界<0),COLORCYAN;
HH:=HHV(H,13);
LL:=LLV(L,13);
中:=(HH+LL)/2;
K:SMA((C-中)/中*100,6,1),COLORWHITE,LAYER0;
D:SMA(K,4,1),COLORFFAA00,LAYER0;
超买:SMA(SMA((HH-中)/中*100,6,1),4*2,1)*0.8,COLORRED,LINETHICK2,LAYER0;
超卖:SMA(SMA((LL-中)/中*100,6,1),4*2,1)*0.8,COLORGREEN,LINETHICK2,LAYER0;
牛熊界:0,COLORRED, LINETHICK1;
{===============================================}
VV:=(HIGH+OPEN+LOW+CLOSE)/4;
DIFF:=EMA(VV,10)-EMA(VV,30);{9,18,7}
DEA:=EMA(DIFF,10);
J:=3*DIFF-2*DEA;
MACD:=2*(DIFF-DEA);
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,0,0.08,6,0),COLORYELLOW;
DRAWTEXT(低位金叉,超卖*1.09,' 低位金叉'),COLORWHITE;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;
{DRAWICON(二次金叉,DEA*0.9,1) ;}
DRAWTEXT(二次金叉,超卖*1.09,' 二次金叉'),COLORYELLOW;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;
DRAWTEXT(底背离,超卖*0.75,' 底背离'),COLORFF00FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,超卖*0.9,'三全项'),COLOR0000FF,LINETHICK2;