5日线与BBI主图，指标源码分享

A1:MA(C,N),COLORGREEN,LINETHICK2;

IF(A1>REF(A1,1),A1,DRAWNULL),COLOR0000FF,LINETHICK2;

DIF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);

DEA:=EMA(DIF,9);

AA:=(DIF-DEA)*2*30;

起爆:=CROSS(AA-REF(AA,1), 10)COLORRED,LINETHICK2;

DRAWTEXT(起爆,L*0.99,'↖爆点') ,COLORYELLOW,LINETHICK2;

DRAWICON(起爆,L*1.00,9);

RC1:=REF(C,1);

ZT:=C/REF(C,1)>1.099 AND H>L;

CS:=IF(C>=1,10000,100000);

C涨停10:=1.10*RC1-49/CS;{考虑到4舍5入}

C涨停5 :=1.05*RC1-49/CS;

C跌停10:=0.90*RC1+51/CS;

C跌停5 :=0.95*RC1+51/CS;

ST:=NAMELIKE('S') OR NAMELIKE('*S');

涨停:= IF(ST, C>=C涨停5, C>=C涨停10);

跌停:= IF(ST, C<=C跌停5, C<=C跌停10);

盘中涨停:=IF(ST, H>=C涨停5, H>=C涨停10);

盘中跌停:=IF(ST, L<=C跌停5, L<=C跌停10);

STICKLINE(盘中涨停,H,MAX(C,O),0,0),COLORMAGENTA;{涨停后回落}

STICKLINE(盘中跌停,L,MIN(C,O),0,0),COLORLICYAN;{跌停后回升};

STICKLINE(涨停,O,C,1,0),COLORMAGENTA;

STICKLINE(跌停,O,C,1,0),COLORLICYAN;

{涨停}

STICKLINE(C/REF(C,1)>=1.09,O,C,3.2,0),COLOR0033FF;

STICKLINE(C/REF(C,1)>=1.09,O,C,2.8,0),COLOR0055FF;

STICKLINE(C/REF(C,1)>=1.09,O,C,2.4,0),COLOR0077FF;

STICKLINE(C/REF(C,1)>=1.09,O,C,2.0,0),COLOR0099FF;

STICKLINE(C/REF(C,1)>=1.09,O,C,1.6,0),COLOR00AAFF;

STICKLINE(C/REF(C,1)>=1.09,O,C,0.8,0),COLOR00CCFF;

STICKLINE(C/REF(C,1)>=1.09,O,C,0.4,0),COLOR00DDFF;

STICKLINE(C/REF(C,1)>=1.09,O,C,0.0,0),COLOR00EEFF;

S5:=ZTPRICE(REF(C,1),0.2);{计算最高涨幅为20%的涨停价}

STICKLINE(C>=S5 AND C=H,C,O,3,0),COLORYELLOW;{对最高涨幅为20%的涨停标黄色};

S6:=DTPRICE(REF(C,1),0.2);{计算最大跌幅为20%的跌停价}

STICKLINE(C<=S6 AND C=L,C,O,3,0),COLORGREEN;{对跌幅为20%的跌停标绿色};

STICKLINE(C<=S6 AND C=L,C,H,0.001,0),COLORGREEN;{对跌幅为20%的跌停上引线标绿色};

BBI:(MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4,COLORYELLOW,LINETHICK2;

平均成本:=STRCAT(' 平均成本：',CON2STR(COST(50),2));

主力成本:=STRCAT(' 主力成本：',CON2STR(COST(4),2));

DRAWTEXT_FIX(ISLASTBAR,0.5,0.15,0, 平均成本),COLOR0000FF;

DRAWTEXT_FIX(ISLASTBAR,0.5,0.1,0, 主力成本),COLOR0000FF;

套牢盘%:=STRCAT(' 套牢概率：',CON2STR((1-WINNER(C))*100,2));

获利盘%:=STRCAT(' 获利概率：',CON2STR(100*WINNER(C),2));

DRAWTEXT_FIX(ISLASTBAR,0.4,0.15,0, 套牢盘%),COLORGREEN;

DRAWTEXT_FIX(ISLASTBAR,0.4,0.1,0, 获利盘%),COLORRED;

五日差:C-REF(C,4),COLORLIRED,NODRAW;          

止损价:REF(L,1),COLORYELLOW,NODRAW;

今日竞价额:DYNAINFO(15)/10000 ,NODRAW;

DRAWTEXT_FIX(1,0.009,0.10,0,STRCAT('今日竞价额：',STRCAT(VAR2STR(今日竞价额,1),'  万')))COLORMAGENTA;

今日竞价量:DYNAINFO(15)/DYNAINFO(4)/100,NODRAW; 

DRAWTEXT_FIX(1,0.009,0.15,0,STRCAT('今日竞价量：',STRCAT(VAR2STR(今日竞价量,0),'  手')))COLORMAGENTA;

竞价换手率:DYNAINFO(15)/OPEN/FINANCE(46)*100,NODRAW; 

DRAWTEXT_FIX(1,0.009,0.20,0,STRCAT('竞价换手率：',STRCAT(VAR2STR(竞价换手率,2),'  %')))COLORMAGENTA;

TJ:=(FINANCE(3)=4 OR (DATE>1200822 AND FINANCE(3)=3));

ZTJ:=IF(TJ,ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1));

