同花顺区间三分割主图指标公式
基本概况：
- 指标类别： 同花顺指标
- 授权方式： 免费版
- 指标评级： ★★★★★
- 指标语言： 简体中文
- 指标来源： 互联网
- 指标日期： 2017-08-15 00:00:00
内容介绍：
同花顺区间三分割主图指标公式起点:=60;终点:=10;切换:=5;
DRAWGBKLAST(1,STRIP(RGB(30,80,220),RGB(130,80,180),1));
nx:=CURRBARSCOUNT+1;
wz:=CURRBARSCOUNT+1=1;
wx:=CURRBARSCOUNT+1=起点;
wt:=BARSLAST(wx);
wxz:=IF(wt>=0,1,DRAWNULL);
QH:=IF(nx>=终点 AND nx<=起点,H,DRAWNULL);
QL:=IF(nx>=终点 AND nx<=起点,L,DRAWNULL);
XZ:=IF(nx>=终点,1,DRAWNULL);
//分割计算
ZH:=HHV(QH,0);
ZL:=LLV(QL,0);
HXT:=(ZH-ZL);
J1:=ZH-HXT*0.241;
J2:=ZH-HXT*0.382;
J3:=ZH-HXT*0.613;
J4:=ZH-HXT*0.786;
JXT:=(ZH-ZL)/8;
H1:=ZH-JXT*1;
H2:=ZH-JXT*2;
H3:=ZH-JXT*3;
H4:=ZH-JXT*5;
H5:=ZH-JXT*6;
H6:=ZH-JXT*7;
BXT:=(ZH-ZL)/10;
B1:=ZH-BXT*1;
B2:=ZH-BXT*2;
B3:=ZH-BXT*3;
B4:=ZH-BXT*4;
B5:=ZH-BXT*6;
B6:=ZH-BXT*7;
B7:=ZH-BXT*8;
B8:=ZH-BXT*9;
//股票k线
STICKLINE(OPEN,CLOSE ,OPEN,9,0 ),COLOR000000;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,8,0 ),COLOR007700;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00bb00;
STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00dd00;
STICKLINE(OPEN>CLOSE ,HIGH,LOW,1.5 ,0 ),COLOR00ff00;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,8,0) ,COLOR000077;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,7,0) ,COLOR000099;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,5,0) ,COLOR0000bb;
STICKLINE(CLOSE>=OPEN ,CLOSE,OPEN,3,0) ,COLOR0000dd;
STICKLINE(CLOSE>=OPEN ,HIGH,LOW,1.5,0 ),COLOR0000FF;
STICKLINE(HIGH=LOW AND CLOSE>REF(CLOSE,1),HIGH-0.01,HIGH+0.01,8,0 ),COLOR0000FF;
STICKLINE(HIGH=LOW AND CLOSE<REF(CLOSE,1),HIGH-0.01,HIGH+0.01,8,0 ),COLOR00FF00;
//分割显示
IF 切换>=1 AND 切换<=3 THEN BEGIN
VERLINE(nx=终点 OR nx=起点,2),COLOR009fff;
x1:=IF(切换=1,J1,IF(切换=2,H1,IF(切换=3,B1,DRAWNULL)));
x2:=IF(切换=1,J2,IF(切换=2,H2,IF(切换=3,B2,DRAWNULL)));
x3:=IF(切换=1,J3,IF(切换=2,H3,IF(切换=3,B3,DRAWNULL)));
x4:=IF(切换=1,J4,IF(切换=2,H4,IF(切换=3,B4,DRAWNULL)));
高:BACKSET(IF(wz,ZH,DRAWNULL),起点-1)*wxz,COLORff88ff,LINETHICK2;
低:BACKSET(IF(wz,ZL,DRAWNULL),起点-1)*wxz,COLORff88ff,LINETHICK2;
中:BACKSET(IF(wz,(ZH+ZL)/2,DRAWNULL),起点-1)*wxz,COLORff88ff;
分1:BACKSET(IF(wz,X1,DRAWNULL),起点-1)*wxz,COLORffff00;
分2:BACKSET(IF(wz,X2,DRAWNULL),起点-1)*wxz,COLORffff00;
分3:BACKSET(IF(wz,X3,DRAWNULL),起点-1)*wxz,COLORffff00;
分4:BACKSET(IF(wz,X4,DRAWNULL),起点-1)*wxz,COLORffff00;
END;
IF 切换=2 OR 切换=3 THEN BEGIN
x5:=IF(切换=2,H5,B5);
x6:=IF(切换=2,H6,B6);
分5:BACKSET(IF(wz,X5,DRAWNULL),起点-1)*wxz,COLORffff00;
分6:BACKSET(IF(wz,X6,DRAWNULL),起点-1)*wxz,COLORffff00;
END;
IF 切换=3 THEN BEGIN
x7:=B7;
x8:=B8;
分7:BACKSET(IF(wz,X7,NULL),起点-1)*wxz,COLORffff00;
分8:BACKSET(IF(wz,X8,NULL),起点-1)*wxz,COLORffff00;
END;
//分割提示
DRAWTEXT(wz,高,'`'+TOSTRING(高,2)+'(高)'),COLORff88ff;
DRAWTEXT(wz,低,'`'+TOSTRING(低,2)+'(低)'),COLORff88ff;
DRAWTEXT(wz,中,'`'+TOSTRING(中,2)+'(中)'),COLORff88ff;
DRAWTEXT(wz,分1,'`'+TOSTRING(分1,2)+'(分1)&