【原】通达信主图指标豹子布林（附源码)

通达信主图指标豹子布林（附源码)

LOWER:BOLL-2*STD(C,20),CIRCLEDOT,COLOR00FF00;{短线飚王常用主图}

STICKLINE(CLOSE>=REF(HHV(C,5),1) AND C>=O,C,O,3,1),COLORMAGENTA;

STICKLINE(CLOSE<=REF(LLV(O,5),1) AND C<REF(C,1),C,O,1,0),COLORBLUE;

加速:=IF(100*WINNER(CLOSE*0.95)>50 AND COST(85)<CLOSE AND

(EMA(EMA(CLOSE,9),9)-REF(EMA(EMA(CLOSE,9),9),1))/REF(EMA(EMA(CLOSE,9),9),1)*1000>0,

(EMA(EMA(CLOSE,9),9)-REF(EMA(EMA(CLOSE,9),9),1))/REF(EMA(EMA(CLOSE,9),9),1)*1000,0),COLORFF00FF,NODRAW;

STICKLINE(加速 AND C>O AND MA(CLOSE,3)>REF(MA(CLOSE,3),1),C,O,3,0),COLORMAGENTA;

STICKLINE(L<MA(C,10) AND C>MA(C,5) AND C>MA(C,10) AND MA(C,10)>REF(MA(C,10),1)

 AND MA(C,10)>MA(C,24) AND C>O AND C>REF(C,1),C,O,1.5,0),COLORYELLOW;

买进价:=((C-REF(MA(C,6),1))/6+MA(C,6))*1.004; 

买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);    

STICKLINE(买进条件,O,C,0.5,0),COLORYELLOW; 

加码价:=((C-REF(MA(C,21),1))/21+MA(C,21))*1.004; 

加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);     

STICKLINE(加码条件,O,C,1.5,0),COLORYELLOW;

进入短线强势区:=CROSS("KDJ".J,80) AND "MACD.DIF">"MACD.DEA" AND MA(C,5)>MA(C,30);

DRAWICON("KDJ.J"-REF("KDJ.J",1)>30  AND C/REF(C,1)>1.043 AND

EXPMA(C,12)>EXPMA(C,50),L*0.90,5);

DRAWTEXT("KDJ.J"-REF("KDJ.J",1)>30  AND C/REF(C,1)>1.043

 AND EXPMA(C,12)>EXPMA(C,50),L*0.95,'起爆'),COLORRED;

VAR1:=LLV(LOW,21);

VAR2:=HHV(HIGH,21);

AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);

AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);

AB:=CROSS(AK1,AK);

DRAWTEXT((AB = 1),(LOW * 0.91),'◎'),COLORYELLOW;

{MM4开花}

VAR112:=(C-REF(C,1))/REF(C,1)*100;

VAR113:=(C-LLV(L,18))/(HHV(H,18)-LLV(L,18))*100;

VAR114:=SMA(VAR113,9,1);

VAR115:=SMA(VAR114,3,1);

J11:=3*VAR114-2*VAR115;

中:=IF(MA(H,3)*1.05,30,0);

B0:=MA(C,3);

B01:=MA(C,4);

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

B2:=HHV(B1,15);

B3:=LLV(B1,15);

B4:=B2-B3;

B5:=MA((B1-B3)/B4,2)*100;

B6:=HHV(B1,4*15);

B7:=LLV(B1,4*15);

B8:=B6-B7;

B9:=MA((B1-B7)/B8,2)*100;

BA:=HHV(B1,16*15);

BB:=LLV(B1,16*15);

BC:=BA-BB;

BD:=MA((B1-BB)/BC,2)*100;

开花一:=CROSS(B5,1) AND B0-REF(B0,1)>0 AND J11-REF(J11,1)>0 AND C>=O;

开花二:=CROSS(B5,1) AND CROSS(B9,1) AND B01-REF(B01,1)>0;

开花三:=CROSS(BD,1) AND 中-REF(中,1)>0 AND B5-REF(B5,2)>0;

开花:=开花一 OR 开花二 OR 开花三;

DRAWTEXT(开花,(LOW *0.93),'低点'),COLORYELLOW;

MTM:=C-REF(C,1);

DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);

DRAWTEXT(FILTER(买=1,5),LOW-0.66,''),COLORFF00FF;

DRAWTEXT(FILTER(买=1,5),LOW-0.66,'拉'),COLORFFCC00;

Y1:=REF(C,10)=HHV(C,21);

VB1:=FILTER(Y1,10);

C1:=BACKSET(VB1,11);

HD:=FILTER(C1,10);

Y2:=REF(C,10)=LLV(C,21);

VB2:=FILTER(Y2,10);

C2:=BACKSET(VB2,11);

LD:=FILTER(C2,10);

A:=REF(CLOSE,BARSLAST(HD));

B:=REF(CLOSE,BARSLAST(LD));

T1:=(BARSLAST(HD)<BARSLAST(LD)) AND NOT(HD);

T2:=(BARSLAST(HD)>BARSLAST(LD)) AND NOT(LD);

VAA4:=((2)*(CLOSE)+LOW+HIGH)/(4);

峰:IF(T1,A,A),POINTDOT,COLORFF00FF;

STICKLINE(T1,A,A,3,0),COLORFF00FF;

谷:IF(T2,B,B),POINTDOT,COLOR80FF00;

STICKLINE(T2,B,B,3,0),COLOR80FF00;

凯云H1:=(EMA(CLOSE,6));

H2:=(EMA(凯云H1,20));

DRAWTEXT(CROSS(凯云H1,H2),(凯云H1)*(0.982),'●'),COLOR0000FF;

DRAWTEXT(CROSS(凯云H1,H2),(凯云H1)*(0.981),'↑'),COLOR00FFFF;

BOLL:MA(C,20),LINETHICK2,COLORMAGENTA;

UPPER:BOLL+2*STD(C,20),CIRCLEDOT,COLORYELLOW;

MA3:MA(C,3),COLORWHITE;

MA4:MA(C,4),LINETHICK2,COLORRED;

MA9:MA(C,9),LINETHICK2,COLOR00FF00;