龙听期货论坛's Archiver

C
+
+


 微信: QQ:

龙听 发表于 2018-12-15 10:09

大智慧红杏出墙指标源码[大智慧公式]

大智慧红杏出墙指标

参数:  N 1 100 17
          LH 1 100 79

源码:

[code]
EMA1:EMA(C,1);
eMA13:MA(C,13),COLORRED,LINETHICK2;
eMA34:MA(C,34),COLORYELLOW,LINETHICK2;
eMA55:MA(C,55),COLOR9933CC,LINETHICK2;
eMA120:eMA(c,120),COLORGREEN;
MA30:MA(C,30),COLORYELLOW,POINTDOT,LINETHICK2;
生命线:eMA(CLOSE,453),colorff00ff,POINTDOT,LINETHICK2;
LOCK:=1;
M8:=EMA(CLOSE,8);
M13:=EMA(M8,13);
VAR1:=EMA(M13,62);
VAR2:=(CLOSE+HIGH+LOW)/3;
VAR3:=EMA(VAR2,10)*LOCK;
VAR4:=ref(VAR3,1)*LOCK;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,9*0.5,0),COLORFF5B00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8*0.5,0),COLORFF6C00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7*0.5,0),COLORFF7B00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6*0.5,0),COLORFF9C00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5*0.5,0),COLORFFBE00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5*0.5,0),COLORFFCC00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5*0.5,0),COLORFFFF00;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,9*0.5,0),COLOR070084;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8*0.5,0),COLOR0000A3;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7*0.5,0),COLOR0000B7;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6*0.5,0),COLOR0000CD;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5*0.5,0),COLOR0000E9;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3*0.5,0),COLOR0754E9;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5*0.5,0),COLOR076EF3;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1*0.5,0),COLOR077BF3;
STICKLINE(CLOSE>OPEN,OPEN,LOW,1*0.5,0),COLOR0726CA;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,1*0.5,0),COLOR0726CA;
STICKLINE(OPEN>CLOSE,CLOSE,LOW,1*0.5,0),COLORDE9100;
STICKLINE(OPEN>CLOSE,OPEN,HIGH,1*0.5,0),COLORDE9100;

X26:STICKLINE(VAR3>VAR4,VAR3,VAR4,2.5,0),COLOR00FFFF;
X27:STICKLINE(VAR3<VAR4,VAR3,VAR4,2.5,0),COLORFF0000;
AAA:=MA(C,10);
BBB:=ATAN((AAA/ref(AAA,1)-1)*100)*180/3.1416;
CCC:=FILTER(CROSS(BBB,30),5);
DRAWTEXT(CCC AND C>AAA,AAA*0.95,'十日三十度角'),COLORFF00FF;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
阻力价:HHV(HIGH,19),COLORFF00FF;
ar1:=eMA55>eMA34 and eMA34>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,'红杏出墙'),COLOR00ccff;
STICKline(ar6,h,l,0.5,1),COLOR00ccff;
STICKline(ar6,o,c,6,1),LINETHICK2,COLOR00ccff;
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; {本文来至CXH99.COM}
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>MA(v,5)*0.6;
cr3:=COUNT(cross(eMA13,eMA55),3)=1;
cr4:=ABS(eMA34-eMA55)/eMA55<0.03;
cr5:=eMA55<=eMA120 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;
er:=BARSLAST(ref(cross(eMA55,eMA34),1)) and cross(eMA34,eMA55);
DRAWTEXT(er,l-0.09,'均线互换'),color0099ff;
STICKline(er,h,l,0.5,1),color0099ff;
STICKline(er,o,c,6,1),LINETHICK2,color0099ff;
fr:=BARSLAST(ref(cross(eMA34,eMA13),1)) and cross(eMA13,eMA34);
DRAWTEXT(fr,l-0.09,'梅开二度'),colorwhite;
STICKline(fr,h,l,0.5,1),colorwhite;
STICKline(fr,o,c,6,1),LINETHICK1,colorwhite;
gr1:=BARSLAST(BETWEEN("bias.bias2"(6,13,24),0,5) );
gr2:=eMA13>eMA34 and eMA34>eMA55 and eMA13>ref(eMA13,1);
gr3:=COUNT("bias.bias2"(6,13,24)>10 and h=HHV(h,gr1),gr1);
gr4:=h=HHV(h,gr1);
gr5:="MAcd.MAcd"(12,26,9)<ref("MAcd.MAcd"(12,26,9),1);
gr6:=gr2 and gr3 and gr4;
gr7:=gr2 and gr3 and gr4 and gr5;
DRAWTEXT(gr6 and gr7,h+0.13,'见好就收!'),color00ff00;
DRAWTEXT(gr6 and gr7,h+0.1,'▼'),color00ff00;
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);
DRAWTEXT(hr2 and filter(hr2,10),h+0.1,'▲'),colorFFC8FF;
DRAWTEXT(hr2 and filter(hr2,10),h+0.5,'揭竿而起'),color9900cc; {内容来至程序化交易网 CXH99.COM}
DRAWTEXT(hr2 and filter(hr2,10),l-0.09,'三线推进'),COLORYELLOW;
STICKline(hr2 and filter(hr2,10),h,l,0.5,1),COLORYELLOW;
STICKline(hr2 and filter(hr2,10),o,c,6,1),LINETHICK2,COLORYELLOW;
[/code]

[attach]5839[/attach]

页: [1]