优化组合主图，可预测明天 （无未来 源码）

EMA13:EMA(C,13),COLORWHITE,LINETHICK2;EMA34:EMA(C,34),COLORYELLOW;

EMA55:EMA(C,55),COLORFF00FF;EMA120:EMA(C,120),COLORFFCC66;

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

ANDAR2ANDAR3ANDAR4;AR6:=AR5AND

FILTER(AR5,10);

DRAWTEXT(AR6,L-0.09,'红杏出墙'),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>EMA55AND

(REF(C,1)<REF(EMA55,1)ORREF(C,2)<REF(EMA55,2)OR

REF(C,3)<REF(EMA55,3)ORREF(C,4)<REF(EMA55,4)OR

REF

(C,5)<REF(EMA55,5));BR4:=BR1ANDBR2ANDBR3;

DRAWTEXT(BR4AND

FILTER(BR4,10),L-0.09,'蚂蚁上树'),COLOR00C5FF;

STICKLINE(BR4AND

FILTER(BR4,10),H,L,0.5,1),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

ANDEMA55>=REF(EMA55,1);

CR6:=FILTER(CR1ANDCR2ANDCR3ANDCR4AND

CR5,2);

DRAWTEXT(CR6,L-0.09,'红衣侠女'),COLORF00FF0;

DR1:=EMA13>EMA34AND

EMA34<EMA55;DR2:=BARSLAST(CROSS(C,EMA55)

);DR3:=H=HHV(H,DR2);

DR4:=BARSLAST(DR3);

DR5:=COUNT(O>CAND

C<REF(C,1)ANDC>EMA55AND

BETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1;

DR6:=C>REF(C,1);DR7:=DR1ANDDR5

ANDDR6;DR8:=DR7ANDFILTER(DR7

,10);

DRAWTEXT(DR8,L-0.09,'黑客点击'),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;

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;

GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5)

);

GR2:=EMA13>EMA34ANDEMA34>EMA55AND

EMA13>REF(EMA13,1);

GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10AND

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

ANDGR3ANDGR4;GR7:=GR2ANDGR3ANDGR4ANDGR5;

DRAWTEXT(GR6AND

GR7,H+0.13,'见好就收!'),COLOR00FF00;

STICKLINE(GR6AND

GR7,H,H+0.09,4,0),COLOR00FF00;

HR2:=EMA13>=REF(EMA13,3)AND

EMA34>=REF(EMA34,1)ANDEMA55>=REF(EMA55,1)ANDCROSS(C,EMA13)AND

CROSS(C,EMA34)ANDCROSS

(C,EMA55)ANDCROSS(C,EMA120);

DRAWTEXT(HR2AND

FILTER(HR2,10),L-0.09,'三线推进'),COLORFFC8FF;

P1:=5;

P2:=10;

P3:=20;

P4:=30;

P5:=60;

P6:=120;

P7:=240;

P8:=340;

N:=4;

WX:=MA(CLOSE,0);

M1:=MA(CLOSE,P1);

M2:=(MA(CLOSE,P2)*IF((N<2),WX,1));

M3:=(MA(CLOSE,P3)*IF((N<3),WX,1));

M4:=(MA(CLOSE,P4)*IF((N<4),WX,1));

M5:=(MA(CLOSE,P5)*IF((N<5),WX,1));

M6:=(MA(CLOSE,P6)*IF((N<6),WX,1));

M7:=(MA(CLOSE,P7)*IF((N<7),WX,1));

M8:=(MA(CLOSE,P8)*IF((N<8),WX,1));

C1:=REF(CLOSE,1);

C2:=HHV(C1,2);

C3:=LLV(C1,1);

ET:=HHV(C1,2);

ET1:=REF(ET,1);

XB:=LLV(C1,1);

XB1:=REF(XB,1);

M:=BARSLAST(((CLOSE<XB)AND(C1>=XB1)));

M11:=REF(M,1);

N9:=BARSLAST(((CLOSE>ET)AND(C1<=ET1)));

N1:=REF(N9,1);

M21:=(BARSLAST((((M-N9)>0)AND(M11<=N1)))+1);

N2:=(BARSLAST((((N9-M)>0)AND(N1<=M11)))+1);

ET2:=HHV(ET,M21);

XB2:=LLV(XB,N2);

A:=IF((((M-N9)>0)AND(M11<=N1)),1,IF((((N9-M)>0)AND(N1<=M11)),0,2));

H1:=IF(((M-N9)>0),CLOSE,ET2);

H2:=IF((A=1),CLOSE,C2);

H3:=IF(((M-N9)<0),CLOSE,XB2);

H4:=IF((A=1),CLOSE,XB2);

H5:=IF((((M-N9)>0)OR(A=1)),CLOSE,H3);

H6:=REF(H5,1);

H7:=REF(H5,2);

H8:=(H5>H6);

H9:=(((H4=REF(H4,1))AND(REF(H4,1)<REF(H4,2)))AND(H5>REF(H5,2)));

H10:=(((H2=REF(H2,1))AND(H4=REF(H4,1)))AND(H5=REF(H5,2)));

W:=((H8ORH9)ORH10);

T9:=((H5<H6)AND(H5<REF(H5,2)));

T10:=((H4=REF(H4,1))AND(H5<REF(H5,2)));

T11:=((H3>REF(H3,1))AND(H5<REF(H5,1)));

T12:=((H5=REF(H5,1))AND(H3=H4));

T13:=((H2=REF(H2,1))AND(H2=H5));

TW:=((((T9ORT10)ORT11)ORT12)ORT13);

PK:=((AMOUNT*(((OPEN+CLOSE)+HIGH)+LOW))/4);

PK1:=IF((VOL>0),(PK/AMOUNT),((((OPEN+CLOSE)+HIGH)+LOW)/4));

BBP:=(((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*100);

DRAWTEXT((ISLASTBARAND(BBP>=96.5)),(H5*1.022),'明见\N短高\N龙头\N除外'),COLORRED;

DRAWTEXT((ISLASTBARAND(BBP<1)),((H5+H4)/1.96),'明见\N短低\N跌停\N除外'),COLORGREEN;

DRAWTEXT(((ISLASTBARANDW)AND(BBP<96.5)),(H5*1.022),'明日\N看涨'),COLORYELLOW;

DRAWTEXT(((ISLASTBARANDTW)AND(BBP>1)),((H5+H4)/2),'明日\N看跌'),COLORGREEN;

高:=MA(REF(HIGH,1)/REF(CLOSE,2),27)*REF(CLOSE,1),LINETHICK2;

低:=MA(REF(LOW,1)/REF(CLOSE,2),27)*REF(CLOSE,1),LINETHICK2;

预测高点:高,COLORRED;

预测低点:低,COLORGREEN;