通达信划线定位副图指标 看清周期趋势 日入一点不是梦 源码分享 附图
SLOPE1:=0;
SLOPE2:=10000.00;
LEN:=200;
DIRECT1:=2;
DIRECT2:=0;
MN:=5;
MDT:=1220505.00;
X1:=BARSLAST(DATE=1220104);{年内周期数}
X2:=POW(1.01,X1);{每天一个点}
zbgs3:=REFDATE(CLOSE,1220104)*X2;{收益量}
收益曲线:IF(YEAR=2022,zbgs3,DRAWNULL),POINTDOT,COLORYELLOW,LINETHICK2;{收益曲线}
DRAWTEXT(ISLASTBAR,zbgs3,VAR2STR(X2*100,1)),COLORYELLOW;
DRAWTEXT(ISLASTBAR,CLOSE,VAR2STR((CLOSE/REF(CLOSE,X1)-1)*100,1)),COLORYELLOW;
DRAWNUMBER(ISLASTBAR,zbgs3*1.05,DATE+19000000);
{DRAWSL(COND,PRICE,SLOPE,LEN,DIRECT);}
年:DRAWSL(YEAR=2022,REFDATE(O,1220104),SLOPE1,LEN,DIRECT1),COLORWHITE,LINETHICK2;{横线}
DRAWSL(DATE=1220104,REFDATE(O,1220104),SLOPE2,LEN,DIRECT2),COLORWHITE,LINETHICK2;{竖线}
月:DRAWSL(MONTH=MN,REFDATE(O,MDT),0,200,2),COLORCYAN,LINETHICK2;{横线}
DRAWSL(DATE=MDT,REFDATE(O,MDT),10000,200,0),COLORCYAN,LINETHICK2;{竖线}
{当COND条件满足时,在PRICE位置画斜线,SLOPE为斜率,
LEN为长度,DIRECT为0向右延伸,1向左延伸,2双向延伸.
注意:
1.K线间的纵向高度差为SLOPE;
2.SLOPE为0时,为水平线;
3.SLOPE为10000时,为垂直线,LEN为向上的像素高度,DIRECT表示向上或向下延伸;
4.SLOPE和LEN支持变量;}
{周线识别}
WT:=BARSLAST(WEEKDAY!=REF(WEEKDAY,1));
{星期一位置标识坚线，是星期一都画线}
STICKLINE(WEEKDAY=1,CONST(HHV(H,WT+3)),CONST(LLV(L,WT-3)),0,-1),COLORLIGRAY;
{只画最近一个星期一位置标识坚线}
STICKLINE(CURRBARSCOUNT=CONST(BARSLAST(WEEKDAY=1))+1,CONST(HHV(H,WT+3)),CONST(LLV(L,WT-3)),0,-1),COLORYELLOW;
DRAWKLINE(H,O,L,C);{重画K线便于看图};
来函数检测结果如下：
该公式没有未来函数
解密、定制、编写股票指标请联系QQ或微信同号：88652583
相关股票指标公式
SLOPE1赋值:0
SLOPE2赋值:10000.00
LEN赋值:200
DIRECT1赋值:2
DIRECT2赋值:0
MN赋值:5
MDT赋值:1220505.00
X1赋值:上次日期=1220104距今天数
{年内周期数}
X2赋值:POW(1.01,X1)
{每天一个点}
ZBGS3赋值:1220104REF日期收盘价日*X2
如果YEAR=2022返回ZBGS3否则返回DRAWNULL
{收益曲线}
DRAWTEXT(ISLASTBAR,ZBGS3,VAR2STR(X2*100,1)),画黄色
DRAWTEXT(ISLASTBAR,收盘价,VAR2STR((收盘价/X1日前的收盘价-1)*100,1)),画黄色
DRAWNUMBER(ISLASTBAR,ZBGS3*1.05,日期+19000000)
{DRAWSL(COND,PRICE,SLOPE,LEN,DIRECT)
输出}
年:DRAWSL(YEAR=2022,1220104REF日期O日,SLOPE1,LEN,DIRECT1),画白色, 线宽为2
{横线}
DRAWSL(日期=1220104,1220104REF日期O日,SLOPE2,LEN,DIRECT2),画白色, 线宽为2
输出{竖线}
月:DRAWSL(MONTH=MN,MDTREF日期O日,0,200,2),画青色, 线宽为2
{横线}
DRAWSL(日期=MDT,MDTREF日期O日,10000,200,0),画青色, 线宽为2
{竖线}
{当COND条件满足时,在PRICE位置画斜线,SLOPE为斜率,
LEN为长度,DIRECT为0向右延伸,1向左延伸,2双向延伸.
注意:
1.K线间的纵向高度差为SLOPE
2.SLOPE为0时,为水平线
3.SLOPE为10000时,为垂直线,LEN为向上的像素高度,DIRECT表示向上或向下延伸
4.SLOPE和LEN支持变量
}
{周线识别}
WT赋值:上次WEEKDAY!=1日前的WEEKDAY距今天数
{星期一位置标识坚线，是星期一都画线}
STICKLINE(WEEKDAY=1,CONST(WT+3日内H最高值),CONST(WT-3日内L最低值),0,-1),COLORLIGRAY
{只画最近一个星期一位置标识坚线}
STICKLINE( 到最后交易的周期=CONST(上次WEEKDAY=1距今天数)+1,CONST(WT+3日内H最高值),CONST(WT-3日内L最低值),0,-1),画黄色
DRAWKLINE(H,O,L,C)
{重画K线便于看图}
