角斜线的角度公式源码[通达信公式]

相关标签:

原理解析：
HH20赋值:N*3日内最高价的最高值的最后一日取值设为常数 LL20赋值:N*3日内最低价的最低值的最后一日取值设为常数 K赋值:(HH20-LL20)/(N),NODRAW 输出XY:当满足条件到最后交易的周期=N时,在LL20位置画直线起点，当满足条件到最后交易的周期=1时,在HH20位置画直线终点,0表示是否延长.,线宽为1,COLORFFFFFF 输出YX:当满足条件到最后交易的周期=N时,在HH20位置画直线起点，当满足条件到最后交易的周期=1时,在LL20位置画直线终点,0表示是否延长.,线宽为1,COLORFFFFFF 输出中位线:(XY+YX)/2,线宽为1,COLORFFFFFF 输出XX:如果到最后交易的周期<N+1,返回HH20,否则返回无效数,线宽为1,COLORFFFFFF 输出YY:如果到最后交易的周期<N+1,返回LL20,否则返回无效数,线宽为1,COLORFFFFFF 当满足条件到最后交易的周期=1时,在HH20和LL20位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLORFFFFFF 当满足条件到最后交易的周期=N时,在HH20和LL20位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLORFFFFFF 输出参考标准角:(HH20-LL20)/(N*K)的反正切*57.29633,COLORFFFFFF,NODRAW MAN赋值:收盘价的N日简单移动平均,COLORAAAAFF 当满足条件到最后交易的周期=N-2时,在LL20*1.03位置书写文字,COLORAAFFFF X角K赋值:1日前的MAN-MAN的最后一日取值设为常数*(到最后交易的周期-1)+MAN的最后一日取值设为常数 输出MAN角斜线:当满足条件到最后交易的周期=N时,在X角K位置画直线起点，当满足条件到最后交易的周期=1时,在X角K位置画直线终点,0表示是否延长.,线宽为2,COLOR00FFFF 输出MAN角水平线:如果到最后交易的周期<=N,返回N-1日前的MAN角斜线的最后一日取值设为常数,否则返回无效数,线宽为2,COLOR00FFFF 当满足条件到最后交易的周期=1时,在MAN角水平线的最后一日取值设为常数和MAN角斜线位置之间画柱状线,宽度为0.03,0不为0则画空心柱.,COLOR00FFFF 输出MAN线:MAN,线宽为2,COLORAAAAFF 输出MAN角:(MAN角斜线-MAN角水平线)/(N*K)的反正切*57.29633的最后一日取值设为常数,NODRAW N的参数是10ZQ赋值:DATACOUNT-BARPOS HH20赋值:ZQ日后的N*3日内最高价的最高值 LL20赋值:ZQ日后的N*3日内最低价的最低值 K赋值:(HH20-LL20)/(N),线宽为0 输出XY:LINEVALUE(ZQ+1=N,LL20,ZQ+1=1,HH20,0,0),线宽为1,COLORFFFFFF 输出YX:LINEVALUE(ZQ+1=N,HH20,ZQ+1=1,LL20,0,0),线宽为1,COLORFFFFFF 输出中位线:(XY+YX)/2,线宽为1,COLORFFFFFF 输出XX:如果ZQ+1<N+1,返回HH20,否则返回0,线宽为0,COLORFFFFFF PARTLINE(ZQ+1<N,HH20),线宽为1,COLORFFFFFF 输出YY:如果ZQ+1<N+1,返回LL20,否则返回0,线宽为0,COLORFFFFFF PARTLINE(ZQ+1<N,LL20),线宽为1,COLORFFFFFF 当满足条件ZQ+1=1时,在HH20和LL20位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLORFFFFFF 当满足条件ZQ+1=N时,在HH20和LL20位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLORFFFFFF 参考标准角赋值:(HH20-LL20)/(N*K)的反正切*57.29633,COLORFFFFFF,线宽为0 MAN赋值:收盘价的N日简单移动平均,COLORAAAAFF 当满足条件ZQ+1=N-2时,在LL20*1.03位置书写文字,COLORAAFFFF X角K赋值:ZQ日后的1日前的MAN-MAN*(ZQ)+ZQ日后的MAN 输出MAN角斜线:LINEVALUE(ZQ+1=N,X角K,ZQ+1=1,X角K,0,0),线宽为2,COLOR00FFFF MAN角水平线A赋值:如果ZQ+1<=N,返回ZQ日后的N-1日前的MAN角斜线,否则返回0 输出MAN角水平线:MAN角水平线A[DATACOUNT],线宽为0,COLOR00FFFF PARTLINE(ZQ+1<N,MAN角水平线),线宽为2,COLOR00FFFF 当满足条件ZQ+1=1时,在ZQ日后的MAN角水平线和MAN角斜线位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLOR00FFFF,线宽为2 输出MAN线:MAN,线宽为2,COLORAAAAFF 输出MAN角:ZQ日后的(MAN角斜线-MAN角水平线)/(N*K)的反正切*57.29633,线宽为0 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

 来源:程序化99（ WWW.CXH99.COM ）

