{n:2008,0,99999,1}
资产总额1:=FINANCE2(14)/10;
负债总额1:=FINANCE2(20)/10;
流动负债1:=FINANCE2(18)/10;
股东权益1:=FINANCE2(21)/10;
流动资产1:=FINANCE2(15)/10;
流动资金本1:=流动资产1-流动负债1;
每股收益1:=FINANCE2(3);
每股未分配1:=FINANCE2(8);

由于大智慧提供的BS系统引用了能量概念且源码较少，很适合补充开发一些新功能，因此我认为该系统还有进一步开发的潜力可挖。下图是我自己根据需要添加一些源码产生的新效果，大家按照这个思路可去试一试。
注意看提示内容变化
如果有兴趣请把下面这段源码贴上看看。
ye:=(high+low+close)/3;
ye1:=if(high=low,1,HIGH-Max(OPEN,CLOSE));
ye2:=if(high=low,1,max(CLOSE,OPE

ab1:=EMA(C,2)-EMA(C,89);
ab2:=EMA(ab1,30);
ab3:=2*(ab1-ab2)*9.8;
ab4:=POW(ab3,3)*0.1+POW(ab3,2);
股市轨迹:IF(AB3>0.015,AB4,0.28)/28,LINETHICK2,COLORRED;
STICKLINE(股市轨迹>REF(股市轨迹,1),0,股市轨迹,0.5,0);

{绩优高送}
input:N(2008,0,999999,1);
每股收益:PFFININ(1001 ,N ,1231 ),linethick0;
净资产收益率:PFFININ(1002 ,N ,1231 ),linethick0;
每股公积:PFFININ(1005 ,N ,1231 ),linethick0;
每股未分配利润:PFFININ(1006 ,N ,1231 ),linethick0;
高比例分红可能:=每股未分配利润

该图可波段操作，买点提示。x1:=ema(c,20);
DD:(x1-ref(x1,1))/ref(x1,1);
AA:=atan((DD-REF(DD,1)))*3.1416*10;
STICKLINE(AA>0 and DD>ref(DD,1), DD,REF(DD,1),8,0),colorred;
STICKLINE(AA<0 and DD<ref(DD,1), DD,REF(DD,1),8,1),COLORgreen;

源码如下：
variable:eye=0;
TDM:="大引1.TDM#day";
TDC:="大引1.TDS#day";
DDM:="大引1.DDM#day";
DDC:="大引1.DDS#day";
ZDM:="大引1.ZDM#day";
ZDC:="大引1.ZDS#day";
XDM:=

VAR2:=((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55)));
VAR3:=SMA(VAR2,7,1);
VAR4:=REF(VAR3,1);
VAR5:=SMA(VAR3,10,1);
VAR6:=((HHV(HIGH,55) - CLOSE) / (HHV(HIGH,55) - LLV(LOW,55)));
VAR7:=MA(VAR6,5);
VAR8:=(LLV(LOW

神奇主图用法：
1、操作线与支撑线粘合在一起（等值）向下，坚决持币观望。待操作线突然上升，则是较好底部买点。
2、操作线与拉升线粘合在一起（等值）向上，坚决持股不卖。待操作线突然下降，则是较好顶部卖点。
3、操作线上升而拉升线下降，有可能出现诱多或洗盘；操作线下降而拉升线上升，表明将有大行情。出现这种情况时以观望为主，然后根据其他指示果断操作。股价突破庄压，同时，庄压与操作线同时向上，为快速行情，可大胆持股。
4、如果股价突破庄压后，庄压线下降，须提防诱多，

指标转自高人，把握变盘时间，更有助短线买卖。
Var1:=BARSCOUNT(CLOSE)*3.142/60;
A2: SIN(Var1*8)*100;
A3: COS(Var1*8)*100;
A33: COS(Var1*2)*100;
A333: COS(Var1*4)*100;

input:N(34,1,100),M(3,1,100);
A1:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
AAA:=EMA(A1,5);
STICKLINE(A1>AAA,A1,AAA,7,0),color0000ff;
STICKLINE(A1<AAA,A1,AAA,7,0),C

快线:EMA(EMA(EMA(EMA(CLOSE,3),3),3),3),LINETHICK2,COLORRED;
慢线:EMA(REF(快线,1),3),LINETHICK2,COLOR00FFFF;
总趋势:EMA(EMA(EMA(EMA(EMA(CLOSE,65),3),3),3),3),LINETHICK2,COLORBLUE;
VAR84:= (CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR85:= 100-AB

电脑波专业版，主图源码，自个的金点收藏，一直在用感觉很不错，拿出来和大家分了, 跟着提示走，告别了亏损，迎来了红运
VVar2:=(3*CLOSE+LOW+OPEN+HIGH)/6;
Var3:=(20*Var2+19*REF(Var2,1)+18*REF(Var2,2)+17*REF(Var2,3)+16*REF(Var2,4)+15*REF(Var2,5)+14*REF(Var2,6)+13*REF(Var2,7)+12*REF(Var2,8)+11*REF(Var2,9)+1

用法：红线脱离绿线买入，而且红线角度越大越好,这个指标用来判断何时抄底更好用一些，在下跌过程中，即使股价有反弹，但是并没有出现红线，还是不能买
A1:=EMA(CLOSE,7)-EMA(CLOSE,21);
B1:=EMA((0.668*REF(A1,1)+0.333*A1),1);
短多:IF(A1>=B1,A1,B1),LINETHICK2,COLORred;
短空:IF(B1-A1,B1,A1),LINETHICK1,COLORGREEN;

{稳赚10%主图 没有未来。。。。。}
快线:EMA(EMA(EMA(EMA(CLOSE,3),3),3),3),LINETHICK2,COLORred;
慢线:EMA(REF(快线,1),3),LINETHICK2,COLOR00FFFF;
总趋势:EMA(EMA(EMA(EMA(EMA(CLOSE,65),3),3),3),3),LINETHICK2,colorblue;
VAR84:= (CLOSE-MA(CLOSE,13))/MA(CLOSE,13

INPUT:N(21,1,999),P1(60,0,100);
VAR0:=MIN(COUNT(ORDER(2),0),P1);
A:=EMA((BIGORDER(1) - BIGORDER(2)) * VOL/CAPITAL * 100,VAR0) * VAR0;
B:EMA(MA(A,3),55);
牛市:COUNT(MA(B,5)>REF(MA(B,5),1),3)>=3;
AB:牛市 AND LLV(L,N)=L AND NO

{K线指标:K-S时价}
MA1:MA(CLOSE,2),Color003C7D;
MA2:MA(CLOSE,4),ColorFF00FF;
MA3:MA(CLOSE,7),Color009D7D;
MA4:MA(CLOSE,28),circledot,Colorwhite;
MA9:MA(CLOSE,49),crossdot,Color00FFFF;
MA6:MA(CLOSE,84),Color00FF00;
MA7:

主图源码：短线无敌
STICKLINE(c>0,h,l,5.5,0),color000000;
急速超跌:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<-14;
VAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));
VAR2:=(REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF

辉煌之星
每日DDx:="ddx.ddx";
短期:MA(每日DDX,5);
中期:MA(每日DDX,10);
FILLRGN(短期,中期,短期>中期,RGB(255,0,0),短期<中期,RGB(0,0,255));

INPUT:N(90,30,220,1),DZF(5,-3,12,1),XZF(-2,-5,5,1);
ISST:=STRFIND(STKNAME,UPPERSTR('*S'),2);
ISS:=STRFIND(STKNAME,UPPERSTR('S'),1);
TB:=(ISST=0) and DYNAINFO(8)>0 and DYNAINFO(14)<DZF/100 and DYNAINFO(14)>XZF/100 and (ISS=0);

鲍鱼密码源码如下：
drawtextabs(0,2,'【风暴出品】'),COLORRED;
VAR1:=c;
VAR2:=MA(CLOSE,24) + 1*STD(CLOSE,24);
FILLRGN(VAR1,VAR2,VAR1>VAR2,(RGB(255,0,0)));
快鲍:VAR1,ColorFFFFFF;
慢鲍:VAR2,COLORYELLOW;
FILLRGN(VAR2,VAR1,VAR2>VAR1