通达信八分图源码附图
HDAY:=15;
LDAY:=15;
PE:=0;
KE:=1;
CURR:=CURRBARSCOUNT;
TCH:=CONST(FINDHIGH(H,0,HDAY*10,1));
GTT:=CONST(BARSLAST(TCH=H))+1;
SX跌H:=CONST(IF(GTT=1,H,REF(H,GTT-1)));
BCL:=CONST(FINDLOW(L,0,LDAY*10,1));
DTT:=CONST(BARSLAST(BCL=L))+1;
SX涨L:=CONST(IF(DTT=1,L,REF(L,DTT-1)));
STICKLINE(1=1,H,L,9,0)COLOR878787;
R:=ABS(GTT-DTT);
DTLT:=IF(DTT>GTT,GTT,DTT);
GTHT:=IF(DTT>GTT,DTT,GTT);
SLXH:=IF(CURR<=GTHT+R/8,(SX跌H+SX涨L)/2,DRAWNULL);
H跌X2:=IF(CURR<=GTHT+R/8,(SX跌H+SLXH)/2,DRAWNULL);
L涨X2:=IF(CURR<=GTHT+R/8,(SLXH+SX涨L)/2,DRAWNULL);
GH跌X:=SX跌H+(SX跌H-SX涨L)/8;
DL涨X:=SX涨L-(SX跌H-SX涨L)/8;
DRAWBAND(IF(CURR<=GTHT+R/8,GH跌X,DRAWNULL),RGB(80,124,124),DL涨X,RGB(80,124,124));
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H,DRAWNULL),RGB(8,168,168),SX跌H,RGB(8,168,168));
DRAWBAND(IF(CURR<=GTHT+R/8,SX涨L,DRAWNULL),RGB(8,168,168),SX涨L,RGB(8,168,168));
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX涨L)/8,DRAWNULL),RGB(80,124,24),SX涨L+(SX跌H-SX涨L)/8,RGB(80,124,24));
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX涨L)/4,DRAWNULL),RGB(0,124,154),SX涨L+(SX跌H-SX涨L)/4,RGB(0,124,154));
DRAWBAND(IF(CURR<=GTHT+R/8,SX跌H-(SX跌H-SX涨L)*3/8,DRAWNULL),RGB(80,124,24),SX涨L+(SX跌H-SX涨L)*3/8,RGB(80,124,24));
DRAWBAND(SLXH,RGB(8,168,168),SLXH,RGB(8,168,168));
DRAWTEXT(CURR=GTHT,SX涨L-(SX跌H-SX涨L)/16,' 壹瓣杺埖 '),COLOR8899AA;
PEDAY:=IF(PE=0,0,IF(PE=1,R/2,IF(PE=2,R,IF(PE=3,R*3/2,IF(PE=4,R*2,IF(PE=5,R*5/2,IF(PE=6,R*3,IF(PE=7,R*7/2,
IF(PE=8,R*4,IF(PE=9,R*9/2,IF(PE=10,R*5,R*11/2)))))))))));
DRAWKLINE(IF(KE=2 AND CURR>R/2,REFX(H,R/2),IF(KE=2,DRAWNULL,H)),
IF(KE=2 AND CURR>R/2,REFX(O,R/2),IF(KE=2,DRAWNULL,O)),
IF(KE=2 AND CURR>R/2,REFX(L,R/2),IF(KE=2,DRAWNULL,L)),
IF(KE=2 AND CURR>R/2,REFX(C,R/2),IF(KE=2,DRAWNULL,C)));
X8分:=(SX跌H-SX涨L)/8; X8R:=ROUND(R/8);
八分1:=DRAWLINE(CURR=DTLT+X8R*8,SX涨L,CURR=DTLT,SX跌H,0);
八分2:=DRAWLINE(CURR=DTLT+X8R*8,SX跌H,CURR=DTLT,SX涨L,0);
八分3:=DRAWLINE(CURR=DTLT+X8R*8,SLXH,CURR=DTLT+X8R*4,SX涨L,0);
八分4:=DRAWLINE(CURR=DTLT+X8R*8,SLXH,CURR=DTLT+X8R*4,SX跌H,0);
八分5:=DRAWLINE(CURR=DTLT+X8R*4,SX涨L,CURR=DTLT,SLXH,0);
八分6:=DRAWLINE(CURR=DTLT+X8R*4,SX跌H,CURR=DTLT,SLXH,0);
八分7:=DRAWLINE(CURR=DTLT+X8R*8,X8分+SX涨L,CURR=DTLT+X8R*7,SX涨L,0);
八分8:=DRAWLINE(CURR=DTLT+X8R,SX涨L,CURR=DTLT,X8分+SX涨L,0);
八分9:=DRAWLINE(CURR=DTLT+X8R*8,SX跌H-X8分,CURR=DTLT+X8R*7,SX跌H,0);
八分10:=DRAWLINE(CURR=DTLT+X8R,SX跌H,CURR=DTLT,SX跌H-X8分,0);
八分11:=DRAWLINE(CURR=DTLT+X8R*8,X8分*2+SX涨L,CURR=DTLT+X8R*6,SX涨L,0);
八分12:=DRAWLINE(CURR=DTLT+X8R*2,SX涨L,CURR=DTLT,X8分*2+SX涨L,0);
八分13:=DRAWLINE(CURR=DTLT+X8R*8,SX跌H-X8分*2,CURR=DTLT+X8R*6,SX跌H,0);
八分14:=DRAWLINE(CURR=DTLT+X8R*2,SX跌H,CURR=DTLT,SX跌H-X8分*2,0);
八分15:=DRAWLINE(CURR=DTLT+X8R*8,X8分+SX涨L,CURR=DTLT+X8R,SX跌H,0);
八分16:=DRAWLINE(CURR=DTLT+X8R*8,X8分*2+SX涨L,CURR=DTLT+X8R*2,SX跌H,0);
八分17:=DRAWLINE(CURR=DTLT+X8R*8,SX跌H-X8分,CURR=DTLT+X8R,SX涨L,0);
八分18:=DRAWLINE(CURR=DTLT+X8R*8,SX跌H-X8分*2,CURR=DTLT+X8R*2,SX涨L,0);
八分19:=DRAWLINE(CURR=DTLT+X8R*7,SX跌H,CURR=DTLT,X8分+SX涨L,0);
八分20:=DRAWLINE(CURR=DTLT+X8R*6,SX跌H,CURR=DTLT,X8分*2+SX涨L,0);
八分21:=DRAWLINE(CURR=DTLT+X8R*7,SX涨L,CURR=DTLT,SX跌H-X8分,0);
八分22:=DRAWLINE(CURR=DTLT+X8R*6,SX涨L,CURR=DTLT,SX跌H-X8分*2,0);
八分23:=DRAWLINE(CURR=DTLT+X8R*5,SX跌H,CURR=DTLT,X8分*3+SX涨L,0);
八分24:=DRAWLINE(CURR=DTLT+X8R*3,SX跌H,CURR=DTLT,X8分*5+SX涨L,0);
八分25:=DRAWLINE(CURR=DTLT+X8R*5,SX涨L,CURR=DTLT,SX跌H-X8分*3,0);
八分26:=DRAWLINE(CURR=DTLT+X8R*3,SX涨L,CURR=DTLT,SX跌H-X8分*5,0);
八分27:=DRAWLINE(CURR=DTLT+X8R*8,SX跌H-X8分*5,CURR=DTLT+X8R*5,SX涨L,0);
八分28:=DRAWLINE(CURR=DTLT+X8R*8,SX跌H-X8分*3,CURR=DTLT+X8R*3,SX涨L,0);
八分29:=DRAWLINE(CURR=DTLT+X8R*8,X8分*5+SX涨L,CURR=DTLT+X8R*5,SX跌H,0);
八分30:=DRAWLINE(CURR=DTLT+X8R*8,X8分*3+SX涨L,CURR=DTLT+X8R*3,SX跌H,0);
DRAWBAND(REF(八分1,PEDAY),RGB(255,200,8),REF(八分1,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分2,PEDAY),RGB(255,200,8),REF(八分2,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分3,PEDAY),RGB(255,200,8),REF(八分3,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分4,PEDAY),RGB(255,200,8),REF(八分4,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分5,PEDAY),RGB(255,200,8),REF(八分5,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分6,PEDAY),RGB(255,200,8),REF(八分6,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分7,PEDAY),RGB(255,200,8),REF(八分7,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分8,PEDAY),RGB(255,200,8),REF(八分8,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分9,PEDAY),RGB(255,200,8),REF(八分9,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分10,PEDAY),RGB(255,200,8),REF(八分10,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分11,PEDAY),RGB(255,200,8),REF(八分11,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分12,PEDAY),RGB(255,200,8),REF(八分12,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分13,PEDAY),RGB(255,200,8),REF(八分13,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分14,PEDAY),RGB(255,200,8),REF(八分14,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分15,PEDAY),RGB(255,200,8),REF(八分15,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分16,PEDAY),RGB(255,200,8),REF(八分16,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分17,PEDAY),RGB(255,200,8),REF(八分17,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分18,PEDAY),RGB(255,200,8),REF(八分18,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分19,PEDAY),RGB(255,200,8),REF(八分19,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分20,PEDAY),RGB(255,200,8),REF(八分20,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分21,PEDAY),RGB(255,200,8),REF(八分21,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分22,PEDAY),RGB(255,200,8),REF(八分22,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分23,PEDAY),RGB(255,200,8),REF(八分23,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分24,PEDAY),RGB(255,200,8),REF(八分24,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分25,PEDAY),RGB(255,200,8),REF(八分25,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分26,PEDAY),RGB(255,200,8),REF(八分26,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分27,PEDAY),RGB(255,200,8),REF(八分27,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分28,PEDAY),RGB(255,200,8),REF(八分28,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分29,PEDAY),RGB(255,200,8),REF(八分29,PEDAY),RGB(255,200,8));
DRAWBAND(REF(八分30,PEDAY),RGB(255,200,8),REF(八分30,PEDAY),RGB(255,200,8));

