|
EMA5:EMA(C,5);
EMA13:EMA(C,13),COLORRED,LINETHICK2;
EMA34:EMA(C,34),COLORYELLOW,LINETHICK2;
EMA55:EMA(C,55),COLORFF00FF,LINETHICK2;
Y:=(EMA(C,13)-EMA(C,55))/EMA(C,13)*100;
YY:=C>EMA(C,13) AND OPEN<EMA(C,13) AND C>EMA(C,34) AND OPEN<EMA(C,34) AND C>EMA(C,55) AND OPEN<EMA(C,55);{一陽三線}
DRAWTEXT(YY,LOW-0.1,'一陽三線'),COLORRED;
SJ1:=ABS(EMA(CLOSE,13)-EMA(CLOSE,34))<C*0.01;{１3線３4線５５線接近}
SJ2:=ABS(EMA(CLOSE,34)-EMA(CLOSE,55))<C*0.01;
SJ3:=CROSS(EMA(CLOSE,13),EMA(CLOSE,55));{13線上穿５５線}
X3:DRAWTEXT(SJ1 AND SJ2 AND SJ3,HIGH+0.1,'三線開花'),COLORRED;
RY1:=C/OPEN>1.03 AND (REF(C,11)-C)/REF(C,11)>0.1 AND REF(OPEN,1)/REF(CLOSE,1)>1.03;{陰\陽線４％}
RY2:=REF(CLOSE,1)<REF(OPEN,1) AND (O-REF(CLOSE,1))/REF(CLOSE,1)>0.04 AND C/REF(CLOSE,1)>=0.9 AND REF(V,1)<REF(V,2);{絕處逢生}
RY3:=ABS(OPEN-REF(C,1))<C*0.02 AND ABS(C-REF(OPEN,1))<C*0.02;{兩線相等,日月合壁}
RY4:=OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1);{曙光初現(xiàn)}
JYZH:=ABS(REF(O,2)-REF(C,2))/REF(O,2)<0.02 AND REF(O,1)/ REF(C,1)>1.03 AND ABS(O-C)/O<0.02 AND C>EMA13 AND V<REF(V,1)* 2/3;{上漲初期的金印組合}
CD:=OPEN/CLOSE>1.03 and (EMA55-EMA(C,7))/EMA(C,7)*100>=45 and REF(OPEN,9)/CLOSE>1.25; {超跌的抄底}
RY5:=EMA13<EMA55 AND C<EMA55;
RY6:=RY2 OR RY3 OR RY4 OR JYZH or CD;
X4:DRAWTEXT(RY1 AND RY5 AND RY6,LOW,'曙光初現(xiàn)'),COLORYELLOW; TS1:=CROSS(EMA(C,13),EMA(C,34));{13線上穿34線}
TS2:=EMA(C,13)<EMA(C,55);
TS:=TS1 AND TS2;
DRAWTEXT(TS,LOW-0.2,'投石問路'),COLORF00FF0;
AR1:=EMA55>EMA34 AND EMA34>EMA13 AND O<EMA13 AND C>EMA13;
AR2:=BARSLAST((C-EMA13)/EMA13*100<-6);
AR3:=EMA13>=REF(EMA13,2);
AR4:=COUNT(CROSS(C,EMA13),AR2)=1;
AR5:=AR1 AND AR2 AND AR3 AND AR4;
AR6:=AR5 AND FILTER(AR5,10);
DRAWTEXT(AR6,L-0.09,'紅杏出墻'),COLORYELLOW;
{STICKLINE(AR6,H,L,0.5,1),COLORYELLOW;
STICKLINE(AR6,O,C,6,1),LINETHICK2,COLORYELLOW;}
BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;
BR2:=ABS((EMA13-EMA34)+(EMA34-EMA55))/C<0.2;
BR3:=C>EMA55 AND (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2) OR REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) OR REF(C,5)<REF(EMA55,5));
BR4:=BR1 AND BR2 AND BR3;
DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.09,'螞蟻上樹'),COLOR00C5FF;
{STICKLINE(BR4 AND FILTER(BR4,10),H,L,0.5,1),COLOR00C5FF;
STICKLINE(BR4 AND FILTER(BR4,10),O,C,6,1),LINETHICK2,COLOR00C5FF;}
CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;
CR2:=V>EMA(V,5)*0.6;
CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;
CR4:=ABS(EMA34-EMA55)/EMA55<0.03;
CR5:=EMA55<=EMA(C,120) AND EMA55>=REF(EMA55,1);
CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);
{STICKLINE(CR6,H,L,0.5,1),COLORF00FF0;
STICKLINE(CR6,O,C,6,1),LINETHICK2,COLORF00FF0;}
DRAWTEXT(CR6,L-0.09,'紅衣俠女'),COLORF00FF0;
DR1:=EMA13>EMA34 AND EMA34<EMA55;
DR2:=BARSLAST(CROSS(C,EMA55) );
DR3:=H=HHV(H,DR2);
DR4:=BARSLAST(DR3);
DR5:=COUNT(O>C AND C<REF(C,1) AND C>EMA55 AND BETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1;
DR6:=C>REF(C,1) ;
DR7:= DR1 AND DR5 AND DR6 ;
DR8:=DR7 AND FILTER(DR7 ,10);
DRAWTEXT(DR8,L-0.09,'黑客點擊'),COLORD6BA63;
{STICKLINE(DR8,H,L,0.5,1),COLORD6BA63;
STICKLINE(DR8,O,C,6,1),LINETHICK2,COLORD6BA63;}
JG1:=ABS(EMA(C,13)-EMA(C,34))<C*0.02 AND ABS(EMA(C,13)-EMA(C,55))<C*0.02;
JG2:=O>EMA(C,13) OR O=EMA(C,13);
JG3:=C/OPEN>1.03 ; {陽線３％}
JG:=JG1 AND JG2 AND JG3;
DRAWTEXT(JG,LOW-0.2,'揭竿而起'),COLORYELLOW;
ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55);
DRAWTEXT(ER,L-0.09,'均線互換'),COLOR0099FF;
FR:=BARSLAST(REF(CROSS(EMA34,EMA13),1)) AND CROSS(EMA13,EMA34) AND EMA13>EMA55;
DRAWTEXT(FR,L-0.09,'梅開二度'),COLORWHITE;
{STICKLINE(FR,H,L,0.5,1),COLORWHITE;
STICKLINE(FR,O,C,6,1),LINETHICK2,COLORWHITE;}
HR2:=EMA13>=REF(EMA13,3) AND EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1) AND CROSS(C,EMA13) AND CROSS(C,EMA34) AND CROSS(C,EMA55);
|
|
|
