通达信【牛熊加仓】主图+选股指标筹码划线信号和思路都是一流的
{这个指标的设计呢，是靠筹码的平均价格成本来算出股价的走势，然后在主图上划线；
主图里最关键的就是两条线，有一条最粗的、蓝绿相间的曲线，这可是牛熊分界线；
要是股价突破了这条线，那就说明进入多头趋势；
一旦进入多头趋势，这条最粗的曲线就会变色，从蓝色变成绿色，这个时候就是可以操作的区间了；
还有一条大部分时间都在最上面的黄色曲线，这叫强势上涨线；
这条线平时可不容易被突破，可要是真被突破了，那这股票很可能就走妖了；
一般妖都是沿着这条强势上涨线往上涨的；
要是在高位出现了预警的文字提示，那可得注意风险了，最好赶紧减仓或者直接清仓，这个对于判断股票的顶部太有用了；
再看主图里的数字，像3、5、8、13这些，它们是斐波那契数列里的数，代表着关键的时间窗口；
主图里还会出现一些信号，像低买、加仓、启动这些，这都是进场点信号，而且它们一个比一个强势；
当然，这些信号出现的时候，位置肯定也是一个比一个高，不过确定性也是越来越强；
分享的选股指标，专门选的就是出现加仓信号的票}
{牛熊加仓主图源码}
ZBGS31:=ABS((2*CLOSE+HIGH+LOW)/4-MA(C,20))/MA(C,20);
ZBGS32:=ABS((C+2*HIGH+LOW)/4-MA(C,17))/MA(C,17);
ZBGS33:=DMA(C,ZBGS31);
ZBGS34:=DMA(C,ZBGS32);
ZBGS35:=REF((1-3/100)*ZBGS34,2);
STICKLINE(C>O,C,O,3,0),COLORRED;
STICKLINE(C>O,H,L,0,0),COLORRED;
STICKLINE(C< O,C,O,3,0),COLORCYAN;
STICKLINE(C< O,H,L,0,0),COLORCYAN;
强弱分界线:EMA(ZBGS35,7),LINETHICK1,COLORGREEN;
DRAWTEXT(ISLASTBAR,强弱分界线,'【牛熊分界线】'),COLORCYAN;
DRAWTEXT_FIX(1,0,0.15,0,'指标公式网公式网http://www.ZBGS3.com'),COLOR222222;
高抛线:(1+8/100)*ZBGS33;
高抛线不过减仓:高抛线,COLORYELLOW ,LINETHICK1;
DRAWTEXT(ISLASTBAR,高抛线不过减仓,'←强势上涨线'),COLORYELLOW;
短支撑:EMA((LLV((C+L)/2,6)+LLV((C+L)/2,5)+LLV((C+L)/2,4)+LLV((C+L)/2,3)+LLV((C+L)/2,2)+2*(C+L+H)/3)/7,4),COLORGREEN;
ZBGS36:=EMA(短支撑,4);
ZBGS37:=LLV((HIGH+2*LOW+OPEN+C)/5*2.03-H,30)*1.006;
ZBGS38:=((CROSS(C,短支撑) AND CROSS(C,ZBGS36)) OR (L< 短支撑 AND C>ZBGS36 AND 短支撑< ZBGS36)) AND C>REF(C,1)*1.02 AND (C-O>H-C) AND V>REF(V,1) AND (C>强弱分界线 OR C< 强弱分界线 AND C>REF(C,1)*1.07);
ZBGS39:=((CROSS(C,短支撑) AND CROSS(C,强弱分界线)) OR (CROSS(C,短支撑) AND 短支撑< 强弱分界线*1.07)) AND C>强弱分界线 AND 强弱分界线>REF(强弱分界线,1)*0.999 AND 强弱分界线< REF(强弱分界线,3)*0.9 AND C>REF(C,1)*1.02;
ZBGS310:=L< 短支撑 AND L< 强弱分界线 AND C>强弱分界线 AND 强弱分界线>REF(强弱分界线,1) AND C>REF(C,1)*1.02;
ZBGS311:=EMA(C,3);
ZBGS312:=EMA(C,13);
ZBGS313:=BARSLAST(REF(CROSS(ZBGS312,ZBGS311),1)) AND CROSS(ZBGS311,ZBGS312) AND C>强弱分界线 AND 强弱分界线>REF(强弱分界线,1)*0.99 AND REF((C-REF(C,1))/REF(C,1)*100,1)< 4 AND (C-O>H-C);
ZBGS314:=CROSS(C,强弱分界线) AND CROSS(C,短支撑) AND 强弱分界线>=REF(强弱分界线,1)*0.999 AND 短支撑>强弱分界线;
ZBGS315:=EMA(((SLOPE(C,22)*20)+C),55),COLORFF00FF,LINETHICK2;
ZBGS316:=((C-REF(MA(C,6),1))/6+MA(C,6))*1.004;
ZBGS317:=CROSS(C,ZBGS316) AND ZBGS316>REF(ZBGS316,1) AND C>ZBGS315;
ZBGS318:=((C-REF(MA(C,17),1))/18+MA(C,17))*1.004;
ZBGS319:=CROSS(C,ZBGS318) AND ZBGS318>REF(ZBGS318,1);
ZBGS320:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(C,1))),ABS(REF(C,1)-LOW)),4);
ZBGS321:=HIGH-REF(HIGH,1);
ZBGS322:=REF(LOW,1)-LOW;
ZBGS323:=EMA(IF(ZBGS321>0 AND ZBGS321>ZBGS322,ZBGS321,0),4);
ZBGS324:=EMA(IF(ZBGS322>0 AND ZBGS322>ZBGS321,ZBGS322,0),4);
ZBGS325:=ZBGS323*100/ZBGS320;
ZBGS326:=ZBGS324*100/ZBGS320;
ZBGS327:=EMA(ABS(ZBGS326-ZBGS325)/(ZBGS326+ZBGS325)*100,1);
ZBGS328:=CROSS(ZBGS325,ZBGS326) AND ZBGS327 < REF(ZBGS327,1) AND C>REF(C,1)*1.05;
ZBGS329:=MA(C,17);
ZBGS330:=ZBGS329+1*STD(C,17);
ZBGS331:=CROSS(C,ZBGS330) AND C>REF(C,1)*1.04;
ZBGS332:=REF(LLV(H*0.98,3),1);
ZBGS333:=EMA(ZBGS332,2);
ZBGS334:=EMA(EMA((2*L+C)/3,5),10);
ZBGS335:=MA(ZBGS334,20);
ZBGS336:=CROSS(C,ZBGS333) AND CROSS(C,ZBGS335) AND C>强弱分界线*1.015 AND 短支撑>REF(短支撑,1) AND C>强弱分界线;
ZBGS337:=(((ZBGS317 AND ZBGS319 AND C>REF(C,1)*1.025 ) OR (ZBGS317 AND C>REF(C,1)*1.047 AND C< ZBGS315*1.08) OR (ZBGS319 AND C>REF(C,1)*1.07)) OR ZBGS328 OR ZBGS331) AND REF(HHV(H,20),10)< ZBGS335*1.20 AND C< ZBGS335*1.13 AND C>强弱分界线;
ZBGS338:=C/REF(C,1)>1.097;
ZBGS339:=REF(C,BARSLAST(ZBGS338)+1)*0.98;
ZBGS340:=BARSLAST(ZBGS338)< 30 AND (LLV(C,BARSLAST(ZBGS338))>=ZBGS339 OR LLV(C,BARSLAST(ZBGS338))=ZBGS339);
ZBGS341:=REF(L,BARSLAST(ZBGS338));
ZBGS342:=BARSLAST(ZBGS338);
ZBGS343:=IF(2,ZBGS342=2,ZBGS338);
ZBGS344:=IF(2,LLV(L,2)>REF(L,2),1);
ZBGS345:=ZBGS343 AND ZBGS344;
ZBGS346:=IF(4,ZBGS342=4,ZBGS338);
ZBGS347:=IF(4,LLV(L,4)>REF(L,4),1);
ZBGS348:=ZBGS346 AND ZBGS347;
ZBGS349:=IF(7,ZBGS342=7,ZBGS338);
ZBGS350:=IF(7,LLV(L,7)>REF(L,7),1);
ZBGS351:=ZBGS349 AND ZBGS350;
ZBGS352:=IF(12,ZBGS342=12,ZBGS338);
ZBGS353:=IF(12,LLV(L,12)>REF(L,12),1);
ZBGS354:=ZBGS352 AND ZBGS353;
ZBGS355:=BARSLAST(ZBGS338);
ZBGS356:=C>O AND V>REF(V,1) AND L>REF(C,1) AND REF(ZBGS338,1);
ZBGS357:=C>O AND V>REF(V,1) AND REF(ZBGS338,1);
ZBGS358:=REF(HHV(V,8),1)/V>=1.97 AND REF(HHV(ZBGS357,8),1) AND C>O;
ZBGS359:=MA(C,2);
ZBGS360:=CROSS(ZBGS359,REF(ZBGS359,1)) AND REF(HHV(ZBGS338,8),1) AND COUNT(C/REF(C,1)>1.092 AND C=H,20)< 4 AND COUNT(EVERY(C/REF(C,1)>1.092 AND C=H,3),40)=0;
ZBGS361:=(L+H+C*2)/4;
ZBGS362:=EMA(ZBGS361,10);
IF(强弱分界线>REF(强弱分界线,1)*0.999,强弱分界线,DRAWNULL),COLORCYAN ,LINETHICK3;
IF(强弱分界线< REF(强弱分界线,1)*0.999,强弱分界线,DRAWNULL),COLORFF6C00,LINETHICK3;
IF(短支撑>=REF(短支撑,2)*0.998 AND C>短支撑,短支撑,DRAWNULL),COLORRED,LINETHICK1;
DRAWTEXT(ISLASTBAR,短支撑,' ←中线操作'),COLORRED;
DRAWTEXT(ZBGS38,L*0.985,'★上攻'),COLORRED;
STICKLINE(ZBGS38,H,C,0.1,1),COLORYELLOW,LINETHICK2;
STICKLINE(ZBGS38,O,C,4.2,1),COLORYELLOW,LINETHICK2;
STICKLINE(ZBGS38,O,L,0.1,1),COLORYELLOW,LINETHICK2;
DRAWTEXT(ZBGS313,L*0.98,'启动'),COLOR00FFFF;
DRAWTEXT(ZBGS314,L*0.98,'ZBGS314'),COLORRED;
STICKLINE(C>短支撑 AND C>ZBGS37 AND 短支撑>REF(短支撑,2)*0.995 AND ZBGS36>REF(ZBGS36,1),HIGH,LOW,0,1),COLORRED;
STICKLINE(C>短支撑 AND C>ZBGS37 AND 短支撑>REF(短支撑,2)*0.995 AND ZBGS36>REF(ZBGS36,1),OPEN,C,3,1),COLOR0000AA;
STICKLINE(C< O AND C>短支撑 AND C>ZBGS36 AND ZBGS36>REF(ZBGS36,1),HIGH,LOW,0,0),COLORRED;
STICKLINE(C< O AND C>短支撑 AND C>ZBGS36 AND ZBGS36>REF(ZBGS36,1) ,OPEN,C,3,0),COLOR0000AA;
DRAWTEXT(IF(CROSS(69,SMA(MAX(C-REF(C,1),0),13,1)/SMA(ABS(C-REF(C,1)),13,1)*100),1,0) AND C< REF(C,1)*0.965,HIGH*1.025,'预警'),COLORCYAN;
STICKLINE(L< 强弱分界线 AND C>短支撑 AND C>ZBGS37 AND 短支撑>REF(短支撑,2)*0.995 AND ZBGS36>REF(ZBGS36,1) AND C< REF(C,1)*1.06,HIGH,LOW,0,1),COLORFF00FF;
STICKLINE(L< 强弱分界线 AND C>短支撑 AND C>ZBGS37 AND 短支撑>REF(短支撑,2)*0.995 AND ZBGS36>REF(ZBGS36,1) AND C< REF(C,1)*1.06,OPEN,C,3,1),COLORFF00FF;
STICKLINE(L< 强弱分界线 AND C< O AND C>短支撑 AND C>ZBGS36 AND ZBGS36>REF(ZBGS36,1) AND C< REF(C,1)*1.06,HIGH,LOW,0,0),COLORFF00FF;
STICKLINE(L< 强弱分界线 AND C< O AND C>短支撑 AND C>ZBGS36 AND ZBGS36>REF(ZBGS36,1) AND C< REF(C,1)*1.06,OPEN,C,3,0),COLORFF00FF;
STICKLINE(ZBGS337 OR ZBGS336,L*0.996,L*0.98,3,0),COLORYELLOW;
STICKLINE( 短支撑< ZBGS36 AND ZBGS36< REF(ZBGS36,1)*0.999 AND NOT(ZBGS38) AND NOT(ZBGS39) AND NOT(ZBGS310) AND NOT(ZBGS313) AND NOT(ZBGS337 OR ZBGS336)AND (C-REF(C,1))/REF(C,1)*100< 7,HIGH,LOW,0,0),COLORCYAN;
STICKLINE( 短支撑< ZBGS36 AND ZBGS36< REF(ZBGS36,1)*0.999 AND NOT(ZBGS38) AND NOT(ZBGS39) AND NOT(ZBGS310) AND NOT(ZBGS313) AND NOT(ZBGS337 OR ZBGS336)AND (C-REF(C,1))/REF(C,1)*100< 7,OPEN,C,2.8,1),COLORCYAN;
STICKLINE(ZBGS340,REF(C,BARSLAST(ZBGS338)+1)-REF(C,BARSLAST(ZBGS338)+1)*0.001,REF(C,BARSLAST(ZBGS338)+1),1,0),COLORYELLOW;
DRAWTEXT(ZBGS338,L*0.98,'.'),COLORLIMAGENTA;
DRAWTEXT(ZBGS345,ZBGS341-ZBGS341*0.02,'3'),COLORGREEN;
DRAWTEXT(ZBGS348,ZBGS341-ZBGS341*0.02,'5'),COLORGREEN;
DRAWTEXT(ZBGS351,ZBGS341-ZBGS341*0.02,'8'),COLORGREEN;
DRAWTEXT(ZBGS354,ZBGS341-ZBGS341*0.02,'13'),COLORGREEN;
STICKLINE(ZBGS338,REF(O,ZBGS355),REF(C,ZBGS355),0,1),COLORYELLOW;
STICKLINE(ZBGS356,O,C,2,0),COLORMAGENTA;
DRAWTEXT(ZBGS358,L*0.92,'.'),COLORRED;
DRAWTEXT(ZBGS360,L,'低买'),COLORFF99FF;
短线5日:EMA(C,5),COLORWHITE,LINETHICK1;
DRAWTEXT(ISLASTBAR,短线5日,' ←超短线'),COLORWHITE;
升:IF(短线5日>REF(短线5日,1),短线5日,DRAWNULL),COLORMAGENTA,LINETHICK2;
A1:EMA(ZBGS361,5)COLORWHITE,LINETHICK1;
ZBGS363:=(A1-REF(A1,1))/REF(A1,1)*100;
ZBGS364:=(ZBGS362-REF(ZBGS362,1))/REF(ZBGS362,1)*100;
ZBGS365:=(C-MA(C,5))/MA(C,5)*100;
ZBGS366:=(C-MA(C,30))/MA(C,30)*100;
ZBGS367:=COUNT(CROSS(ZBGS365,0),3)>=1 AND ZBGS366>REF(ZBGS366,1) AND MA(C,5)>REF(MA(C,5),1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)< MA(C,30);
ZBGS368:=FILTER(ZBGS367,10);
ZBGS369:=ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.1416;
ZBGS370:=SMA(EMA((MA(C,5)-REF(MA(C,5),1))/REF(MA(C,5),1),3)*100,3,1);
ZBGS371:=EMA((ZBGS370-REF(ZBGS370,1)),3);
ZBGS372:=FILTER(COUNT(CROSS(ZBGS369,30),5)>=1 AND MA(C,5)>REF(MA(C,5),1) AND ZBGS366>REF(ZBGS366,1) AND MA(C,10)>REF(MA(C,10),1)AND ZBGS371>REF(ZBGS371,1) AND ZBGS370>REF(ZBGS370,1),10);
ZBGS373:=100*(C-REF(C,12))/REF(C,12);
ZBGS374:=((H+L+C)/3-MA((H+L+C)/3,88))/(0.015*AVEDEV((H+L+C)/3,88));
ZBGS375:=1.07*DMA(C,ABS((2*C+H+L)/4-MA(C,26))/MA(C,26));
ZBGS376:=MA(ATAN(ZBGS375-REF(ZBGS375,1)),3);
ZBGS377:=IF((C>O OR C< O) AND H>=REF(C,1),ATAN(MA(H,5)*1.02-REF(MA(C,5)*1.02,1)),0);
ZBGS378:=IF((C>O OR C< O) AND H< REF(C,1),-ATAN(REF(MA(C,5)*1.02,1)-MA(H,5)*1.02),0);
ZBGS379:=MA(REF((ZBGS377+ZBGS378),1),26);
雄起:=ZBGS376>ZBGS379 AND ZBGS376>REF(ZBGS376,1);
XGS:=雄起 AND ZBGS374>200 AND ZBGS373>20 AND C>REF(C,1);
买入持股:IF(ZBGS363>=0,A1,DRAWNULL)COLORYELLOW,LINETHICK2;
卖出空仓:IF(ZBGS363< 0 AND ZBGS364< 0,A1,DRAWNULL)COLORGREEN,LINETHICK1;
DRAWTEXT(ZBGS372,LOW*0.98,'↖加仓'),COLORYELLOW;
DRAWTEXT(XGS,L*0.95,'↖牛'),COLORYELLOW,LINETHICK2;
{牛熊加仓选股源码：}
ZBGS366:=(C-MA(C,30))/MA(C,30)*100;
ZBGS369:=ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.1416;
ZBGS370:=SMA(EMA((MA(C,5)-REF(MA(C,5),1))/REF(MA(C,5),1),3)*100,3,1);
ZBGS371:=EMA((ZBGS370-REF(ZBGS370,1)),3);
牛熊加仓选股:FILTER(COUNT(CROSS(ZBGS369,30),5)>=1 AND MA(C,5)>REF(MA(C,5),1) AND ZBGS366>REF(ZBGS366,1) AND MA(C,10)>REF(MA(C,10),1)AND ZBGS371>REF(ZBGS371,1) AND ZBGS370>REF(ZBGS370,1),10);
