联系方式 Contact

云指标公式网

淘宝:zb-mart.taobao.com

电话:18020657357

微信:18020657357

Q Q:396950280

点击这里给我发消息

网址:www.yzhibiao.com

搜索 Search

UP系列----K线五法主图

2015-4-30 12:31:42点击:

加微信:18020657357,免费体验100%傻瓜选股的神奇!

K线五法主图

UP软件源码:

影响时长:=60;
实体涨跌幅:=(MAX(CLOSE,OPEN)/MIN(CLOSE,OPEN)-1)*100,nodraw;
标志性K线:IFF(实体涨跌幅==HHV(实体涨跌幅,影响时长),1,0),nodraw,COLORYELLOW;
影响时间:=barslast(标志性K线)+1,nodraw;
上轨:IFF(BETWEEN(影响时间,1,影响时长),REF(HIGH,影响时间-1),DRAWNULL),NODRAW,COLORRED;
下轨:IFF(BETWEEN(影响时间,1,影响时长),REF(LOW ,影响时间-1),DRAWNULL),NODRAW,COLORGREEN;
冗余过滤:=BETWEEN(影响时间,2,59),NODRAW;
STICKLINE(上轨,上轨,上轨,12,0),COLORRED;
STICKLINE(下轨,下轨,下轨,12,0),COLORGREEN;
STICKLINE3D(标志性K线 AND CLOSE>OPEN,CLOSE,OPEN,8,0),COLORRED;
STICKLINE3D(标志性K线 AND CLOSE<OPEN,CLOSE,OPEN,8,0),COLORGREEN;
A_1:=CROSS(C,上轨) AND REF(CLOSE,影响时间-1)>REF(OPEN,影响时间-1);
A_2:=COUNT(A_1,影响时间)==1 AND A_1;
一飞冲天:IFF(A_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORRED;
STICKLINE(一飞冲天,CLOSE,OPEN,8,0),COLORRED;
STICKLINE(一飞冲天,HIGH,LOW,0,0),COLORRED;
DRAWTEXT(一飞冲天,LOW,'B'),COLORRED;
B_1:=CROSS(CLOSE,上轨) AND REF(CLOSE,影响时间-1)>REF(OPEN,影响时间-1);
B_2:=COUNT(B_1,影响时间)==2 AND B_1;
回首惊天:IFF(B_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORYELLOW;
STICKLINE(回首惊天,CLOSE,OPEN,8,0),COLORYELLOW;
STICKLINE(回首惊天,HIGH,LOW,0,0),COLORYELLOW;
DRAWTEXT(回首惊天,LOW,'B'),COLORYELLOW;
C_1:=CROSS(CLOSE,下轨) AND REF(CLOSE,影响时间-1)>REF(OPEN,影响时间-1) AND COUNT(回首惊天,影响时间)==0;
C_2:=COUNT(C_1,影响时间)==1 AND C_1;
蓄势擎天:IFF(C_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORMagenta;
STICKLINE(蓄势擎天,CLOSE,OPEN,8,0),COLORMagenta;
STICKLINE(蓄势擎天,HIGH,LOW,0,0),COLORMagenta;
DRAWTEXT(蓄势擎天,LOW,'B'),COLORMagenta;
D_1:=CROSS(下轨,CLOSE) AND REF(CLOSE,影响时间-1)<REF(OPEN,影响时间-1);
D_2:=COUNT(D_1,影响时间)==1 AND D_1;
飞流直下:IFF(D_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORGREEN;
STICKLINE(飞流直下,CLOSE,OPEN,8,0),COLORGREEN;
STICKLINE(飞流直下,HIGH,LOW,0,0),COLORGREEN;
DRAWTEXT(飞流直下,HIGH*1.01,'S'),COLORGREEN;
E_1:=CROSS(下轨,CLOSE) AND REF(CLOSE,影响时间-1)<REF(OPEN,影响时间-1);
E_2:=COUNT(E_1,影响时间)==2 AND E_1;
回首再下:IFF(E_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORWHITE;
STICKLINE(回首再下,CLOSE,OPEN,8,0),COLORWHITE;
STICKLINE(回首再下,HIGH,LOW,0,0),COLORWHITE;
DRAWTEXT(回首再下,high*1.01,'S'),COLORWHITE;


修改
为通达信的源码是:

K线五法主图

影响时长:=60;
实体涨跌幅:=(MAX(CLOSE,OPEN)/MIN(CLOSE,OPEN)-1)*100,NODRAW;
标志性K线:IFF(实体涨跌幅==HHV(实体涨跌幅,影响时长),1,0),NODRAW,COLORYELLOW;
影响时间:=BARSLAST(标志性K线)+1,NODRAW;
上轨:IFF(BETWEEN(影响时间,1,影响时长),REF(HIGH,影响时间-1),DRAWNULL),NODRAW,COLORRED;
下轨:IFF(BETWEEN(影响时间,1,影响时长),REF(LOW ,影响时间-1),DRAWNULL),NODRAW,COLORGREEN;
冗余过滤:=BETWEEN(影响时间,2,59),NODRAW;
STICKLINE(上轨,上轨,上轨,12,0),COLORRED;
STICKLINE(下轨,下轨,下轨,12,0),COLORGREEN;
STICKLINE(标志性K线 AND CLOSE>OPEN,CLOSE,OPEN,8,0),COLORRED;
STICKLINE(标志性K线 AND CLOSE<OPEN,CLOSE,OPEN,8,0),COLORGREEN;
A_1:=CROSS(C,上轨) AND REF(CLOSE,影响时间-1)>REF(OPEN,影响时间-1);
A_2:=COUNT(A_1,影响时间)==1 AND A_1;
一飞冲天:IFF(A_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORRED;
STICKLINE(一飞冲天,CLOSE,OPEN,8,0),COLORRED;
STICKLINE(一飞冲天,HIGH,LOW,0,0),COLORRED;
DRAWTEXT(一飞冲天,LOW,'B'),COLORRED;
B_1:=CROSS(CLOSE,上轨) AND REF(CLOSE,影响时间-1)>REF(OPEN,影响时间-1);
B_2:=COUNT(B_1,影响时间)==2 AND B_1;
回首惊天:IFF(B_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORYELLOW;
STICKLINE(回首惊天,CLOSE,OPEN,8,0),COLORYELLOW;
STICKLINE(回首惊天,HIGH,LOW,0,0),COLORYELLOW;
DRAWTEXT(回首惊天,LOW,'B'),COLORYELLOW;
C_1:=CROSS(CLOSE,下轨) AND REF(CLOSE,影响时间-1)>REF(OPEN,影响时间-1) AND COUNT(回首惊天,影响时间)==0;
C_2:=COUNT(C_1,影响时间)==1 AND C_1;
蓄势擎天:IFF(C_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORMAGENTA;
STICKLINE(蓄势擎天,CLOSE,OPEN,8,0),COLORMAGENTA;
STICKLINE(蓄势擎天,HIGH,LOW,0,0),COLORMAGENTA;
DRAWTEXT(蓄势擎天,LOW,'B'),COLORMAGENTA;
D_1:=CROSS(下轨,CLOSE) AND REF(CLOSE,影响时间-1)<REF(OPEN,影响时间-1);
D_2:=COUNT(D_1,影响时间)==1 AND D_1;
飞流直下:IFF(D_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORGREEN;
STICKLINE(飞流直下,CLOSE,OPEN,8,0),COLORGREEN;
STICKLINE(飞流直下,HIGH,LOW,0,0),COLORGREEN;
DRAWTEXT(飞流直下,HIGH*1.01,'S'),COLORGREEN;
E_1:=CROSS(下轨,CLOSE) AND REF(CLOSE,影响时间-1)<REF(OPEN,影响时间-1);
E_2:=COUNT(E_1,影响时间)==2 AND E_1;
回首再下:IFF(E_2 AND 影响时间!=1 AND 冗余过滤,1,DRAWNULL),NODRAW,COLORWHITE;
STICKLINE(回首再下,CLOSE,OPEN,8,0),COLORWHITE;
STICKLINE(回首再下,HIGH,LOW,0,0),COLORWHITE;
DRAWTEXT(回首再下,HIGH*1.01,'S'),COLORWHITE;