联系方式 Contact

云指标公式网

淘宝:zb-mart.taobao.com

电话:18020657357

微信:18020657357

Q Q:396950280

点击这里给我发消息

网址:www.yzhibiao.com

搜索 Search

季月周箱体(源码 主图 通达信 贴图)

2015-10-6 14:40:52点击:

季月周箱体,实际交易时间线计算,适用通达信,喜欢请下载附件源码
有些图比较适合月线观察,如上海三毛,有些比较适合周线观察,请自行斟酌修改设定
该指标矩形都是按实际交易日算的,所以有的月矩形只有几天,有的周矩形只有三两日,看图的时候请注意观察
个人认为,这个矩形公式实际就是周K线和月K线的一种表现形式,省的大家另外点击看月线和周线了,对于季线我个人认为作用不大,请大家参考
 

WO:=O#WEEK;
WC:=C#WEEK;
WH:=H#WEEK;
WL:=L#WEEK;
T:=BARSLAST(WEEKOFYEAR!=REF(WEEKOFYEAR,1));
T1:=CROSS(BACKSET(T=0,2),0.5);
YO:=O#MONTH;
YC:=C#MONTH;
YH:=H#MONTH;
YL:=L#MONTH;
YT:=BARSLAST(MONTH!=REF(MONTH,1));
YT1:=CROSS(BACKSET(YT=0,2),0.5);
A0:=MOD(MONTH,3);
JD:=BARSLAST(CROSS(A0,0.5));
JT:=BARSLAST(JD<REF(JD,1));
JT1:=CROSS(BACKSET(JT=0,2),0.5);
JO:=O#SEASON;
JC:=C#SEASON;
JH:=H#SEASON;
JL:=L#SEASON;

{季}
STICKLINE(IF(ISLASTBAR,JT1=1,JC>=JO AND JT>0 AND JT1=0 ),JH,JH,8,0),COLORRED;
STICKLINE(IF(ISLASTBAR,JT1=1,JC>=JO AND JT>0 AND JT1=0 ),JL,JL,8,0),COLORRED;
STICKLINE(JC>=JO AND (JT=0  OR JT1=1 OR ISLASTBAR),JH,JL,0,0),COLORRED;
STICKLINE(IF(ISLASTBAR,JT1=1,JC<JO AND JT>0 AND JT1=0),JH,JH,8,0),COLORGREEN;
STICKLINE(IF(ISLASTBAR,JT1=1,JC<JO AND JT>0 AND JT1=0),JL,JL,8,0),COLORGREEN;
STICKLINE(JC<JO AND (JT=0 OR JT1=1 OR ISLASTBAR),JH,JL,0,0),COLORGREEN;

{月}
STICKLINE(IF(ISLASTBAR,T1=1,WC>=WO AND T>0 AND T1=0 ),WH,WH,8,-1),COLORRED;
STICKLINE(IF(ISLASTBAR,T1=1,WC>=WO AND T>0 AND T1=0 ),WL,WL,8,-1),COLORRED;
STICKLINE(WC>=WO AND (T=0  OR T1=1 OR ISLASTBAR),WH,WL,0,-1),COLORRED;
STICKLINE(IF(ISLASTBAR,T1=1,WC<WO AND T>0 AND T1=0),WH,WH,8,-1),COLORGREEN;
STICKLINE(IF(ISLASTBAR,T1=1,WC<WO AND T>0 AND T1=0),WL,WL,8,-1),COLORGREEN;
STICKLINE(WC<WO AND (T=0 OR T1=1 OR ISLASTBAR),WH,WL,0,-1),COLORGREEN;

{周}
STICKLINE(IF(ISLASTBAR,YT1=1,YC>=YO AND YT>0 AND YT1=0 ),YH,YH,8,-1),COLORRED;
STICKLINE(IF(ISLASTBAR,YT1=1,YC>=YO AND YT>0 AND YT1=0 ),YL,YL,8,-1),COLORRED;
STICKLINE(YC>=YO AND (YT=0  OR YT1=1 OR ISLASTBAR),YH,YL,0,-1),COLORRED;
STICKLINE(IF(ISLASTBAR,YT1=1,YC<YO AND YT>0 AND YT1=0),YH,YH,8,-1),COLORGREEN;
STICKLINE(IF(ISLASTBAR,YT1=1,YC<YO AND YT>0 AND YT1=0),YL,YL,8,-1),COLORGREEN;
STICKLINE(YC<YO AND (YT=0 OR YT1=1 OR ISLASTBAR),YH,YL,0,-1),COLORGREEN;