量学论坛 › 股票公式 › 又一珍藏源码【通达信分时极品跟庄】（主图 源码 通达信）

一指弹biu 发表于 2016-3-4 16:48

yzx6951 发表于 2016-6-23 00:47

（通达信分时极品跟庄）:   

使用说明---
指标说明：红色线为机构资金，紫色线为中小户资金，绿色线为散户资金。当盘中红色线出现时，说明有机构资金介入，可关注；一旦出现红色圆点，机构资金上穿散户资金，则表示机构在强力拉升。同理，当红色线下穿散户线时，说明机构在洗盘或出货。　

源码---
A1:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
机买:(A2/A6)*100,LINETHICK2,COLORRED;
机卖:(A3/A6)*100,LINETHICK2,COLORGREEN;
散买:(A4/A6)*100,LINETHICK0;
散卖:(A5/A6)*100,LINETHICK0;
主力差:机买-机卖,LINETHICK2,NODRAW;
散户差:散买-散卖,LINETHICK0,NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●机构'),COLORRED;
DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,'○机构'),COLORWHITE;
DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.15,'▲散户'),COLORCYAN;
DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.15,'△散户'),COLORWHITE;

参谋士官 发表于 2016-3-4 23:58

｛复制下面的代码，这个可以通过验证，原名叫CX分时，分析家公式网上的｝
A1:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
机买:(A2/A6)*100,LINETHICK2,COLORRED;
机卖:(A3/A6)*100,LINETHICK2,COLORGREEN;
散买:(A4/A6)*100,LINETHICK0;
散卖:(A5/A6)*100,LINETHICK0;
主力差:机买-机卖,LINETHICK2,NODRAW;
小股民差:散买-散卖,LINETHICK0,NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●机构'),COLORRED;
DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,'○机构'),COLORWHITE;
DRAWTEXT(小股民差>0 AND REF(小股民差,1)<=0,C*0.15,'▲小股民'),COLORCYAN;
DRAWTEXT(小股民差<0 AND REF(小股民差,1)>=0,-C*0.15,'△小股民'),COLORWHITE;

吉林225588 发表于 2016-5-28 12:31

这个是我在网上找到的同一思路的指标公式 装到通达信上能用
A1:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
机买:(A2/A6)*100,LINETHICK2,COLORRED;
机卖:(A3/A6)*100,LINETHICK2,COLORGREEN;
散买:(A4/A6)*100,LINETHICK0;
散卖:(A5/A6)*100,LINETHICK0;
主力差:机买-机卖,LINETHICK2,NODRAW;
散户差:散买-散卖,LINETHICK0,NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●机构'),COLORRED;
DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,'○机构'),COLORWHITE;
DRAWTEXT(散户差>0 AND REF(散户差,1)<=0,C*0.15,'▲散户'),COLORCYAN;
DRAWTEXT(散户差<0 AND REF(散户差,1)>=0,-C*0.15,'△散户'),COLORWHITE;

chjlcn 发表于 2016-3-4 16:52

这个源代码不错,谢谢楼主了

股迷1234 发表于 2016-3-4 17:07

谢谢分享。。。。

2456611245 发表于 2016-3-4 17:14

当前公式 : 分时跟庄 (指标画线公式)
错误句 :
A3:=SUM(IF(A1>100 AND CLOSE
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0)
详细信息 : 在变量 A4 前又错误的定义一次变量!
错误起始位置 : 105 ; 长度: 2

2456611245 发表于 2016-3-4 17:15

请问如何解决？

NIAN 发表于 2016-3-4 17:34

谢谢楼主的分享！

NIAN 发表于 2016-3-4 17:36

谢谢楼主的分享！

翡翡翠 发表于 2016-3-4 17:40

谢谢老师分享

翡翡翠 发表于 2016-3-4 17:44

错误句 :
A3:=SUM(IF(A1>100 AND CLOSE
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0)
详细信息 : 在变量 A4 前又错误的定义一次变量!
错误起始位置 : 105 ; 长度: 2

怎么会这样

曹先生88888 发表于 2016-3-4 18:38

这个源代码不错,谢谢楼主了

zfs2015 发表于 2016-3-4 21:32

这个是非常恶心的楼主，，在其他论坛也是一样，，尽发一些无厘头的公式，把里面的公式代码去掉一部分，，宣传他所谓的软件。

你要宣传软件，也附带一个完整的公式吧，，，你这种品行，你的软件有人需要，，，你都见鬼了。

zengxin99 发表于 2016-3-4 21:49

谢谢楼主的分享！

魏青山 发表于 2016-3-4 22:37

谢谢楼主的分享！

魏青山 发表于 2016-3-4 23:07

请问这个指标在分时图中怎么进入显示，通达信软件分时图指标默认指标是“MACD”，怎么添加这个指标...

理智投资师2016 发表于 2016-3-4 23:14

谢谢楼主的分享！

查看完整版本: 又一珍藏源码【通达信分时极品跟庄】（主图 源码 通达信）