活筹宝塔指标公式源码[通达信公式]

相关标签: 宝塔附图指标源码 、 通达信活筹指数指标 、 大盘活筹 指标 、 吸筹洗盘出货指标公式 、 主力吸筹指标公式 、 横盘吸筹选股指标公式 、 主力吸筹指标选股公式 、 锁筹副图指标公式 、 长线吸筹指标公式 、

源码：
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;DRAWTEXT_FIX(C>O,0.01,0.9,0,'WWW.CXH99.COM'),COLORRED; DRAWTEXT_FIX(C>O,1,1,0,'<span style="display:none;"><a data-cke-saved-href="http://www.cxh99.com" href="http://www.cxh99.com">程序化交易模型</a></span>'),COLORRED;
点击复制上述代码粘贴到到公式管理器

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】

源码解析:

VAR11赋值:成交额(元)的15日[1日权重]移动平均/5670000
VAR22赋值:昨收的5日简单移动平均
VAR2赋值:VAR11*收盘价/VAR22
B0赋值:2日前的VAR2-开盘价
B1赋值:昨日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 VAR2<B2) OR (B2=VAR2MAX AND B1>B3) OR (B3=VAR2MAX AND B1>B2 AND B2>=B4 AND VAR2<B1)
当满足条件RS1时,在B1和VAR2位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色
当满足条件RS2时,在B2和VAR2位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色
当满足条件RS3时,在B1和B2位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色
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)
当满足条件GS1时,在B1和VAR2位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件GS2时,在B2和VAR2位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件GS3时,在B1和B2位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色