[通达信指标]BBI趋势启动主图公式

{友情提示:黄绿柱子信号由BBI指标改编而来，趋势线支撑压力部分含有未来函数，仅供参考}

BBIQSA1:=(3*CLOSE+LOW+OPEN+HIGH)/6;

BBIQSA2:=(20*BBIQSA1+19*REF(BBIQSA1,1)+18*REF(BBIQSA1,2)+17*REF(BBIQSA1,3)+16*REF(BBIQSA1,4)+15*REF(BBIQSA1,5)+14*REF(BBIQSA1,6)+13*REF(BBIQSA1,7)+12*REF(BBIQSA1,8)+11*REF(BBIQSA1,9)+10*REF(BBIQSA1,10)+9*REF(BBIQSA1,11)+8*REF(BBIQSA1,12)+7*REF(BBIQSA1,13)+6*REF(BBIQSA1,14)+5*REF(BBIQSA1,15)+4*REF(BBIQSA1,16)+3*REF(BBIQSA1,17)+2*REF(BBIQSA1,18)+REF(BBIQSA1,20))/210;

BBIQSA3:=MA(BBIQSA2,13);

BBIQSA4:=EMA(MA(CLOSE,3),34);

BBIQSA5:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;

BBIQSA6:=MA(BBIQSA5,5);

BBIQSA7:=MA(BBIQSA5,10);

STICKLINE(IF(BBIQSA2<BBIQSA4,BBIQSA2<=1.015*BBIQSA3,BBIQSA2<=1.005*BBIQSA3),BBIQSA2,BBIQSA3,10,1),COLORGREEN ;

STICKLINE(BBIQSA2>1.005*BBIQSA3,BBIQSA2,BBIQSA3,10,1), COLORYELLOW;

DRAWTEXT(FILTER(MA(BBIQSA5,10)<BBIQSA6,1),BBIQSA7,'↑') , COLORRED;

DRAWTEXT(FILTER(MA(BBIQSA5,10)>=BBIQSA5,1),BBIQSA7,'↓') , COLORGREEN;

BBIQSA22:=CONST(LLV(INDEXL,0));

BBIQSA23:=CONST(HHV(INDEXH,0));

BBIQSA24:=BBIQSA23-BBIQSA22;

BBIQSA25:=CONST(LLV(L,0));

BBIQSA26:=CONST(HHV(H,0));

BBIQSA27:=BBIQSA26-BBIQSA25;

BBIQSA28:=BBIQSA27/BBIQSA24;

BBIQSA29:BBIQSA25+(INDEXC-BBIQSA22)*BBIQSA28,NODRAW;

BBIQSA30:=BBIQSA25+(INDEXH-BBIQSA22)*BBIQSA28;

BBIQSA31:=BBIQSA25+(INDEXL-BBIQSA22)*BBIQSA28;

BBIQSA32:=BBIQSA25+(INDEXO-BBIQSA22)*BBIQSA28;

BBIQSA33:=HY_INDEXC;

BBIQSA34:=HY_INDEXH;

BBIQSA35:=HY_INDEXL;

BBIQSA36:=HY_INDEXO;

BBIQSA37:=CONST(LLV(BBIQSA35,0));

BBIQSA38:=CONST(HHV(BBIQSA34,0));

BBIQSA39:=BBIQSA38-BBIQSA37;

BBIQSA40:=CONST(LLV(L,0));

BBIQSA41:=CONST(HHV(H,0));

BBIQSA42:=BBIQSA41-BBIQSA40;

BBIQSA43:=BBIQSA42/BBIQSA39;

BBIQSA44:BBIQSA40+(BBIQSA33-BBIQSA37)*BBIQSA43,NODRAW;

BBIQSA45:=BBIQSA40+(BBIQSA34-BBIQSA37)*BBIQSA43;

BBIQSA46:=BBIQSA40+(BBIQSA35-BBIQSA37)*BBIQSA43;

BBIQSA47:=BBIQSA40+(BBIQSA36-BBIQSA37)*BBIQSA43;

STICKLINE(CURRBARSCOUNT<=0,BBIQSA30,BBIQSA31,0,0),COLOR888888;

STICKLINE(CURRBARSCOUNT<=0,BBIQSA32,BBIQSA29,2,0),COLOR888888;

STICKLINE(CURRBARSCOUNT<=0 AND BBIQSA29>=BBIQSA32,BBIQSA32,BBIQSA29,2,1),COLORAAAAAA;

STICKLINE(CURRBARSCOUNT<=0,BBIQSA45,BBIQSA46,0,0),COLORYELLOW;

STICKLINE(CURRBARSCOUNT<=0,BBIQSA47,BBIQSA44,2,0),COLORYELLOW;