未来函数检测结果如下:
该公式包含未来函数:DHIGH
该公式包含未来函数:DLOW
该公式包含未来函数:REFX
定制指标公式、软件请联系QQ或微信同号:88652583
HDAY赋值:15
LDAY赋值:15
PE赋值:0
KE赋值:1
CURR赋值:到最后交易的周期
TCH赋值:最高价在0日前的HDAY*10天内第1个最高价的最后一日取值设为常数
GTT赋值:上次TCH=最高价距今天数的最后一日取值设为常数+1
SX跌H赋值:如果GTT=1,返回最高价,否则返回GTT-1日前的最高价的最后一日取值设为常数
BCL赋值:最低价在0日前的LDAY*10天内第1个最低价的最后一日取值设为常数
DTT赋值:上次BCL=最低价距今天数的最后一日取值设为常数+1
SX涨L赋值:如果DTT=1,返回最低价,否则返回DTT-1日前的最低价的最后一日取值设为常数
当满足条件1=1时,在最高价和最低价位置之间画柱状线,宽度为9,0不为0则画空心柱.COLOR878787
R赋值:GTT-DTT的绝对值
DTLT赋值:如果DTT>GTT,返回GTT,否则返回DTT
GTHT赋值:如果DTT>GTT,返回DTT,否则返回GTT
SLXH赋值:如果CURR<=GTHT+R/8,返回(SX跌H+SX涨L)/2,否则返回无效数
H跌X2赋值:如果CURR<=GTHT+R/8,返回(SX跌H+SLXH)/2,否则返回无效数
L涨X2赋值:如果CURR<=GTHT+R/8,返回(SLXH+SX涨L)/2,否则返回无效数
GH跌X赋值:SX跌H+(SX跌H-SX涨L)/8
DL涨X赋值:SX涨L-(SX跌H-SX涨L)/8
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
当满足条件CURR=GTHT时,在SX涨L-(SX跌H-SX涨L)/16位置书写文字,COLOR8899AA
PEDAY赋值:如果PE=0,返回0,否则返回如果PE=1,返回R/2,否则返回如果PE=2,返回R,否则返回如果PE=3,返回R*3/2,否则返回如果PE=4,返回R*2,否则返回如果PE=5,返回R*5/2,否则返回如果PE=6,返回R*3,否则返回如果PE=7,返回R*7/2,否则返回如果PE=8,返回R*4,否则返回如果PE=9,返回R*9/2,否则返回如果PE=10,返回R*5,否则返回R*11/2
K线
X8分赋值:(SX跌H-SX涨L)/8
X8R赋值:对R/8(进行)四舍五入
八分1赋值:当满足条件CURR=DTLT+X8R*8时,在SX涨L位置画直线起点,当满足条件CURR=DTLT时,在SX跌H位置画直线终点,0表示是否延长.
八分2赋值:当满足条件CURR=DTLT+X8R*8时,在SX跌H位置画直线起点,当满足条件CURR=DTLT时,在SX涨L位置画直线终点,0表示是否延长.
八分3赋值:当满足条件CURR=DTLT+X8R*8时,在SLXH位置画直线起点,当满足条件CURR=DTLT+X8R*4时,在SX涨L位置画直线终点,0表示是否延长.
八分4赋值:当满足条件CURR=DTLT+X8R*8时,在SLXH位置画直线起点,当满足条件CURR=DTLT+X8R*4时,在SX跌H位置画直线终点,0表示是否延长.
八分5赋值:当满足条件CURR=DTLT+X8R*4时,在SX涨L位置画直线起点,当满足条件CURR=DTLT时,在SLXH位置画直线终点,0表示是否延长.
八分6赋值:当满足条件CURR=DTLT+X8R*4时,在SX跌H位置画直线起点,当满足条件CURR=DTLT时,在SLXH位置画直线终点,0表示是否延长.
八分7赋值:当满足条件CURR=DTLT+X8R*8时,在X8分+SX涨L位置画直线起点,当满足条件CURR=DTLT+X8R*7时,在SX涨L位置画直线终点,0表示是否延长.
八分8赋值:当满足条件CURR=DTLT+X8R时,在SX涨L位置画直线起点,当满足条件CURR=DTLT时,在X8分+SX涨L位置画直线终点,0表示是否延长.
八分9赋值:当满足条件CURR=DTLT+X8R*8时,在SX跌H-X8分位置画直线起点,当满足条件CURR=DTLT+X8R*7时,在SX跌H位置画直线终点,0表示是否延长.
八分10赋值:当满足条件CURR=DTLT+X8R时,在SX跌H位置画直线起点,当满足条件CURR=DTLT时,在SX跌H-X8分位置画直线终点,0表示是否延长.
八分11赋值:当满足条件CURR=DTLT+X8R*8时,在X8分*2+SX涨L位置画直线起点,当满足条件CURR=DTLT+X8R*6时,在SX涨L位置画直线终点,0表示是否延长.
八分12赋值:当满足条件CURR=DTLT+X8R*2时,在SX涨L位置画直线起点,当满足条件CURR=DTLT时,在X8分*2+SX涨L位置画直线终点,0表示是否延长.
八分13赋值:当满足条件CURR=DTLT+X8R*8时,在SX跌H-X8分*2位置画直线起点,当满足条件CURR=DTLT+X8R*6时,在SX跌H位置画直线终点,0表示是否延长.
八分14赋值:当满足条件CURR=DTLT+X8R*2时,在SX跌H位置画直线起点,当满足条件CURR=DTLT时,在SX跌H-X8分*2位置画直线终点,0表示是否延长.
八分15赋值:当满足条件CURR=DTLT+X8R*8时,在X8分+SX涨L位置画直线起点,当满足条件CURR=DTLT+X8R时,在SX跌H位置画直线终点,0表示是否延长.
八分16赋值:当满足条件CURR=DTLT+X8R*8时,在X8分*2+SX涨L位置画直线起点,当满足条件CURR=DTLT+X8R*2时,在SX跌H位置画直线终点,0表示是否延长.
八分17赋值:当满足条件CURR=DTLT+X8R*8时,在SX跌H-X8分位置画直线起点,当满足条件CURR=DTLT+X8R时,在SX涨L位置画直线终点,0表示是否延长.
八分18赋值:当满足条件CURR=DTLT+X8R*8时,在SX跌H-X8分*2位置画直线起点,当满足条件CURR=DTLT+X8R*2时,在SX涨L位置画直线终点,0表示是否延长.
八分19赋值:当满足条件CURR=DTLT+X8R*7时,在SX跌H位置画直线起点,当满足条件CURR=DTLT时,在X8分+SX涨L位置画直线终点,0表示是否延长.
八分20赋值:当满足条件CURR=DTLT+X8R*6时,在SX跌H位置画直线起点,当满足条件CURR=DTLT时,在X8分*2+SX涨L位置画直线终点,0表示是否延长.
八分21赋值:当满足条件CURR=DTLT+X8R*7时,在SX涨L位置画直线起点,当满足条件CURR=DTLT时,在SX跌H-X8分位置画直线终点,0表示是否延长.
八分22赋值:当满足条件CURR=DTLT+X8R*6时,在SX涨L位置画直线起点,当满足条件CURR=DTLT时,在SX跌H-X8分*2位置画直线终点,0表示是否延长.
八分23赋值:当满足条件CURR=DTLT+X8R*5时,在SX跌H位置画直线起点,当满足条件CURR=DTLT时,在X8分*3+SX涨L位置画直线终点,0表示是否延长.
八分24赋值:当满足条件CURR=DTLT+X8R*3时,在SX跌H位置画直线起点,当满足条件CURR=DTLT时,在X8分*5+SX涨L位置画直线终点,0表示是否延长.
八分25赋值:当满足条件CURR=DTLT+X8R*5时,在SX涨L位置画直线起点,当满足条件CURR=DTLT时,在SX跌H-X8分*3位置画直线终点,0表示是否延长.
八分26赋值:当满足条件CURR=DTLT+X8R*3时,在SX涨L位置画直线起点,当满足条件CURR=DTLT时,在SX跌H-X8分*5位置画直线终点,0表示是否延长.
八分27赋值:当满足条件CURR=DTLT+X8R*8时,在SX跌H-X8分*5位置画直线起点,当满足条件CURR=DTLT+X8R*5时,在SX涨L位置画直线终点,0表示是否延长.
八分28赋值:当满足条件CURR=DTLT+X8R*8时,在SX跌H-X8分*3位置画直线起点,当满足条件CURR=DTLT+X8R*3时,在SX涨L位置画直线终点,0表示是否延长.
八分29赋值:当满足条件CURR=DTLT+X8R*8时,在X8分*5+SX涨L位置画直线起点,当满足条件CURR=DTLT+X8R*5时,在SX跌H位置画直线终点,0表示是否延长.
八分30赋值:当满足条件CURR=DTLT+X8R*8时,在X8分*3+SX涨L位置画直线起点,当满足条件CURR=DTLT+X8R*3时,在SX跌H位置画直线终点,0表示是否延长.
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线
画带状线