您现在的位置:程序化交易>> 股票公式>> 其他>> 其他软件公式>>正文内容

动态换手日周月表[其他软件公式]

相关标签:动态筹码指标公式 、 换手线指标 、 充分换手指标 、 五彩换手指标 、 换手筹码指标 、 完全换手指标 、 通达信换手指标 、 换手买卖指标 、 涨跌换手指标 、

 

动态换手日周月表

 

 

原理解析:

日换手赋值:成交量(手)/当前流通股本(手)*100
周换手赋值:成交量(手)的5日累和/当前流通股本(手)*100
月换手赋值:成交量(手)的21日累和/当前流通股本(手)*100
DJA赋值:日换手[SYSPARAM(1)]
DJA1赋值:日换手[(SYSPARAM(1)-1)]
DJ1赋值:如果(DJA>DJA1),返回'↑',否则返回'↓'
DJB赋值:周换手[SYSPARAM(1)]
DJB1赋值:周换手[(SYSPARAM(1)-1)]
DJ2赋值:如果(DJB>DJB1),返回'↑',否则返回'↓'
DJC赋值:月换手[SYSPARAM(1)]
DJC1赋值:月换手[(SYSPARAM(1)-1)]
DJ3赋值:如果(DJC>DJC1),返回'↑',否则返回'↓'
P赋值:SYSPARAM(1)
当满足条件收盘价>0ANDBARSTATUS=2时,在-10位置书写文字,COLORFFFF00,线宽为1,ALIGN2
 当满足条件收盘价>0ANDBARSTATUS=2时,在60位置书写文字,COLOR00AAAA,线宽为1,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在50位置书写文字,COLOR00AAAA,线宽为1,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在40位置书写文字,COLOR00AAAA,线宽为1,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在30位置书写文字,COLOR00AAAA,线宽为1,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在20位置书写文字,COLOR00AAAA,线宽为1,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在50位置书写文字,COLORDEDEDE,线宽为1,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在30位置书写文字,COLORDEDEDE,线宽为1,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在30位置书写文字,画白色,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在30位置书写文字,画白色,ALIGN2
当满足条件收盘价>0ANDBARSTATUS=2时,在30位置书写文字,画白色,ALIGN2
 

源码:

 


{动态换手数据引用}
日换手:=VOL/CAPITAL*100;周换手:=SUM(VOL,5)/CAPITAL*100;月换手:=SUM(VOL,21)/CAPITAL*100;
{3行显示换手↑↓用}
DJA:=日换手[SYSPARAM(1)];DJA1:=日换手[(SYSPARAM(1)-1)];DJ1:=IF((DJA>DJA1),'↑','↓');
DJB:=周换手[SYSPARAM(1)];DJB1:=周换手[(SYSPARAM(1)-1)];DJ2:=IF((DJB>DJB1),'↑','↓');
DJC:=月换手[SYSPARAM(1)];DJC1:=月换手[(SYSPARAM(1)-1)];DJ3:=IF((DJC>DJC1),'↑','↓');
{7行图表部份}
p:=SYSPARAM(1);
DRAWTEXT(c>0 and BARSTATUS=2,-10,''),ColorFFFF00,LINETHICK1,ALIGN2; {表框下限}{48行}
DRAWTEXT(c>0 and BARSTATUS=2, 60,'┏━━━┱────┬────┬────┐'),Color00AAAA,LINETHICK1,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2, 50,'┃ ┃ │ │ │'),Color00AAAA,LINETHICK1,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2, 40,'┠───╂────┼────┼────┤'),Color00AAAA,LINETHICK1,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2, 30,'┃ ┃ │ │ │'),Color00AAAA,LINETHICK1,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2, 20,'┗━━━┹────┴────┴────┘'),Color00AAAA,LINETHICK1,ALIGN2;
{第15行}
DRAWTEXT(c>0 and BARSTATUS=2,50,'周期:日换手率: 周换手率:月换手率:'),ColorDEDEDE,LINETHICK1,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,30,'值:      '),ColorDEDEDE,LINETHICK1,ALIGN2;
{18行}
DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(日换手[P],2)+DJ1+' '),COLORWHITE,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(周换手[P],2)+DJ2+' '),COLORWHITE,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(月换手[P],2)+DJ3+' '),COLORWHITE,ALIGN2;
{各动态周期换手一目了然,方便观察使用.}
{}

 

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

 

 

有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

怎么收费,代编流程等详情请点击查阅!

(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容