大智慧BS主图 改进版！
C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
- a:="[email=LTFunc4@FORLT2]LTFunc4@FORLT2[/email]";
- s1:="[email=LTFunc4@LT_S1]LTFunc4@LT_S1[/email]";
- hs:="[email=LTFunc4@LT_HS]LTFunc4@LT_HS[/email]";
- ls:="[email=LTFunc4@LT_LS]LTFunc4@LT_LS[/email]";
- p1:="[email=LTFunc4@LT_P1]LTFunc4@LT_P1[/email]";
- upp:="[email=LTFunc4@LT_UPP]LTFunc4@LT_UPP[/email]";
- udd:="[email=LTFunc4@LT_UDD]LTFunc4@LT_UDD[/email]";
- d1:=ema(abs("ddx.ddx"),60);
- d2:=max("ddx.ddx"/d1+7.5,7.5);
- d3:=min("ddx.ddx"/d1,10);
- fb:=if(s1=0,hs,ls);
- tr0:=ifs(p1=1,'明日收盘价<'+numtostrn(udd,2)+',出现S点\n','若明日收盘价>'+numtostrn(upp,2)+',出现B点\n');
- tr1:=ifs(s1=1,'明日收盘价<'+numtostrn(ls,2)+',短线卖出机会','若明日收盘价>'+numtostrn(hs,2)+'短线买入机会');
- tr2:=ifs(p1=1,ifs(cross(p1,0),'B点','持股'),ifs(cross(1,p1),'S点','持币'));
- tr3:=ifs(s1=0,'向下,','向上,');
- tr4:='3.能量级别:'+numtostrn(d3,1)+'级';
- bs:='1.BS点:'+tr2+','+tr0+'2.短线:'+tr3+tr1+'\n'+tr4;
- drawflagtext(1,fb,bs);
- STICKLINE(p1=1 and c>=o and o<>0,c,o,d2,0),color5454ff;
- STICKLINE(p1=1 and c>=o and o<>0,c,o,7.5,0),colorblack;
- STICKLINE(p1=1 and c>=o and o<>0,c,c,7.5,0),color5454ff;
- STICKLINE(p1=1 and c>=o and o<>0,o,o,7.5,0),color5454ff;
- STICKLINE(p1=1 and c>=o and o<>0,o,c,7.5,1),color5454ff;
- STICKLINE(p1=1 and c<=o,o,c,7.5,1),color5454ff;
- STICKLINE(p1=1 and c<=o,l,c,0.5,1),color5454ff;
- STICKLINE(p1=1 and c<=o,h,o,0.5,1),color5454ff;
- STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,o,7.5,1),colorffff54;
- STICKLINE((p1<>1 or barscount(c)<3) and c>=o,c,h,0.5,1),colorffff54;
- STICKLINE((p1<>1 or barscount(c)<3) and c>=o,l,o,0.5,1),colorffff54;
- drawbmp(p1=1 and ref(p1,1)=0,l,'buy1.bmp'),align1,valign0;
- drawbmp(p1=0 and ref(p1,1)=1,h,'sell1.bmp'),align1,valign2;
- drawbmp(s1=1 and ref(s1,1)=0 and (p1+ref(p1,1))<>1,l,'bs.bmp'),align1,valign0;
- drawbmp(s1=0 and ref(s1,1)=1 and (p1+ref(p1,1))<>1,h,'ss.bmp'),align1,valign2;
- ma0:ma(c,1),colorblack;
- 操盘线:ma(c,7);
- 生命线:ma(c,21),colorff00ff;
- 二次生命:ma(c,55),colorwhite;
- 牛熊线:ma(c,144),colorgray,linethick2;
- PARTLINE(操盘线,c>=操盘线 and 操盘线>=ref(操盘线,1),RGB(255,0,0),c<操盘线,RGB(0,255,0)),LINETHICK2;
- DRAWTEXTABS(0,10,'所属板块:'+BKNAME),Colorwhite;
- DRAWTEXTREL(0,80,'每股收益:'+NUMTOSTRN(FINANCE2(3),3)+'元'+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'元'+' 市净率:'+NUMTOSTRN((CLOSE / FINANCE2(4)),2)+'元'+' 净资产:'+NUMTOSTRN(FINANCE2(4),2)+'元'),Color00C0FF;
- x1:=(C+L+H)/3;
- bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
- ema8:=ema(c,8);
- DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
- ema8,'∠45°'),colorwhite;
- 压力:MA(REF(HHV(C,30),1),2),LINETHICK2,ColorAFFF00;
- 支撑:MA(REF(LLV(C,30),1),2),LINETHICK2,Coloryellow;
- gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
- 明日阻力:=l+(gj-l)+(c-l);
- 明日支撑:=l+(c-gj);
- 今日阻力:=REF(明日阻力 , 1);
- 今日支撑:=REF(明日支撑 , 1);
- STICKLINE(DISPSTATUS=2 and c>=今日阻力,今日阻力,今日阻力,20,0),Color0000FF;
- STICKLINE(DISPSTATUS=2 and c<今日阻力,今日阻力,今日阻力,20,0),Color00FF00;
- STICKLINE(DISPSTATUS=2 and c>=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF;
- STICKLINE(DISPSTATUS=2 and c<今日支撑,今日支撑,今日支撑,20,0),ColorFF9900;
- DRAWTEXTREL(0,130,'今日支撑：'+NUMTOSTRN(今日支撑 ,2 )),Colorred;
- DRAWTEXTREL(0,170,'今日阻力：'+NUMTOSTRN(今日阻力 ,2 )),ColorGREEN;
- VAR2:=(2*CLOSE+HIGH+LOW)/4;
- VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
- VAR4:=LLV(LOW,5);
- VAR5:=HHV(HIGH,4);
- 散户:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;
- 庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3;
- DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L-0.08,'←吸'),COLORRED;
- DRAWICON(CROSS(散户,庄家) AND 散户<30,L-0.1,1);
指标使用的几点感悟：
1、股价下探支撑线（黄线）后反弹并站稳支撑线，可以在支撑线附近出现笑脸、B点或小红点提示时逢低买入，操盘线变红时加仓；
2、股价上碰压力线要注意风险，此时会两极分化，不上则下！请在操盘线变绿时考虑减仓或清仓！如果连续三天以上站在压力线之上，可以做下波段，高抛一下，在操盘线不变绿的情况下，在回踩操盘线附近时接回，一直持股到操盘线变绿；
3、生命线、二次生命线很重要，是股票运行的重要支撑价位，也可以看做是二次启动位和最低止损位，跌破这两根线的票，应该期待它跌得更彻底，一直跌到黄色支撑线才好；
4、牛熊线之下的股票受到的压力比较大，只有突破了牛熊线的票才有可能迎来美好的春天；
5、开盘竞价在“今日阻力”下方2%以内，或者高于“今日阻力”3%以内的票，当日涨的可能性大于跌的可能性；
6、人是活的，指标是死的，信心是自己给自己的，祝各位投资顺利！
