通达信〖趋势划线〗主图指标 辅助判断股票短期趋势的利器 源码
这是一款主图指标，通过上轨、中轨和下轨可以有效判断短期走势，当股价上穿中轨或在中轨上方运行代表多头趋势，当股价跌破中轨并在中轨下方运行时则表示空头趋势。再利用前方高点压力线，如果股价在中轨上方并突破压力线，则股票走强。
均价线:=AMOUNT/V/100;
C2:=REF(C,1);
涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORYELLOW;
STICKLINE(涨停,H,L,0,0),COLORYELLOW;
{起爆}
火箭起爆点:=(DCLOSE-REF(C,1))/REF(C,1)*100;
XG9:=CROSS(火箭起爆点,20) OR CROSS(火箭起爆点,18);
DRAWTEXT(XG9,L*0.96,'爆'),COLORFF0066;
STICKLINE(XG9,C,O,1.5,0),COLORFF0066;
{上下轨}
N11:=2,200,13;
UR00:=2,200,6;
LR0:=2,200,6;
TC01:=IF(H=HHV(H,8*UR00),H,DRAWNULL);
TC02:=CONST(BARSLAST(TC01=H))+1;
UPPER:=CONST(IF(TC02=1,H,REF(H,TC02-1)));
BC1:=IF(L=LLV(L,8*LR0),L,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
HP:=CURRBARSCOUNT<=TC02 AND H=UPPER;
NOD:=(IF(TC02>BC2,TC02,BC2)-IF(TC02>BC2,BC2,TC02));
LR1:=FORCAST(C,NOD+1);
NP:=IF(CURRBARSCOUNT<=MAX(BC2,TC02),CONST(IF(MIN(TC02,BC2)=1,LR1,REF(LR1,MIN(TC02,BC2)-1))),DRAWNULL),DOTLINE,COLORLIBLUE;
LR2:=SLOPE(C,NOD+1);
LR3:=CONST(IF(MIN(TC02,BC2)=1,LR2,REF(LR2,MIN(TC02,BC2)-1)));
STICKLINE(IF(BC2>TC02,HP,LP),LOWER,UPPER,0,0),COLORGRAY;
STICKLINE(IF(BC2>TC02,LP,HP),LOWER,UPPER,0,0),COLORGRAY;
FP:=NP-LR3*(NOD),DOTLINE,COLORLIRED;
EQU:=(NP+FP)/2,DOTLINE,COLORWHITE;
AD:=ABS(NP-FP);
DBL0:=BARSLAST(BC1!=DRAWNULL)+1;
DBH:=BARSLAST(TC01!=DRAWNULL)+1;
BSP:=IF(BC2>TC02,DBL0,DBH)-1;
LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP);
AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND H>LRL,H,LRL);
AT2:=HHV(AT1-LRL,MAX(BC2,TC02));
AT3:=CONST(BARSLAST(AT1-LRL=AT2));
AT4:=CONST(IF(AT3=0,H,REF(H,AT3)));
AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3)));
ATL:=LRL+AT5;
UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND L<LRL,L,LRL);
UT2:=HHV(LRL-UT1,MAX(BC2,TC02));
UT3:=CONST(BARSLAST(LRL-UT1=UT2));
UT4:=CONST(IF(UT3=0,H,REF(H,UT3)));
UT5:=CONST(IF(UT3=0,LRL-UT1,REF(LRL-UT1,UT3)));
UTL:=LRL-UT5;
RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,ATL,CONST(REF(ATL,MIN(BC2,TC02)-11)));
RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,UTL,CONST(REF(UTL,MIN(BC2,TC02)-11)));
中轨:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORBBBBBB;
上轨:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLORBLUE;
下轨:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLORFF00FF;
{前峰}
LT:=LLVBARS(L,60);
LT1:=LLVBARS(L,60);
LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
HT:=FINDHIGHBARS(H,LT+1,60,1);
DT:=FINDLOW(L,LT1+1,60,1);
前峰:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORGREEN ,LINETHICK1;
{洗盘}
XP1:=V=HHV(V,60) AND C<O;
XP2:=V<REF(V,1) AND H/C>1.04 AND C<O AND EXIST(H>HHV(L,60),5);
STICKLINE(XP2,O,C,2,0), COLORGREEN;
{趋势评分}
X01:=IF(MA(C,5)>MA(C,10),20,0);
X02:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X7:=IF(WINNER(C)>0.5,10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
XX:=X01+X02+X3+X4+X5+X6+X7+X8;
DRAWTEXT_FIX(V>O,0.02,0.99,0,STRCAT('趋势评分:',STRCAT(CON2STR(XX,0),' '))),COLORYELLOW;
来函数检测结果如下：
该公式包含未来函数:WINNER
该公式包含未来函数:DHIGH
该公式包含未来函数:DLOW
该公式包含未来函数:DCLOSE
解密、定制、编写公式指标请联系QQ或微信同号：88652583
置顶指标
相关指标公式
均价线赋值:成交额(元)/成交量(手)/100
C2赋值:1日前的收盘价
涨停赋值:如果1日前的收盘价*1.1-收盘价<0.01,返回1,否则返回0
当满足条件涨停时,在开盘价和收盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件涨停时,在开盘价和收盘价位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,画黄色
当满足条件涨停时,在最高价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画黄色
火箭起爆点赋值:(不定周期收盘价-1日前的收盘价)/1日前的收盘价*100
XG9赋值:火箭起爆点上穿20 OR 火箭起爆点上穿18
当满足条件XG9时,在最低价*0.96位置书写文字,COLORFF0066
当满足条件XG9时,在收盘价和开盘价位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLORFF0066
N11赋值:2,200,13
UR00赋值:2,200,6
LR0赋值:2,200,6
TC01赋值:如果最高价=8*UR00日内最高价的最高值,返回最高价,否则返回无效数
TC02赋值:上次TC01=最高价距今天数的最后一日取值设为常数+1
UPPER赋值:如果TC02=1,返回最高价,否则返回TC02-1日前的最高价的最后一日取值设为常数
BC1赋值:如果最低价=8*LR0日内最低价的最低值,返回最低价,否则返回无效数
BC2赋值:上次BC1=最低价距今天数的最后一日取值设为常数+1
LOWER赋值:如果BC2=1,返回最低价,否则返回BC2-1日前的最低价的最后一日取值设为常数
LP赋值:到最后交易的周期<=BC2 AND 最低价=LOWER
HP赋值:到最后交易的周期<=TC02 AND 最高价=UPPER
NOD赋值:(如果TC02>BC2,返回TC02,否则返回BC2-如果TC02>BC2,返回BC2,否则返回TC02)
LR1赋值:收盘价的NOD+1日线性回归预测值
NP赋值:如果到最后交易的周期<=BC2和TC02的较大值,返回如果TC02和BC2的较小值=1,返回LR1,否则返回TC02和BC2的较小值-1日前的LR1的最后一日取值设为常数,否则返回无效数,DOTLINE,画淡蓝色
LR2赋值:收盘价的NOD+1日线性回归斜率
LR3赋值:如果TC02和BC2的较小值=1,返回LR2,否则返回TC02和BC2的较小值-1日前的LR2的最后一日取值设为常数
当满足条件如果BC2>TC02,返回HP,否则返回LP时,在LOWER和UPPER位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
当满足条件如果BC2>TC02,返回LP,否则返回HP时,在LOWER和UPPER位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
FP赋值:NP-LR3*(NOD),DOTLINE,画淡红色
EQU赋值:(NP+FP)/2,DOTLINE,画白色
AD赋值:NP-FP的绝对值
DBL0赋值:上次BC1不等于无效数距今天数+1
DBH赋值:上次TC01不等于无效数距今天数+1
BSP赋值:如果BC2>TC02,返回DBL0,否则返回DBH-1
LRL赋值:如果NP>FP,返回FP+AD/NOD*BSP,否则返回FP-AD/NOD*BSP
AT1赋值:如果到最后交易的周期位于BC2和TC02之间ANDH>LRL,返回最高价,否则返回LRL
AT2赋值:BC2和TC02的较大值日内AT1-LRL的最高值
AT3赋值:上次AT1-LRL=AT2距今天数的最后一日取值设为常数
AT4赋值:如果AT3=0,返回最高价,否则返回AT3日前的最高价的最后一日取值设为常数
AT5赋值:如果AT3=0,返回AT1-LRL,否则返回AT3日前的AT1-LRL的最后一日取值设为常数
ATL赋值:LRL+AT5
UT1赋值:如果到最后交易的周期位于BC2和TC02之间ANDLUT2赋值:BC2和TC02的较大值日内LRL-UT1的最高值
UT3赋值:上次LRL-UT1=UT2距今天数的最后一日取值设为常数
UT4赋值:如果UT3=0,返回最高价,否则返回UT3日前的最高价的最后一日取值设为常数
UT5赋值:如果UT3=0,返回LRL-UT1,否则返回UT3日前的LRL-UT1的最后一日取值设为常数
UTL赋值:LRL-UT5
RH赋值:如果到最后交易的周期>=BC2和TC02的较小值-10,返回ATL,否则返回BC2和TC02的较小值-11日前的ATL的最后一日取值设为常数
RL赋值:如果到最后交易的周期>=BC2和TC02的较小值-10,返回UTL,否则返回BC2和TC02的较小值-11日前的UTL的最后一日取值设为常数
输出中轨:如果NP>FP,返回如果LRL<=RH,返回LRL,否则返回无效数,否则返回如果LRL>=RL,返回LRL,否则返回无效数,COLORBBBBBB
输出上轨:如果NP>FP,返回如果ATL<=RH,返回ATL,否则返回无效数,否则返回如果ATL>=RL,返回ATL,否则返回无效数,画蓝色
输出下轨:如果NP>FP,返回如果UTL<=RH,返回UTL,否则返回无效数,否则返回如果UTL>=RL,返回UTL,否则返回无效数,COLORFF00FF
LT赋值:60日内最低价距今天数
LT1赋值:60日内最低价距今天数
LTT赋值:上次到最后交易的周期=LT的最后一日取值设为常数+1距今天数
HT赋值:最高价在LT+1日前的60天内第1个最高价到当前周期的周期数
DT赋值:最低价在LT1+1日前的60天内第1个最低价
输出前峰:当满足条件到最后交易的周期=HT的最后一日取值设为常数+1时,在最高价位置画直线起点，当满足条件是否最后一个周期时,在HT日前的最高价位置画直线终点,0表示是否延长.,画绿色 ,线宽为1
XP1赋值:成交量(手)=60日内成交量(手)的最高值 AND 收阴线
XP2赋值:成交量(手)<1日前的成交量(手) AND 最高价/收盘价>1.04 AND 收阴线AND 最近5日存在最高价>60日内最低价的最高值
当满足条件XP2时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱., 画绿色
X01赋值:如果收盘价的5日简单移动平均>收盘价的10日简单移动平均,返回20,否则返回0
X02赋值:如果收盘价的20日简单移动平均>收盘价的60日简单移动平均,返回10,否则返回0
X3赋值:如果KDJ的J>KDJ的K,返回10,否则返回0
X4赋值:如果平滑异同平均线的DIF>平滑异同平均线的DEA,返回10,否则返回0
X5赋值:如果平滑异同平均线的MACD>0,返回10,否则返回0
X6赋值:如果成交量(手)>成交量(手)的60日简单移动平均,返回10,否则返回0
X7赋值:如果以收盘价计算的获利盘比例>0.5,返回10,否则返回0
X8赋值:如果收盘价/1日前的收盘价>1.03,返回10,否则返回0
XX赋值:X01+X02+X3+X4+X5+X6+X7+X8
当满足条件成交量(手)>开盘价时,在横轴0.02纵轴0.99位置书写文字,画黄色
