{布林操作系统，BOLL优化自用，带个股解盘}
DRAWGBK(1,RGB(58,0,0),RGB(0,0,0),0,'BJ1',0);
买线:=EMA(C,1);
卖线:=EMA(SLOPE(C,10)*10+C,20);
拉升:EMA(CLOSE,7),COLORDDDDDD;
跟进:EMA(CLOSE,10),COLORRED;
趋势:EMA(C,30),POINTDOT,COLOR00FF00,LINETHICK2;
红升:IF(趋势>REF(趋势,1),趋势,DRAWNULL),COLOR0000FF,LINETHICK2;
绿降:IF(趋势<REF(趋势,1),趋势,DRAWNULL),DOTLINE,COLOR00FF00;
DRAWBAND(拉升,RGB(498,198,0),跟进,RGB(0,188,198));
DRAWTEXT(ISLASTBAR,趋势,'线上买'),COLORFFFFFF;
MID2 := MA(CLOSE,21),COLORWHITE;
UPPER2:=MID2 + 1.96*STD(CLOSE,21),COLORYELLOW;
LOWER2:=MID2 - 1.96*STD(CLOSE,21),COLORYELLOW;
UP2:=MID2 + 2.56*STD(CLOSE,21),COLORFF00FF;
LOOW2:=MID2 - 2.56*STD(CLOSE,21),COLORFF00FF;
MID:MID2,NODRAW;
UP:UP2,COLOR00FFFF;
LOOW:LOOW2,COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.08,0,HYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0,00,DYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.04,0,GNBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.13,0,FGBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.18,0,ZSBLOCK)COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,0),COLOR2F2FFF;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3.1,0),COLOR000033;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0),COLOR000080;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0),COLOR0000CC;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0),COLOR0000FF;{立体红颜色};
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,0 ),COLORFFFF00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR000000;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR6A6A00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORDDDD00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0),COLORFFFF00;{立体青色};
WH01:=IF(L=LLV(L,9),L,0);
WH02:=CONST(BARSLAST(WH01!=0));
WH03:=CONST(IF(WH02=0,H,REF(H,WH02)));
WH04:=CONST(REF(BARSLAST(H>WH03),WH02+1)+WH02+1);
WH05:=CONST(IF(WH04=0,H,REF(H,WH04)));
WH06:=CONST(REF(BARSLAST(H>WH05),WH04+1)+WH04+1);
WH07:IF(CURRBARSCOUNT<=WH02+10,CONST(IF(WH06=0,H,REF(H,WH06))),DRAWNULL),COLOR8080FF;
DRAWTEXT(ISLASTBAR,WH07,'进场干'),COLORFFFFFF;
MA21:MA(C,21),NODRAW;
空:=EMA(CLOSE,5);
均衡:=EMA(空,0),COLORFFFFFF;
下趋势双线持币:=HHV(MA(HIGH,3),2);
VAR05:=FILTER(均衡>REF(均衡,1) AND 下趋势双线持币<REF(下趋势双线持币,1) AND CLOSE>REF(CLOSE,1),11);
FF:=RANGE(C/MA21,0.97,1.15)OR RANGE(O/MA21,0.97,1.15);
金股:= VAR05 AND C>MA(C,21) AND EVERY(MA21>REF(MA21,1),7) AND FF;
IF( 金股>=1,L*0.996,DRAWNULL),COLORMAGENTA,CIRCLEDOT;
DRAWTEXT( 金股>=1,L,'主升回踩'),COLORFFFFFF;
V1:=EMA(CLOSE,5);
V2:=EMA(EMA(CLOSE,90)*1.01,10);
AAA:=CONST(HHV(H,90));
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
T1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0));
T4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0));
T5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
T18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
T19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0));
T20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0));
T21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0));
T22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0));
T23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));
T24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0));
T25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0));
DRAWTEXT(T1=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'量能理想,明显走强,中线参与，仓位在2/3左右'),COLOR8080FF;
DRAWTEXT(T2=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'走势趋强,还显不足,短线进场，仓位在1/2左右'),COLOR8080FF;
DRAWTEXT(T3=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'量价良好,没有明显走强，短线进场，仓位1/2左右'),COLOR8080FF;
DRAWTEXT(T4=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'形态尚可，量能不足，未完全走强，短线参与，仓位1/3左右'),COLOR8080FF;
DRAWTEXT(T5=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'形态变坏，重仓者减持大半，清仓者观望'),COLORFFFF00;
DRAWTEXT(T6=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'随大盘一起下跌，明显缩量走势，考虑到风险，减持或清仓'),COLORFFFF00;
DRAWTEXT(T7=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'该股放量下跌，走势明显偏弱，离场观望'),COLORFFFF00;
DRAWTEXT(T8=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'该股缩量下跌，走势偏弱，离场观望。'),COLORFFFF00;
DRAWTEXT(T9=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'该股形态良好，强势明显，量能充足，可以继续持有'),COLOR8080FF;
DRAWTEXT(T10=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'上行趋势不变，强势依然，量能开始转弱，注意风险'),COLOR8080FF;
DRAWTEXT(T11=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓'),COLOR8080FF;
DRAWTEXT(T12=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'该股走势趋弱，量能不足，减持大部分筹码'),COLORFFFF00;
DRAWTEXT(T13=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'该股形态不佳，注意成交量的变化，目前不适合参与'),COLORFFFF00;
DRAWTEXT(T14=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.2)
,'趋势不明，股价偏弱，注意量能变化，目前不宜参与'),COLORFFFF00;
DRAWTEXT(T15=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'有走强迹象，但量能不足，趋势不明，不适合操作'),COLORFFFF00;
DRAWTEXT(T16=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'该股走势太弱，没有参与价值。'),COLORFFFF00;
DRAWTEXT(T17=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘理想，有明显走强迹象，中线参与，仓位在2/3左右'),COLOR8080FF;
DRAWTEXT(T18=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'如前期经过一轮下跌，最佳买点，前期有过一段涨幅需谨慎'),COLORFFFFFF;
DRAWTEXT(T19=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'考虑短线进场，仓位在1/2左右，一旦量能放大,加仓买入'),COLOR8080FF;
DRAWTEXT(T20=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘形态走坏，重仓者可以减去大部分仓位。'),COLORFFFF00;
DRAWTEXT(T21=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘缩量调整，注意风险，短线清仓观望。'),COLORFFFF00;
DRAWTEXT(T22=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘走势良好，量能理想，可以继续持有强势股。'),COLOR8080FF;
DRAWTEXT(T23=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘形态良好，但量能稍显不足，随时准备减仓。'),COLORFFFFFF;
DRAWTEXT(T24=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘趋势不明，注意成交量变化，目前不适宜进场。'),COLORFFFF00;
DRAWTEXT(T25=1 AND CURRBARSCOUNT=38,AAA-(AAA*0.1)
,'大盘趋势向下，量能萎缩，不适合进场。'),COLORFFFF00;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.08,0,HYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0,00,DYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.04,0,GNBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.13,0,FGBLOCK)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.18,0,ZSBLOCK)COLORYELLOW;
XG1:=C/REF(C,1)>1.05;
STICKLINE(XG1,H,L,0,1),COLORYELLOW;
STICKLINE(XG1,C,O,1.9,0),COLOR009F9F;
STICKLINE(XG1,C,O,1.1,0),COLOR11DDDD;
STICKLINE(XG1,C,O,0.3,0),COLOR44FFFF;
均价:=(3*C+H+L+O)/6;
VAR1:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36;
DRAWTEXT_FIX(1,0.980,20,1,'分析家公式网http://www.70822.com'),COLOR333333;
VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1;
SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1;
SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1;
SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND CLOSE>VAR2 AND CLOSE<VAR1;
SZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1) AND CLOSE<VAR2) OR (VAR1>VAR2 AND VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1) AND CLOSE<VAR2);
SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE<VAR2;
XD1:=VAR1=VAR2 AND CLOSE<VAR2 OR (VAR1<REF(VAR1,1) AND VAR2<REF(VAR2,1)AND REF(VAR1,1)=REF(VAR2,1) AND CLOSE<VAR2);
XD2:=VAR1=VAR2 AND CLOSE>VAR1;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ1,0.8,0.05,0,'调整结束短线介入'),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ2,0.8,0.05,0,'上升通道走势良好'),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ3,0.8,0.05,0,'股价偏离注意调整'),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ4,0.8,0.05,0,'上升通道调整洗盘'),COLORFFFFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ5,0.8,0.08,0,'转向特征注意离场'),COLOR00FFFF;
DRAWTEXT_FIX(BARSTATUS=2 AND SZ6,0.8,0.02,0,'通道改变坚决离场'),COLORFFFF00;
DRAWTEXT_FIX(BARSTATUS=2 AND XD1,0.8,0.08,0,'下跌通道只宜观望'),COLORFFFF00;
DRAWTEXT_FIX(BARSTATUS=2 AND XD2,0.8,0.05,0,'短期底部准备进入'),COLORYELLOW;