STICKLINE(CURRBARSCOUNT<=0 AND BBIQSA44>=BBIQSA47,BBIQSA47,BBIQSA44,2,1),COLORYELLOW;

BBIQSA48:=MA(CLOSE,5)COLORWHITE;

BBIQSA49:=MA(CLOSE,5)COLORYELLOW;

BBIQSA50:=MA(CLOSE,20)COLORMAGENTA;

BBIQSA51:=MA(CLOSE,20)COLORLIBLUE;

BBIQSA52:=MA(CLOSE,120)COLORCYAN;

BBIQSA53:=REF(BBIQSA48,1);

BBIQSA54:=REF(BBIQSA49,1);

BBIQSA55:=REF(BBIQSA50,1);

BBIQSA56:=REF(BBIQSA51,1);

BBIQSA57:=REF(BBIQSA52,1);

BBIQSA58:=BARSLASTCOUNT(BBIQSA48>REF(BBIQSA48,1));

BBIQSA59:=BARSLASTCOUNT(BBIQSA49>REF(BBIQSA49,1));

BBIQSA60:=BARSLASTCOUNT(BBIQSA50>REF(BBIQSA50,1));

BBIQSA61:=BARSLASTCOUNT(BBIQSA51>REF(BBIQSA51,1));

BBIQSA62:=BARSLASTCOUNT(BBIQSA52>REF(BBIQSA52,1));

BBIQSA63:=MAX(MAX(BBIQSA48,BBIQSA49),MAX(BBIQSA50,BBIQSA51));

BBIQSA64:=MIN(MIN(BBIQSA48,BBIQSA49),MIN(BBIQSA50,BBIQSA51));

BBIQSA65:=MAX(MAX(MA(C,5),MA(C,5)),MA(C,20));

BBIQSA66:=MIN(MIN(MA(C,5),MA(C,5)),MA(C,20));

BBIQSA67:=(BBIQSA53>=BBIQSA54 AND BBIQSA54>=BBIQSA55 AND BBIQSA55>=BBIQSA56 AND BBIQSA56>=BBIQSA57);

BBIQSA68:=(BBIQSA48>BBIQSA53 AND BBIQSA49>BBIQSA54 AND BBIQSA50>BBIQSA55 AND BBIQSA51>BBIQSA56 AND BBIQSA52>BBIQSA57);

BBIQSA69:BARSLASTCOUNT(BBIQSA67>0)COLORWHITE,NODRAW;

BBIQSA70:BARSLASTCOUNT(BBIQSA68>0)COLORWHITE,NODRAW;

BBIQSA71:=BBIQSA69>0 AND BBIQSA70>0;

BBIQSA72:(BBIQSA66/BBIQSA65*100>98.5 AND C>BBIQSA65  AND O<BBIQSA66 AND REF(MA(C,20),1)/MA(C,20)<1 AND C>MA(C,120))COLORLIRED,NODRAW;

BBIQSA73:100*(BBIQSA63-BBIQSA64)/BBIQSA64,COLORYELLOW,NODRAW;

BBIQSA74:BARSLASTCOUNT(BBIQSA71>0)COLORMAGENTA,NODRAW;

DRAWTEXT(BBIQSA72=1,L,' 一阳'),COLORLIRED;

BBIQSA75:=1*1000-1000;

DRAWRECTREL(BBIQSA75,  1,1000,1,RGB(94,38,18));

DRAWRECTREL(BBIQSA75,189,1000,189,RGB(94,38,18));

DRAWRECTREL(BBIQSA75,374,1000,374,RGB(94,38,18));

DRAWRECTREL(BBIQSA75,495,1000,495,RGB(94,0,0));

DRAWRECTREL(BBIQSA75,610,1000,610,RGB(94,38,18));

DRAWRECTREL(BBIQSA75,807,1000,807,RGB(94,38,18));

DRAWRECTREL(BBIQSA75,999,1000,1000,RGB(94,38,18));

BBIQSA76:=(REF(H,15+1)=HHV(H,15+1+1))*1;

BBIQSA77:=FILTER(BBIQSA76,15+1);

BBIQSA78:=BACKSET(BBIQSA77,15+1+1);

BBIQSA79:=FILTER(BBIQSA78,15+1);

BBIQSA80:=BACKSET(ISLASTBAR,BARSLAST(BBIQSA78)+1);

BBIQSA81:=BBIQSA80>REF(BBIQSA80,1);

BBIQSA82:=BACKSET(ISLASTBAR,BARSLAST(BBIQSA79)+1);

BBIQSA83:=BBIQSA82>REF(BBIQSA82,1);

