定点换手日周月年表[其他软件公式]
相关标签:日周月共振公式 、 日周月kdj公式 、 通达信日周月macd指标 、 日周月均线指标源码 、 日周月同现指标 、 通达信日周月kdj指标 、 日周月cci指标源码 、 kdj日周月共振指标 、 macd日周月共振指标 、 日周月共振指标系统 、 日周月kdj选股公式 、 日周月共振选股公式 、 kdj日周月选股指标 、
定点换手日周月年表
{定点换手}
{确定周期参数}
原理解析:
源码:
BZ:=WEEKDAY;ZB:=BZ<REF(BZ,1);Z1:=SUMBARS(ZB,1);ZZ0:=SUMBARS(ZB,2);//周
BY:=MONTH;YB:=BY-REF(BY,1)<>0;Y1:=SUMBARS(YB,1);Y0:=SUMBARS(YB,2);//月
年:=YEAR;FN:=年-REF(年,1)<>0;FN1:=SUMBARS(FN,1);FN0:=SUMBARS(FN,2);//年
QB:=SUMBARS(VOL,CAPITAL);XX:=BACKSET(BARPOS=SYSPARAM(1),QB)*40;QW:=XX>REF(XX,1);
换手:=VOL/CAPITAL*100;
当日换:=换手,STICK;
当周换:=SUM(VOL,Z1)/CAPITAL*100;
当月换:=SUM(VOL,Y1)/CAPITAL*100;
当季换:=SUM(VOL,J1)/CAPITAL*100;
半年换:=SUM(VOL,N1)/CAPITAL*100;
当年换:=SUM(VOL,FN1)/CAPITAL*100;
{16行显示换手↑↓用}
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),'↑','↓');
DJD:=当年换[SYSPARAM(1)];DJD1:=当年换[(SYSPARAM(1)-1)];DJ4:=IF((DJD>DJD1),'↑','↓');
{21行图表部份}
p:=SYSPARAM(1);
DRAWTEXT(c>0 and BARSTATUS=2,-10,''),ColorFFFF00,LINETHICK1,ALIGN2; {表框下限}{48行}
DRAWTEXT(c>0 and BARSTATUS=2, 60,'┏━━━┱─────┬─────┬─────┬─────┐'),Color00AAAA,SHIFT3,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2, 50,'┃ ┃ │ │ │ │'),Color00AAAA,SHIFT3,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2, 40,'┠───╂─────┼─────┼─────┼─────┤'),Color00AAAA,SHIFT3,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2, 30,'┃ ┃ │ │ │ │'),Color00AAAA,SHIFT3,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2, 20,'┗━━━┹─────┴─────┴─────┴─────┘'),Color00AAAA,SHIFT3,ALIGN2;
{第29行}
DRAWTEXT(c>0 and BARSTATUS=2,50,'周期:当日换手率: 当周换手率: 当月换手率: 当年换手率: '),ColorDEDEDE,SHIFT3,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,30,'值: '),ColorDEDEDE,SHIFT3,ALIGN2;
{32行}
DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(当日换[P],2)+DJ1+' '),COLORWHITE,SHIFT3,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(当周换[P],2)+DJ2+' '),COLORWHITE,SHIFT3,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(当月换[P],2)+DJ3+' '),COLORWHITE,SHIFT3,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,30,NUMTOSTR(当年换[P],2)+DJ4+' '),COLORWHITE,SHIFT3,ALIGN2;
{37行}
公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】
有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友
可联系技术人员 QQ: 262069696 或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)
(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)
相关文章
-
没有相关内容