ZTWZ:=CONST(BARSLAST(CLOSE>=ZTJ)); { 最近的以涨停收盘的位置 }

ZTWZC:IF(RANGE(CURRBARSCOUNT,ZTWZ-14,ZTWZ+2)=1,CONST(REF(C,ZTWZ)),DRAWNULL),DOTLINE;

ZTWZO:IF(RANGE(CURRBARSCOUNT,ZTWZ-14,ZTWZ+2)=1,CONST(REF(O,ZTWZ)),DRAWNULL),DOTLINE;

AAA:=MA(LOW,5)*(1-5/100);

BBB:=(HHV(AAA,5)+LLV(AAA,5))/2;

DRAWTEXT(CROSS(BBB,L) AND BBB>REF(BBB,1),L*0.98,'↖回鹿 '),COLORWHITE;

LT:=LLVBARS(L,34);

LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);

HT:=FINDHIGHBARS(H,LT+1,60,1);

EXT1:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORYELLOW,LINETHICK2;

TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1);

DRAWTEXT(TT=0,REF(H,TT)*1.03,VARCAT(VARCAT('锅沿：',VAR2STR(REF(H,TT),2)),'元'))COLORYELLOW;

DD1:=1;

AAA1:=MA(LOW,5)*(1-5/100);

BBB1:=(HHV(AAA1,5)+LLV(AAA1,5))/2;

DRAWTEXT(CROSS(BBB1,L) AND BBB1>REF(BBB1,1),L*0.98,'↖回马抢 '),COLORWHITE;

VAR33:=100-3*SMA((CLOSE-LLV(LOW,DD1))/(HHV(HIGH,DD1)-LLV(LOW,DD1))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,DD1))/(HHV(HIGH,DD1)-LLV(LOW,DD1))*100,20,1),15,1);

VAR44:=100-3*SMA((OPEN-LLV(LOW,DD1))/(HHV(HIGH,DD1)-LLV(LOW,DD1))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,DD1))/(HHV(HIGH,DD1)-LLV(LOW,DD1))*100,20,1),15,1);

活筹OAMV: VAR33,NODRAW;

VAR24:=EMA(AMOUNT/VOL/100,5);

VAR25:=EMA(AMOUNT/VOL/100,13);

VAR26:=VAR24-VAR25;

势能:IF(1000*VAR26/VAR24>0,1000*VAR26/VAR24,0),NODRAW;

KKK:=CROSS(势能,活筹OAMV) AND C>REF(C,1);

DRAWTEXT(KKK,L*0.99,'↖涨在即'),COLORRED;

买线:=ZIG(3,10);

卖线:=MA(买线,2);

BU:=CROSS(买线,卖线);

SEL:=CROSS(卖线,买线);

DRAWTEXT(BU,L*0.99,'←进'),LINETHICK2,COLOR00FFFF;

{DRAWTEXT(SEL,H*1.0,'←清'),LINETHICK1,COLOR00FF00;}

{YX:=NOT(BARSLAST(H>=HHV(H,250)));

DRAWLINE(YX,H,REF(YX,1),REF(H,1),1),COLORRED;};

{早晨之星:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) 

AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 

AND CLOSE>REF(CLOSE,2);

标记:STICKLINE(早晨之星,O,C,2,0),COLORMAGENTA;

DRAWTEXT(早晨之星,L*0.95,'↖早晨之星');}

N:=120;

XA_1:=100;

XA_2:=2;

XA_3:=BARSLAST(CROSS(BACKSET(ISLASTBAR,LLVBARS(LOW,XA_1)+1),0.5));

前期低点:IF(XA_3>=0,REF(LOW,XA_3),DRAWNULL),COLORGREEN,LINETHICK2;

LC:= REF(CLOSE,1);

RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;

逃顶:=CROSS(82,RSI);

DRAWICON( 逃顶,H*1.01,15);

{DRAWTEXT( 逃顶,H*0.96,' ←快跑'),COLORFFFFFF;}

连板数:=BARSLASTCOUNT (涨停);

AY1:=连板数=1;

AY2:=连板数=2;

AY3:=连板数=3;

AY4:=连板数=4;

AY5:=连板数=5;

AY6:=连板数=6;

AY7:=连板数=7;

AY8:=连板数=8;

AY9:=连板数=9;

AY10:=连板数=10;

AY11:=连板数=11;

AY12:=连板数=12;

DRAWNUMBER(AY1,1.03*H,1),COLORYELLOW;

DRAWNUMBER(AY2,1.03*H,2),COLOR8000FF;

DRAWNUMBER(AY3,1.03*H,3),COLOR00FF00;

DRAWNUMBER(AY4,1.03*H,4),COLORYELLOW;

DRAWNUMBER(AY5,1.03*H,5),COLOR8000FF;

DRAWNUMBER(AY6,1.03*H,6),COLORYELLOW;

DRAWNUMBER(AY7,1.03*H,7),COLORYELLOW;

DRAWNUMBER(AY8,1.03*H,8),COLORYELLOW;

DRAWNUMBER(AY9,1.03*H,9),COLORYELLOW;

DRAWNUMBER(AY10,1.03*H,10),COLORYELLOW;

DRAWNUMBER(AY11,1.03*H,11),COLORYELLOW;

DRAWNUMBER(AY12,1.03*H,12),COLORYELLOW;