BBIQSA84:=BACKSET(BBIQSA83,REF(BARSLAST(BBIQSA79),1)+2);

BBIQSA85:=BBIQSA84>REF(BBIQSA84,1);

BBIQSA86:=BACKSET(BBIQSA85,REF(BARSLAST(BBIQSA79),1)+2);

BBIQSA87:=BBIQSA86>REF(BBIQSA86,1);

DRAWLINE(BBIQSA83,H,BBIQSA78,H,1)COLOR004000;

DRAWLINE(BBIQSA85,H,BBIQSA83,H,1)COLOR004000;

DRAWLINE(BBIQSA87,H,BBIQSA85,H,1)COLOR004000,LINETHICK2;

BBIQSA88:=REF(L,BARSLAST(BBIQSA81))COLOR808080,DOTLINE;

BBIQSA89:REF(H,BARSLAST(BBIQSA83))COLOR808080,DOTLINE;

BBIQSA90:REF(H,BARSLAST(BBIQSA85))COLOR808080,DOTLINE;

BBIQSA91:=REF(H,BARSLAST(BBIQSA87))COLOR808080,DOTLINE;

BBIQSA92:=(REF(L,20+1)=LLV(L,20+1+1))*1;

BBIQSA93:=FILTER(BBIQSA92,20+1);

BBIQSA94:=BACKSET(BBIQSA93,20+1+1);

BBIQSA95:=FILTER(BBIQSA94,20+1);

BBIQSA96:=BACKSET(ISLASTBAR,BARSLAST(BBIQSA94)+1);

BBIQSA97:=BBIQSA96>REF(BBIQSA96,1);

BBIQSA98:=BACKSET(ISLASTBAR,BARSLAST(BBIQSA95)+1);

BBIQSA99:=BBIQSA98>REF(BBIQSA98,1);

BBIQSA100:=BACKSET(BBIQSA99,REF(BARSLAST(BBIQSA95),1)+2);

BBIQSA101:=BBIQSA100>REF(BBIQSA100,1);

BBIQSA102:=BACKSET(BBIQSA101,REF(BARSLAST(BBIQSA95),1)+3);

BBIQSA103:=BBIQSA102>REF(BBIQSA102,1);

DRAWLINE(BBIQSA99,L,BBIQSA94,L,1)COLORLIRED,LINETHICK2;

DRAWLINE(BBIQSA101,L,BBIQSA99,L,1)COLOR0080FF,LINETHICK2;

DRAWLINE(BBIQSA103,L,BBIQSA101,L,1)COLOR0080FF,LINETHICK2;

BBIQSA104:=REF(L,BARSLAST(BBIQSA97))COLOR808080,DOTLINE;

BBIQSA105:REF(L,BARSLAST(BBIQSA99))COLOR808080,DOTLINE;

BBIQSA106:REF(L,BARSLAST(BBIQSA101))COLOR808080,DOTLINE;

BBIQSA107:=REF(L,BARSLAST(BBIQSA103))COLOR808080,DOTLINE;

BBIQSA108:=BARSLASTCOUNT(BBIQSA91>BBIQSA90);

BBIQSA109:=BARSLASTCOUNT(BBIQSA91<BBIQSA90);

DRAWTEXT(BBIQSA108=1,H,'向下'),COLORLIGREEN;

DRAWTEXT(BBIQSA109=1,H,'向上'),COLORLIGREEN;

BBIQSA110:=BARSLASTCOUNT(BBIQSA106<BBIQSA105);

BBIQSA111:=BARSLASTCOUNT(BBIQSA106>BBIQSA105);

DRAWTEXT(BBIQSA110=1,L,'转强'),COLORMAGENTA;

DRAWTEXT(BBIQSA111=1,L,'转弱'),COLORGREEN;

STICKLINE(CLOSE>=OPEN,CLOSE,HIGH,0,0), COLORRED;

STICKLINE(CLOSE>=OPEN,OPEN,LOW,0,0), COLORRED;

STICKLINE(CLOSE<OPEN,OPEN,HIGH,0,0), COLOR00EC00;

STICKLINE(CLOSE<OPEN,CLOSE,LOW,0,0), COLOR00EC00;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2.9.2,0),COLOR0000A1;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.9.2,0),COLOR0000B5;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.9.8,0),COLOR0000C5;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.4,0),COLOR0000D4;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.2,0),COLOR0000FF;

STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2.9.2,0),COLOR009000;

STICKLINE(CLOSE<OPEN,CLOSE,OPEN,1.9.2,0),COLOR00B400;

STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.9.8,0),COLOR00C100;

STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.4,0),COLOR00DB00;

STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.2,0),COLOR00EC00;