梅開二度揭竿三線推進而起主圖指標公式源碼

作者：大智慧來源：cxh99.com 發布時間：2023年01月04日

源碼:

n:=17;

LH:=79;

EMA1:EMA(CLOSE,1);

ema13:ema(c,13),COLORFF8080;

ema34:ema(c,34),colorFFFF00;

ema55:ema(c,55),colorff00ff;

ema120:ema(c,120),COLORGREEN;{http://www.tumamayizhan.com}

MA30:MA(CLOSE,30),COLORYELLOW,POINTDOT,LINETHICK2;

生命線:eMA(C,453),colorff00ff,POINTDOT,LINETHICK2;

LOCK:=1;

M8:=EMA(C,8);

M13:=EMA(M8,13);

cxh1:=EMA(M13,62);

cxh2:=(C+H+L)/3;

cxh3:=EMA(cxh2,10)*LOCK;

cxh4:=REF(cxh3,1)*LOCK;

STICKLINE(O>=C,C,O,9*0.5,0),COLORFF5B00;

STICKLINE(O>=C,C,O,8*0.5,0),COLORFF6C00;

STICKLINE(O>=C,C,O,7*0.5,0),COLORFF7B00;

STICKLINE(O>=C,C,O,6*0.5,0),COLORFF9C00;

STICKLINE(O>=C,C,O,5*0.5,0),COLORFFBE00;

STICKLINE(O>=C,C,O,3.5*0.5,0),COLORFFCC00;

STICKLINE(O>=C,C,O,1.5*0.5,0),COLORFFFF00;

STICKLINE(C>=O,C,O,9*0.5,0),COLOR070084;

STICKLINE(C>=O,C,O,8*0.5,0),COLOR0000A3;

STICKLINE(C>=O,C,O,7*0.5,0),COLOR0000B7;

STICKLINE(C>=O,C,O,6*0.5,0),COLOR0000CD;

STICKLINE(C>=O,C,O,5*0.5,0),COLOR0000E9;

STICKLINE(C>=O,C,O,3*0.5,0),COLOR0754E9;

STICKLINE(C>=O,C,O,1.5*0.5,0),COLOR076EF3;

STICKLINE(C>=O,C,O,1*0.5,0),COLOR077BF3;

STICKLINE(C>O,O,L,1*0.5,0),COLOR0726CA;

STICKLINE(C>O,C,H,1*0.5,0),COLOR0726CA;

STICKLINE(O>C,C,L,1*0.5,0),COLORDE9100;

STICKLINE(O>C,O,H,1*0.5,0),COLORDE9100;

AAA:=MA(CLOSE,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,'十日30∠'),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;

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;

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;

SK:= EMA(cxh1,13)-EMA(cxh1,73);

SD:= EMA(SK,2);

drawtext((cross(sk,sd) and sk<-0.04 and (c-ref(c,1))/ref(c,1)>=0.03) or (cross(sk,sd) and sk<=-0.14 )

or (cross(sk,sd) and sk<=0.05 and (v/ma(v,5)>2 or c/ref(c,1)>0.035)) ,l*0.99,'短'),COLOR0000cc;

stickline((cross(sk,sd) and sk<-0.04 and (c-ref(c,1))/ref(c,1)>=0.03) or (cross(sk,sd) and sk<=-0.14 )

or (cross(sk,sd) and sk<=0.05 and (v/ma(v,5)>2 or c/ref(c,1)>0.035)),h,l,0.5,0),COLOR0000cc;

stickline((cross(sk,sd) and sk<-0.04 and (c-ref(c,1))/ref(c,1)>=0.03) or (cross(sk,sd) and sk<=-0.14 )

or (cross(sk,sd) and sk<=0.05 and (v/ma(v,5)>2 or c/ref(c,1)>0.035)),o,c,10,1),linethick1,COLOR0000cc;

MA1:=MA(((H + L) / 2),5);MA2:=MA(((H + L) / 2),35);x:=((MA1 - MA2) * 100);

均勢一:=(((((((((C + REF(C,1)) + REF(C,2)) + REF(C,3)) + REF(C,4)) + REF(C,5)) + REF(C,6)) + REF(C,7)) + REF(C,8)) / 9);

均勢二:=((((C + REF(C,1)) + REF(C,2)) + REF(C,3)) / 4);

趨勢一:=((((均勢一 - REF(均勢一,1)) / REF(均勢一,1)) * 1000) + 50);

趨勢二:=((((均勢二 - REF(均勢二,1)) / REF(均勢二,1)) * 1000) + 50);

波段高位:=(CROSS(趨勢一,趨勢二) AND (COUNT((C > REF(H,1)),12) > 5));

LC:=REF(C,1);

方向值:=((SMA(MAX((C - LC),0),6,1) / SMA(ABS((C - LC)),6,1)) * 100);

短抄一:=((CROSS(趨勢二,(趨勢一 + 2)) AND (x < 0)) AND ((方向值 < 10) OR (REF(方向值,1) < 10)));

短抄二:=((((CROSS(趨勢二,MA1) AND (MA1 < 20)) AND (方向值 > 趨勢二)) AND (x < 0)) AND

(((趨勢二 < 20) OR (REF(趨勢二,1) < 15)) OR (REF(趨勢二,2) < 15)));

DRAWTEXT((短抄一 OR 短抄二),(L * 0.99),'短底'),Color0000FF;

DRAWTEXT(波段高位,(H * 1.03),'賣出'),colorWhite;

DRAWICON(波段高位,(H * 1.06),2),colorFF0000;DRAWICON((短抄一 OR 短抄二),(L * 0.97),1);

V5:=EMA(C,1);主線:=EMA(V5,5) ;

本:=EMA(HHV(主線,5),1);

急進:=EMA(HHV(本,17),1);

穩健:=EMA(HHV(急進,17),2);

投資:EMA(HHV(穩健,17),3),linethick2, colorgray;

Y:=(MA(CLOSE,13)-MA(CLOSE,55))/MA(CLOSE,13)*100;

YY1:=C>MA(CLOSE,13) AND O<MA(CLOSE,13);{一陽三線}

YY3:=C>MA(CLOSE,34) AND O<MA(CLOSE,34);

YY5:=C>MA(CLOSE,55) AND O<MA(CLOSE,55);

X2:DRAWTEXT(YY1 AND YY5 AND YY3,L-0.1,'一陽三線'),COLORRED;

SJ1:=ABS(MA(C,13)-MA(C,34))<C*0.01;{１3線３4線５５線接近}

SJ2:=ABS(MA(C,34)-MA(C,55))<C*0.01;

SJ3:=CROSS(MA(C,13),MA(C,55));{13線上穿５５線}

X3:DRAWTEXT(SJ1 AND SJ2 AND SJ3,H+0.1,'三軍集結'),COLORRED;

{程序化交易 www.tumamayizhan.com }

{解盤主圖}

公式導入教程: 【通達信公式源碼導入方法教程】【同花順公式源碼導入方法教程】【大智慧新一代公式源碼導入方法教程】