通达信修改整理的宝塔主副图糸列精品源码无未来

宝塔主图


 
B1A:=REF(C,1);
B2A:=REF(C,2);
SS:=IF(C>REF(C,1) AND REF(C,1)>=REF(C,2),1,IF(C<REF(C,1) AND REF(C,1)<=REF(C,2),-1,IF(C>REF(C,2) AND REF(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=1 OR SM>=1 AND SS=0,B1A,C,3,0),COLORRED;
STICKLINE(SS=-1 OR SM<=-1 AND SS=0,B1A,C,3,0),COLORFFCC66;
STICKLINE(SS=2,B2A,C,3,0),COLORRED;
STICKLINE(SS=-2,B2A,C,3,0),COLORFFCC66;
STICKLINE((SS=-1 OR SS=-2) AND SM>0,B2A,B1A,3,0),COLORRED;
STICKLINE((SS=1 OR SS=2) AND SM<0,B2A,B1A,3,0),COLORFFCC66;
AA:=CLOSE>REF(CLOSE,1) AND REF(CLOSE,1)>REF(CLOSE,2) AND REF(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) AND REF(CLOSE,1)<REF(CLOSE,2) AND REF(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(AA AND CLOSE>REF(OPEN,2),0.99*LOW,1);
DRAWICON(BB AND CLOSE<REF(CLOSE,2),HIGH*1.01,2);
DRAWTEXT(AA AND CLOSE>REF(OPEN,2),LOW*0.98,'三平底'),COLORYELLOW;
DRAWTEXT(BB AND CLOSE<REF(CLOSE,2),HIGH*1.02,'三平顶'),COLOR00FF00;
VAR11:=SMA(AMOUNT,15,1)/5670000;
VAR22:=MA(REF(CLOSE,1),5);
VAR2:=VAR11*CLOSE/VAR22;
B0:=REF(VAR2-O,2);
B1:=REF(VAR2,1);
B2:=REF(VAR2,2);
B3:=REF(VAR2,3);
B4:=REF(VAR2,4);
VAR2MAX:=MAX(MAX(MAX(VAR2,B1),B2),B3);
VAR2MIN:=MIN(MIN(MIN(VAR2,B1),B2),B3);
RS1:=(VAR2=VAR2MAX AND (B1>=B2 OR B1>=B3)) OR (B1=VAR2MAX AND (B2=VAR2MIN OR B3=VAR2MIN) AND VAR2>=B2) OR (B2=VAR2MAX AND B3=VAR2MIN AND VAR2>=B1) OR (B3=VAR2MAX AND VAR2>=B1 AND VAR2>=B2);
RS2:=VAR2=VAR2MAX AND B1=VAR2MIN;
RS3:=(B1=VAR2MAX AND VAR2<B2) OR (B2=VAR2MAX AND B1>B3) OR (B3=VAR2MAX AND B1>B2 AND B2>=B4 AND VAR2<B1);
STICKLINE(RS1,B1,VAR2,2,1),COLORRED;
STICKLINE(RS2,B2,VAR2,2,1),COLORRED;
STICKLINE(RS3,B1,B2,2,1),COLORRED;
GS1:=(VAR2=VAR2MIN AND (B1<B2 OR B1<B3)) OR (B1=VAR2MIN AND (B2=VAR2MAX OR B3=VAR2MAX) AND VAR2<B2) OR (B2=VAR2MIN AND B3=VAR2MAX AND VAR2<B1) OR (B3=VAR2MIN AND VAR2<B1 AND VAR2<B2);
GS2:=B1=VAR2MAX AND VAR2=VAR2MIN;
GS3:=(B1=VAR2MIN AND VAR2>=B2) OR (B2=VAR2MIN AND B1<=B3) OR (B3=VAR2MIN AND B1<=B2 AND B2<B4 AND VAR2>=B1);
STICKLINE(GS1,B1,VAR2,2,0),COLORGREEN;
STICKLINE(GS2,B2,VAR2,2,0),COLORGREEN;
STICKLINE(GS3,B1,B2,2,0),COLORGREEN;
VAR1:=AMOUNT;
VAR2A:=SMA(VAR1,10,1);
VAR3:=REF(VAR2A,1);
STICKLINE(VAR2A>VAR3,VAR2A,VAR3,3,0),COLORRED;
STICKLINE(VAR2A<VAR3,VAR2A,VAR3,3,0),COLORGREEN;



来函数检测结果如下
该公式没有未来函数


定制、编写公式指标请联系QQ或微信同号:88652583

B1A赋值:1日前的收盘价
B2A赋值:2日前的收盘价
SS赋值:如果收盘价>1日前的收盘价ANDREF(收盘价,1)>=2日前的收盘价,返回1,否则返回如果收盘价<1日前的收盘价ANDREF(收盘价,1)<=2日前的收盘价,返回-1,否则返回如果收盘价>2日前的收盘价ANDREF(收盘价,2)>1日前的收盘价,返回2,否则返回如果收盘价<2日前的收盘价ANDREF(收盘价,2)<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>=1ANDSS=0时,在B1A和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件SS=-1ORSM<=-1ANDSS=0时,在B1A和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFCC66
当满足条件SS=2时,在B2A和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件SS=-2时,在B2A和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFCC66
当满足条件(SS=-1ORSS=-2)ANDSM>0时,在B2A和B1A位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件(SS=1ORSS=2)ANDSM<0时,在B2A和B1A位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFCC66
AA赋值:收盘价>1日前的收盘价 AND 1日前的收盘价>2日前的收盘价 AND 1日前的收盘价<3日前的收盘价 AND 如果3日前的收盘价<4日前的收盘价,返回1,否则返回如果4日前的收盘价<5日前的收盘价,返回1日前的收盘价<4日前的收盘价OR(2日前的收盘价<4日前的收盘价ANDREF(收盘价,3)>=5日前的收盘价),否则返回如果5日前的收盘价<6日前的收盘价,返回1,否则返回6日前的收盘价BB赋值:收盘价<1日前的收盘价 AND 1日前的收盘价<2日前的收盘价 AND 1日前的收盘价>3日前的收盘价 AND 如果3日前的收盘价>4日前的收盘价,返回1,否则返回如果4日前的收盘价>5日前的收盘价,返回1日前的收盘价>4日前的收盘价OR(2日前的收盘价>4日前的收盘价ANDREF(收盘价,3)<=5日前的收盘价),否则返回如果5日前的收盘价>6日前的收盘价,返回1,否则返回6日前的收盘价>RE
当满足条件AAANDCLOSE>2日前的开盘价时,在0.99*最低价位置画1号图标
当满足条件BBANDCLOSE<2日前的收盘价时,在最高价*1.01位置画2号图标
当满足条件AAANDCLOSE>2日前的开盘价时,在最低价*0.98位置书写文字,画黄色
当满足条件BBANDCLOSE<2日前的收盘价时,在最高价*1.02位置书写文字,COLOR00FF00
VAR11赋值:成交额(元)的15日[1日权重]移动平均/5670000
VAR22赋值:1日前的收盘价的5日简单移动平均
VAR2赋值:VAR11*收盘价/VAR22
B0赋值:2日前的VAR2-开盘价
B1赋值:1日前的VAR2
B2赋值:2日前的VAR2
B3赋值:3日前的VAR2
B4赋值:4日前的VAR2
VAR2MAX赋值:VAR2和B1的较大值和B2的较大值和B3的较大值
VAR2MIN赋值:VAR2和B1的较小值和B2的较小值和B3的较小值
RS1赋值:(VAR2=VAR2MAX AND (B1>=B2 OR B1>=B3)) OR (B1=VAR2MAX AND (B2=VAR2MIN OR B3=VAR2MIN) AND VAR2>=B2) OR (B2=VAR2MAX AND B3=VAR2MIN AND VAR2>=B1) OR (B3=VAR2MAX AND VAR2>=B1 AND VAR2>=B2)
RS2赋值:VAR2=VAR2MAX AND B1=VAR2MIN
RS3赋值:(B1=VAR2MAX AND VAR2B3) OR (B3=VAR2MAX AND B1>B2 AND B2>=B4 AND VAR2当满足条件RS1时,在B1和VAR2位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色
当满足条件RS2时,在B2和VAR2位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色
当满足条件RS3时,在B1和B2位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色
GS1赋值:(VAR2=VAR2MIN AND (B1GS2赋值:B1=VAR2MAX AND VAR2=VAR2MIN
GS3赋值:(B1=VAR2MIN AND VAR2>=B2) OR (B2=VAR2MIN AND B1<=B3) OR (B3=VAR2MIN AND B1<=B2 AND B2=B1)
当满足条件GS1时,在B1和VAR2位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件GS2时,在B2和VAR2位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件GS3时,在B1和B2位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
VAR1赋值:成交额(元)
VAR2A赋值:VAR1的10日[1日权重]移动平均
VAR3赋值:1日前的VAR2A
当满足条件VAR2A>VAR3时,在VAR2A和VAR3位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件VAR2A
定制、找人做指标公式联系我们
  • QQ:88652583
  • 邮箱:88652583@qq.com
  • 工作时间:7:30-21:00
  • 微信:88652583或扫描如下二维码
指标公式网微信联系方式
月度排行
季度排行
半年排行


指标安装下载帮助  |   热门标签  | 联系我们  |  股朋指标网  |  指标网   |  指标公式网  |  加入收藏   

@2005-2023 粤ICP备2023063687号-2 股朋指标公式网别名指标公式网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:股朋指标公式网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图