说明
图中粉线为平均成本线,白线为全部筹码100%都获利的价格线,黄线为全部筹码的95%获利的价格线

本指标叠加了大智慧超赢BS指标和黄金阶梯指标,以及几条重要的价格线

用法

买进的条件同时要满足股价高于平均成本线,给出B的买入信号,黄金阶梯为红这三个条件,就可能产生短线黑码

长线大牛股则必须保证白线不断向上,而股价基本运行于平均成本线之上

提示:
选股前先看大势,指数没有给出买进信号之前切记不要盲目操作

指标源码,注意参数N设定为缺省30,最小1,最大240
以下为指标源码

高1:=REF(HHV(H,120),3);
低1:=REF(LLV(L,120),3);H1:=高1-(高1-低1)*0.191; 
H2:=高1-(高1-低1)*0.382; 
H3:=高1-(高1-低1)*0.5; 
H4:=高1-(高1-低1)*0.618; 
H5:=高1-(高1-低1)*0.809;

突破:=REF(EMA(C,14),1);
A1X:=(EMA(C,10)-突破)/突破*100;

基准:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1));
{
stickline(A1X>=0,突破,突破,10,0),coloryellow;
stickline(A1X<0,突破,ref(突破,1),0,-1000);
}
STICKLINE(A1X>=0,基准,突破,10,0),COLOR000099;
STICKLINE(A1X<0,基准,突破,10,0),COLOR00CC66;
a:="LTFunc6@FORLT2"(N);  {计算BS点}
s1:="LTFunc6@LT_S1"(N);  {s1=0,向下; s1=1,向上} 
hs:="LTFunc6@LT_HS"(N);  {短线买入机会}
ls:="LTFunc6@LT_LS"(N);  {短线卖出机会}
p1:="LTFunc6@LT_P1"(N);  {p1=1,显示BS,p1上穿0线,B点 ; p1下穿1线,S点}
upp:="LTFunc6@LT_UPP"(N);{明日B点预测} 
udd:="LTFunc6@LT_UDD"(N);{明日S点预测}
//不用修改
有效a:=SETLBOUND(a,1);
有效s1:=SETLBOUND(s1,1);
有效hs:=SETLBOUND(hs,1);
有效ls:=SETLBOUND(ls,1);
有效p1:=SETLBOUND(p1,1);
有效upp:=SETLBOUND(upp,1);
有效udd:=SETLBOUND(udd,1);
//定义有效下标

d1:=EMA(ABS("ddx.ddx"),60);  {ddx绝对值60日指数平滑移动平均}
d2:=MAX("ddx.ddx"/d1+7.5,7.5); 
d3:=MIN("ddx.ddx"/d1,10);    {能量级别:当日ddx与60日平均值的比值,最高10.0}
fb:=IF(s1=0,hs,ls);
//定义序列变量fb
year1:=YEAR;
month1:=MONTH;
day1:=DAY;

//定义序列变量


有效1:=SETLBOUND(d1,1);
有效2:=SETLBOUND(d2,1);
有效3:=SETLBOUND(d3,1);
有效4:=SETLBOUND(fb,1);
yxyear:=SETLBOUND(year1,1);
yxmonth:=SETLBOUND(month1,1);
yxday:=SETLBOUND(day1,1);
//定义存在的序列变量的有效下标


variable:tr0[DATACOUNT]='',tr1[DATACOUNT]='',tr2[DATACOUNT]='', 
tr3[DATACOUNT]='',tr4[DATACOUNT]='',bs[DATACOUNT]='',yearstr[DATACOUNT]='',
monthstr[DATACOUNT]='',daystr[DATACOUNT]='',datestr[DATACOUNT]='';

for s =1 to DATACOUNT do begin 
//循环开始
//{hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd};
IF p1[s]=1 then 
tr0[s]:='明日收盘价<'+NUMTOSTR(udd[s],2)+',出现S点\n';

else

tr0[s]:='若明日收盘价>'+NUMTOSTR(upp[s],2)+',出现B点\n';

IF s1[s]=1 then

tr1[s]:='明日收盘价<'+NUMTOSTR(ls[s],2)+',短线卖出机会';
    else