源码：

N的参数是10

HH20:=CONST(HHV(H,N*3));
LL20:=CONST(LLV(L,N*3));
K:=(HH20-LL20)/(N),NODRAW;
XY:DRAWLINE(CURRBARSCOUNT=N,LL20,CURRBARSCOUNT=1,HH20,0),LINETHICK1,COLORFFFFFF;
YX:DRAWLINE(CURRBARSCOUNT=N,HH20,CURRBARSCOUNT=1,LL20,0),LINETHICK1,COLORFFFFFF;
中位线:(XY+YX)/2,LINETHICK1,COLORFFFFFF;
XX:IF(CURRBARSCOUNT<N+1,HH20,DRAWNULL),LINETHICK1,COLORFFFFFF;
YY:IF(CURRBARSCOUNT<N+1,LL20,DRAWNULL),LINETHICK1,COLORFFFFFF;
STICKLINE(CURRBARSCOUNT=1,HH20,LL20,0,0),COLORFFFFFF;
STICKLINE(CURRBARSCOUNT=N,HH20,LL20,0,0),COLORFFFFFF;
参考标准角:ATAN((HH20-LL20)/(N*K))*57.29633,COLORFFFFFF,NODRAW;
MAN:=MA(C,N),COLORAAAAFF;
DRAWTEXT(CURRBARSCOUNT=N-2,LL20*1.03,'主图画面参考标准角=45°'),COLORAAFFFF;
X角K:=CONST(REF(MAN,1)-MAN)*(CURRBARSCOUNT-1)+CONST(MAN);
MAN角斜线:DRAWLINE(CURRBARSCOUNT=N,X角K,CURRBARSCOUNT=1,X角K,0),LINETHICK2,COLOR00FFFF;
MAN角水平线:IF(CURRBARSCOUNT<=N,CONST(REF(MAN角斜线,N-1)),DRAWNULL),LINETHICK2,COLOR00FFFF;
STICKLINE(CURRBARSCOUNT=1,CONST(MAN角水平线),MAN角斜线,0.03,0),COLOR00FFFF;
MAN线:MAN,LINETHICK2,COLORAAAAFF;
MAN角:CONST(ATAN((MAN角斜线-MAN角水平线)/(N*K))*57.29633),NODRAW;{三角形-飞狐版-by舍得快乐}
N的参数是10
ZQ:=DATACOUNT-BARPOS;
HH20:=REFX(HHV(H,N*3),ZQ);
LL20:=REFX(LLV(L,N*3),ZQ);
K:=(HH20-LL20)/(N),LINETHICK;
XY:LINEVALUE(ZQ+1=N,LL20,ZQ+1=1,HH20,0,0),LINETHICK1,COLORFFFFFF;
YX:LINEVALUE(ZQ+1=N,HH20,ZQ+1=1,LL20,0,0),LINETHICK1,COLORFFFFFF;
中位线:(XY+YX)/2,LINETHICK1,COLORFFFFFF;
XX:IF(ZQ+1<N+1,HH20,0),LINETHICK,COLORFFFFFF;
PARTLINE(ZQ+1<N,HH20),LINETHICK1,COLORFFFFFF;
YY:IF(ZQ+1<N+1,LL20,0),LINETHICK,COLORFFFFFF;
PARTLINE(ZQ+1<N,LL20),LINETHICK1,COLORFFFFFF;
STICKLINE(ZQ+1=1,HH20,LL20,0,0),COLORFFFFFF;
STICKLINE(ZQ+1=N,HH20,LL20,0,0),COLORFFFFFF;
//参考标准角:=ATAN((HH20-LL20)/(N*K))*57.29633,COLORFFFFFF,LINETHICK;
MAN:=MA(C,N),COLORAAAAFF;
DRAWTEXT(ZQ+1=N-2,LL20*1.03,'主图画面参考标准角=45°'),COLORAAFFFF;
X角K:=REFX(REF(MAN,1)-MAN,ZQ)*(ZQ)+REFX(MAN,ZQ);
MAN角斜线:LINEVALUE(ZQ+1=N,X角K,ZQ+1=1,X角K,0,0),LINETHICK2,COLOR00FFFF;
MAN角水平线A:=IF(ZQ+1<=N,REFX(REF(MAN角斜线,N-1),ZQ),0);
MAN角水平线:MAN角水平线A[DATACOUNT],LINETHICK,COLOR00FFFF;
PARTLINE(ZQ+1<N,MAN角水平线),LINETHICK2,COLOR00FFFF;
STICKLINE(ZQ+1=1,REFX(MAN角水平线,ZQ),MAN角斜线,0.8,0),COLOR00FFFF,LINETHICK2;
MAN线:MAN,LINETHICK2,COLORAAAAFF;
MAN角:REFX(ATAN((MAN角斜线-MAN角水平线)/(N*K))*57.29633,ZQ),LINETHICK;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】