神奇指标网

通达信宝塔线最准确指标源码

浏览 359次浏览
标签: 通达信
来源:神奇指标网 编辑:神奇指标网 发布日期:2023-06-15

  

   所谓宝塔线是以白(或红)黑(或绿)的实体棒线来划分股价的涨跌,及研判其涨跌趋势的一种线路,也是将多空之间拼杀的过程与力量的转变表现在图中,并且显示适当的买进时与卖出时机。它一般只以每日收盘价做为唯一的取值参数,过滤了K线图中很多庄家的骗线。从某种意义上讲,只要股价趋势是上涨的,宝塔线会一直保持红的实体向上,特别是在跟踪强势股的走势中屡试不爽。



       相关简介: 通达信宝塔线最准确指标源码                                


       通达信宝塔线最准确指标源码概况:


  指标类别:通达信指标公式


  授权方式:免费版


  指标评级:★★★★★


  指标分类:策略


  画线方法:副图



通达信宝塔线最准确指标源码:


    M:=3;
    MA5:MA(C,5),COLORYELLOW;
    MA10:MA(C,10),COLORFF00FF;
    MA15:MA(C,15),COLOR00FF00;
    MA30:MA(C,30),COLORFFCCCC;
    B1:=REF(C,1);B2:=REF(C,2);
    SS:=IF(C>REF(C,1)ANDREF(C,1)>=REF(C,2),1,IF(C<REF(C,1)AND
    REF(C,1)<=REF(C,2),-1,IF(C>REF(C,2)ANDREF(C,2)>REF(C,1),2,IF(C<REF(C,2)AND
    REF(C,2)<REF(C,1),-2,0))));
    SM:=IF(REF(SS,1)!=0,REF(SS,1),IF(REF(SS,2)!=0,REF(SS,2),IF(REF(SS,3)!=0,REF(SS,3),IF(REF(SS,5)!=0,
    REF(SS,5),IF(REF(SS,6)!=0,REF(SS,6),IF(REF(SS,7)!=0,REF(SS,7),0))))));
    STICKLINE(SS=1ORSM>=1ANDSS=0,B1,C,3,0),COLORRED;
    STICKLINE(SS=-1ORSM<=-1ANDSS=0,B1,C,3,0),COLORFFCC66;
    STICKLINE(SS=2,B2,C,3,0),COLORRED;
    STICKLINE(SS=-2,B2,C,3,0),COLORFFCC66;
    STICKLINE((SS=-1ORSS=-2)ANDSM>0,B2,B1,3,0),COLORRED;
    STICKLINE((SS=1ORSS=2)ANDSM<0,B2,B1,3,0),COLORFFCC66;
    AA:=CLOSE>REF(CLOSE,1)ANDREF(CLOSE,1)>REF(CLOSE,2)ANDREF(CLOSE,1)<REF(CLOSE,3)
    AND
    IF(REF(CLOSE,3)<REF(CLOSE,4),1,IF(REF(CLOSE,4)<REF(CLOSE,5),REF(CLOSE,1)<REF(CLOSE,4)
    OR(REF(CLOSE,2)<REF(CLOSE,4)AND
    REF(CLOSE,3)>=REF(CLOSE,5)),IF(REF(CLOSE,5)<REF(CLOSE,6),1,REF(CLOSE,6)<REF(CLOSE,7))));
    BB:=CLOSE<REF(CLOSE,1)ANDREF(CLOSE,1)<REF(CLOSE,2)ANDREF(CLOSE,1)>REF(CLOSE,3)
    AND
    IF(REF(CLOSE,3)>REF(CLOSE,4),1,IF(REF(CLOSE,4)>REF(CLOSE,5),REF(CLOSE,1)>REF(CLOSE,4)
    OR(REF(CLOSE,2)>REF(CLOSE,4)AND
    REF(CLOSE,3)<=REF(CLOSE,5)),IF(REF(CLOSE,5)>REF(CLOSE,6),1,REF(CLOSE,6)>REF(CLOSE,7))));
    DRAWICON(AAANDCLOSE>REF(OPEN,2),0.99*LOW,1);
    DRAWICON(BBANDCLOSE<REF(CLOSE,2),HIGH*1.01,2);
    DRAWTEXT(AAANDCLOSE>REF(OPEN,2),LOW*0.98,'三平底翻红'),COLORYELLOW;
    DRAWTEXT(BBANDCLOSE<REF(CLOSE,2),HIGH*1.02,'三平顶翻绿'),COLOR00FF00;
    BOLL:MA(CLOSE,M);
    UB:BOLL+2*STD(CLOSE,M),LINETHICK2;
    LB:BOLL-2*STD(CLOSE,M),LINETHICK2;
    N:=0;P1:=5;P2:=20;P3:=120;
    VAR1:=CLOSE>REF(CLOSE,1)ANDCLOSE>REF(CLOSE,2);
    VAR2:=REF(VAR1,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR3:=REF(VAR2,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VAR4:=REF(VAR3,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR5:=REF(VAR4,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VAR6:=REF(VAR5,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR7:=REF(VAR6,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VAR8:=REF(VAR7,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR9:=REF(VAR8,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VARA:=REF(VAR9,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VARB:=REF(VARA,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VARC:=REF(VARB,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),2.6,0),COLORRED;
    VARD:=CLOSE<REF(CLOSE,1)ANDCLOSE<REF(CLOSE,2);
    VARE:=REF(VARD,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VARF:=REF(VARE,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR10:=REF(VARF,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VAR11:=REF(VAR10,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR12:=REF(VAR11,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VAR13:=REF(VAR12,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR14:=REF(VAR13,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VAR15:=REF(VAR14,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR16:=REF(VAR15,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    VAR17:=REF(VAR16,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2);
    VAR18:=REF(VAR17,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2);
    STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),2.6,0),COLORGREEN;
    VAR19:=REF(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,1)ANDVAR1;
    STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2.6,0),COLORYELLOW;
    VAR1A:=REF(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,1)ANDVARD;
    STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),4,0),COLORRED;
    {波峰和波谷}
    TY:=C;
    A1:=REF(TY,10)=HHV(TY,2*10+1);
    VB1:=FILTER(A1,10);
    C1:=BACKSET(VB1,10+1);
    HD:=FILTER(C1,10);
    A2:=REF(TY,10)=LLV(TY,2*10+1);
    VB2:=FILTER(A2,10);
    C2:=BACKSET(VB2,10+1);
    LD:=FILTER(C2,10);
    A:=REF(C,BARSLAST(HD));
    B:=REF(C,BARSLAST(LD));
    T1:=BARSLAST(HD)<BARSLAST(LD)ANDNOT(HD);
    T2:=BARSLAST(HD)>BARSLAST(LD)ANDNOT(LD);FR:=IF(T1,A,A),COLOR00FFFF;GR:=IF(T2,B,B),COLOR00FF00;
    波峰:IF(N>0,FR,DRAWNULL),COLOR33F7AF;
    波谷:IF(N>0,GR,DRAWNULL),COLORFF9090;
    AM:IF(N=2,MA(C,P1),DRAWNULL),COLORWHITE;
    BM:IF(N=2,MA(C,P2),DRAWNULL),COLORYELLOW;
    CM:IF(N=2,MA(C,P3),DRAWNULL),COLOR0000FF;




[源码注释]通达信宝塔线最准确指标翻译结果



    M赋值:3
    输出MA5:收盘价的5日简单移动平均,画黄色
    输出MA10:收盘价的10日简单移动平均,COLORFF00FF
    输出MA15:收盘价的15日简单移动平均,COLOR00FF00
    输出MA30:收盘价的30日简单移动平均,COLORFFCCCC
    B1赋值:1日前的收盘价
    B2赋值:2日前的收盘价
    SS赋值:如果收盘价>,返回?,否则返回?
    1日前的收盘价ANDREF(收盘价,1)>
    =2日前的收盘价,1,如果收盘价<,返回?,否则返回?
    1日前的收盘价AND1日前的收盘价<
    =2日前的收盘价,-1,如果收盘价>,返回?,否则返回?
    2日前的收盘价ANDREF(收盘价,2)>
    1日前的收盘价,2,如果收盘价<,返回?,否则返回?
    2日前的收盘价AND2日前的收盘价<
    1日前的收盘价,-2,0))))
    SM赋值:如果1日前的SS不等于0,返回1日前的SS,否则返回如果2日前的SS不等于0,返回2日前的SS,否则返回如果3日前的SS不等于0,返回3日前的SS,否则返回如果5日前的SS不等于0,返回5日前的SS,否则返回如果6日前的SS不等于0,返回6日前的SS,否则返回如果7日前的SS不等于0,返回7日前的SS,否则返回0
    当满足条件SS=1ORSM>时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.
    =1ANDSS=0,B1,收盘价,3,0),画红色
    当满足条件SS=-1ORSM<时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.
    =-1ANDSS=0,B1,收盘价,3,0),COLORFFCC66
    当满足条件SS=2时,在B2和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
    当满足条件SS=-2时,在B2和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFCC66
    当满足条件(SS=-1ORSS=-2)ANDSM>时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.
    0,B2,B1,3,0),画红色
    当满足条件(SS=1ORSS=2)ANDSM<时,在?和?位置之间画柱状线,宽度为?,?不为0则画空心柱.
    0,B2,B1,3,0),COLORFFCC66
    AA赋值:收盘价>
    1日前的收盘价ANDREF(收盘价,1)>
    2日前的收盘价ANDREF(收盘价,1)<
    3日前的收盘价AND如果3日前的收盘价<,返回?,否则返回?
    4日前的收盘价,1,如果4日前的收盘价<,返回?,否则返回?
    5日前的收盘价,1日前的收盘价<
    4日前的收盘价OR(2日前的收盘价<
    4日前的收盘价AND3日前的收盘价>
    =5日前的收盘价),如果5日前的收盘价<,返回?,否则返回?
    6日前的收盘价,1,6日前的收盘价<
    7日前的收盘价)))
    BB赋值:收盘价<
    1日前的收盘价ANDREF(收盘价,1)<
    2日前的收盘价ANDREF(收盘价,1)>
    3日前的收盘价AND如果3日前的收盘价>,返回?,否则返回?
    4日前的收盘价,1,如果4日前的收盘价>,返回?,否则返回?
    5日前的收盘价,1日前的收盘价>
    4日前的收盘价OR(2日前的收盘价>
    4日前的收盘价AND3日前的收盘价<
    =5日前的收盘价),如果5日前的收盘价>,返回?,否则返回?
    6日前的收盘价,1,6日前的收盘价>
    7日前的收盘价)))
    当满足条件AAANDCLOSE>时,在?位置画?号图标
    2日前的开盘价,0.99*最低价,1)
    当满足条件BBANDCLOSE<时,在?位置画?号图标
    2日前的收盘价,最高价*1.01,2)
    当满足条件AAANDCLOSE>时,在?位置书写文字
    2日前的开盘价,最低价*0.98,'三平底翻红'),画黄色
    当满足条件BBANDCLOSE<时,在?位置书写文字
    2日前的收盘价,最高价*1.02,'三平顶翻绿'),COLOR00FF00
    输出BOLL:收盘价的M日简单移动平均
    输出UB:BOLL+2*收盘价的M日估算标准差,线宽为2
    输出LB:BOLL-2*收盘价的M日估算标准差,线宽为2
    N赋值:0
    P1赋值:5
    P2赋值:20
    P3赋值:120
    VAR1赋值:收盘价>1日前的收盘价ANDCLOSE>2日前的收盘价
    VAR2赋值:1日前的VAR1ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR3赋值:1日前的VAR2ANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VAR4赋值:1日前的VAR3ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR5赋值:1日前的VAR4ANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VAR6赋值:1日前的VAR5ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR7赋值:1日前的VAR6ANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VAR8赋值:1日前的VAR7ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR9赋值:1日前的VAR8ANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VARA赋值:1日前的VAR9ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VARB赋值:1日前的VARAANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VARC赋值:1日前的VARBANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    当满足条件VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC时,在收盘价和1日前的收盘价位置之间画柱状线,宽度为2.6,0不为0则画空心柱.,画红色
    VARD赋值:收盘价<1日前的收盘价ANDCLOSE<2日前的收盘价
    VARE赋值:1日前的VARDANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VARF赋值:1日前的VAREANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR10赋值:1日前的VARFANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VAR11赋值:1日前的VAR10ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR12赋值:1日前的VAR11ANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VAR13赋值:1日前的VAR12ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR14赋值:1日前的VAR13ANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VAR15赋值:1日前的VAR14ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR16赋值:1日前的VAR15ANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    VAR17赋值:1日前的VAR16ANDCLOSE<=1日前的收盘价ANDCLOSE>=2日前的收盘价
    VAR18赋值:1日前的VAR17ANDCLOSE>=1日前的收盘价ANDCLOSE<=2日前的收盘价
    当满足条件VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18时,在收盘价和1日前的收盘价位置之间画柱状线,宽度为2.6,0不为0则画空心柱.,画绿色
    VAR19赋值:1日前的VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18ANDVAR1
    当满足条件VAR19时,在1日前的收盘价和2日前的收盘价位置之间画柱状线,宽度为2.6,0不为0则画空心柱.,画黄色
    VAR1A赋值:1日前的VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARCANDVARD
    当满足条件VAR1A时,在1日前的收盘价和2日前的收盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,画红色
    TY赋值:收盘价
    A1赋值:10日前的TY=2*10+1日内TY的最高值
    VB1赋值:A1的10日过滤
    C1赋值:若VB1则将最近10+1周期置为1
    HD赋值:C1的10日过滤
    A2赋值:10日前的TY=2*10+1日内TY的最低值
    VB2赋值:A2的10日过滤
    C2赋值:若VB2则将最近10+1周期置为1
    LD赋值:C2的10日过滤
    A赋值:上次HD距今天数日前的收盘价
    B赋值:上次LD距今天数日前的收盘价
    T1赋值:上次HD距今天数<上次LD距今天数ANDNOT(HD)
    T2赋值:上次HD距今天数>上次LD距今天数ANDNOT(LD)
    FR赋值:如果T1,返回A,否则返回A,COLOR00FFFF
    GR赋值:如果T2,返回B,否则返回B,COLOR00FF00
    输出波峰:如果N>0,返回FR,否则返回无效数,COLOR33F7AF
    输出波谷:如果N>0,返回GR,否则返回无效数,COLORFF9090
    输出AM:如果N=2,返回收盘价的P1日简单移动平均,否则返回无效数,画白色
    输出BM:如果N=2,返回收盘价的P2日简单移动平均,否则返回无效数,画黄色
    输出CM:如果N=2,返回收盘价的P3日简单移动平均,否则返回无效数,COLOR0000FF



今天的分享就到这里啦,大家感觉怎么样呢?有什么意见建议的朋友欢迎在下方评论区写下你的看法,我们共同学习进步,还请大家多多关注支持哦!!

神奇指标网(https://www.shenqizhibiao.com/)所有指标公式及文章来源于网络仅供学习研究

神奇指标收藏 收藏
神奇指标分享 分享

网友评论

已有0人评论

清除 发表评论