tr1[s]:='若明日收盘价>'+NUMTOSTR(hs[s],2)+'短线买入机会';
IF p1[s]=1 then begin

    IF (p1[s-1]<0 and p1[s]>0)  then
//cond只能是单值变量不能是序列变量,cross的参数是序列变量,不能用
  //测试语句,IF p1[s]>0 then
    tr2[s]:='B点';
   else
    tr2[s]:='持股';
end;

    else begin
   
    IF (1<p1[s-1] and 1>p1[s]) then

    tr2[s]:='S点';

else
    tr2[s]:='持币';
end;

//tr2改编结束
IF s1[s]=0 then
    tr3[s]:='向下';
    else
    tr3[s]:='向上';
//tr3改编结束

tr4[s]:='3.能量级别:'+NUMTOSTR(d3[s],1)+'级';
//tr4改编结束

yearstr[s]:=NUMTOSTR(year1[s],0);
monthstr[s]:=NUMTOSTR(month1[s],0);
daystr[s]:=NUMTOSTR(day1[s],0);
datestr[s]:=yearstr[s]+'年'+monthstr[s]+'月'+daystr[s]+'日';

bs[s]:=datestr[s]+'买卖点决策系统提示\n'+'1.BS点:'+tr2[s]+','+tr0[s]+'2.短线:'+tr3[s]+tr1[s]+'\n'+tr4[s];
//bs[s]:=datestr[s]+'买卖点决策系统提示\n'+'1.BS点:'+tr2[s]+','+tr0[s]+'2.短线:'+tr3[s]+tr1[s]+tr4[s];
//改编完毕,datestr已改为字符串数组

end;
//drawflagtext(1,fb,bs);
STICKLINE(p1=1 and CLOSE>=OPEN and OPEN<>0,CLOSE,OPEN,d2,0),color5454ff;
STICKLINE(p1=1 and CLOSE>=OPEN and OPEN<>0,CLOSE,OPEN,7.5,0),colorblack;
STICKLINE(p1=1 and CLOSE>=OPEN and OPEN<>0,CLOSE,CLOSE,7.5,0),color5454ff;
STICKLINE(p1=1 and CLOSE>=OPEN and OPEN<>0,OPEN,OPEN,7.5,0),color5454ff;

STICKLINE(p1=1 and CLOSE>=OPEN and OPEN<>0,OPEN,CLOSE,7.5,1),color5454ff;
STICKLINE(p1=1 and CLOSE<=OPEN,OPEN,CLOSE,7.5,1),color5454ff;
STICKLINE(p1=1 and CLOSE<=OPEN,LOW,CLOSE,0.5,1),color5454ff;
STICKLINE(p1=1 and CLOSE<=OPEN,HIGH,OPEN,0.5,1),color5454ff;
STICKLINE((p1<>1 or BARSCOUNT(c)<3) and CLOSE>=OPEN,CLOSE,OPEN,7.5,1),colorffff54;
STICKLINE((p1<>1 or BARSCOUNT(c)<3) and CLOSE>=OPEN,CLOSE,HIGH,0.5,1),colorffff54;
STICKLINE((p1<>1 or BARSCOUNT(c)<3) and CLOSE>=OPEN,LOW,OPEN,0.5,1),colorffff54;
//画k线搞定

//DRAWTEXT(BARPOS=SYSPARAM(1),SYSPARAM(4),bs[SYSPARAM(1)]),COLORwhite;
//弹出浮动窗口提示信息
drawtextex(1,1,0,0,bs[SYSPARAM(1)]);

DRAWICON(p1=1 and REF(p1,1)=0,LOW,'buy1'),align1;
DRAWICON(p1=0 and REF(p1,1)=1,HIGH,'sell1'),align2;

DRAWICON(s1=1 and REF(s1,1)=0 and (p1+REF(p1,1))<>1,LOW,'bs'),align1;
DRAWICON(s1=0 and REF(s1,1)=1 and (p1+REF(p1,1))<>1,HIGH,'ss'),align2;
//绘bs图标搞定

K1:COST(100),COLORWHITE;
K2:COST(95),COLORYELLOW;
K3:COST(50),COLORMAGENTA,linethick3;