您现在的位置:程序化交易>> 股票公式>> 其他>> 其他软件公式>>正文内容

前高前低划线主图指标 公式 源码[其他软件公式]

指标公式代码分析及使用说明:

 

该公式为股票K线图的分析指标,用于识别股价的趋势和转折点。其中,xtqk表示相对的底部形态,hhv表示最高值,llv表示最低值,backset表示在过去的某个时间范围内查找条件成立的最后一个位置,filter表示过滤器,barscount表示当前时间到数据表开始时间的间隔数目,DATACOUNT表示当前数据量。通过计算前一高和前一低来确定曲线的位置,并将其与历史数据进行比较,从而获得预测结果。建议在实际使用时,需要根据具体情况适当调整参数值。

 

源码:
 

{飞狐划线主图}
INPUT:N(3,1,100);
DRAWTEXT(l>REF(H,1),REF(H,1),'←<'),COLORRED;
DRAWTEXT(h<REF(L,1),REF(L,1),'←<'),COLORGREEN;{http://www.cxh99.com}
xtqk:=h<REF(L,1);
xtqkdw:=xtqk>ref(xtqk,1);
xtqkwz1:=BARSLAST(xtqkdw);
xtqkwz2:=xtqkwz1+1;
xtqkg1:=ref(h,xtqkwz1);
xtqkg2:=ref(l,xtqkwz2);
A1:=ref(h,N)=hhv(h,2*N+1);
B1:=filter(A1,N);
C1:=backset(B1,N+1);
D1:=filter(C1,n);
A2:=ref(l,N)=llv(l,2*N+1);
B2:=filter(A2,N);
C2:=backset(B2,N+1);
D2:=filter(C2,N);
E1:=(ref(llv(l,2*N),1)+ref(hhv(h,2*N),1))/2;
E2:=(h+l)/2;
H1:=(D1 AND not(D2 AND E1>=E2)) OR barstatus=2 OR barscount(c)=1;
L1:=(D2 AND not(D1 AND E1<E2)); H2:=D1 AND not(D2 AND E1>=E2);
X1:=ref(barslast(H1),1)+1;
F1:=backset(H1 AND count(L1,X1)>0,llvbars(if(L1,l,10000),X1));
G1:=F1>ref(F1,1);
I1:=backset(G1,2);
LD:=I1>ref(I1,1);
L2:=LD OR barstatus=2 OR barscount(c)=1;
X2:=ref(barslast(L2),1)+1;
F2:=backset(L2 AND count(H2,X2)>0,hhvbars(if(H2,h,0),X2));
G2:=F2>ref(F2,1);
I2:=backset(G2,2);
HD:=I2>ref(I2,1);
T1:=backset(barstatus=2,barslast(LD)+1); U1:=T1>ref(T1,1);
T2:=backset(U1,ref(barslast(LD),1)+2); U2:=T2>ref(T2,1);
T3:=backset(U2,ref(barslast(LD),1)+2); U3:=T3>ref(T3,1);
T4:=backset(U3,ref(barslast(LD),1)+2); U4:=T4>ref(T4,1);
T5:=backset(U4,ref(barslast(LD),1)+2); U5:=T5>ref(T5,1);
T6:=backset(U5,ref(barslast(LD),1)+2); U6:=T6>ref(T6,1);
T7:=backset(U6,ref(barslast(LD),1)+2); U7:=T7>ref(T7,1);
T8:=backset(U7,ref(barslast(LD),1)+2); U8:=T8>ref(T8,1);
T9:=backset(U8,ref(barslast(LD),1)+2); U9:=T9>ref(T9,1);
T10:=backset(U9,ref(barslast(LD),1)+2); U10:=T10>ref(T10,1);
T11:=backset(U10,ref(barslast(LD),1)+2); U11:=T11>ref(T11,1);
T12:=backset(U11,ref(barslast(LD),1)+2); U12:=T12>ref(T12,1);
T13:=backset(U12,ref(barslast(LD),1)+2); U13:=T13>ref(T13,1);
T14:=backset(U13,ref(barslast(LD),1)+2); U14:=T14>ref(T14,1);
T15:=backset(U14,ref(barslast(LD),1)+2); U15:=T15>ref(T15,1);
R1:=backset(barstatus=2,barslast(HD)+1); S1:=R1>ref(R1,1);
R2:=backset(S1,ref(barslast(HD),1)+2); S2:=R2>ref(R2,1);
R3:=backset(S2,ref(barslast(HD),1)+2); S3:=R3>ref(R3,1);
R4:=backset(S3,ref(barslast(HD),1)+2); S4:=R4>ref(R4,1);
R5:=backset(S4,ref(barslast(HD),1)+2); S5:=R5>ref(R5,1);
R6:=backset(S5,ref(barslast(HD),1)+2); S6:=R6>ref(R6,1);
R7:=backset(S6,ref(barslast(HD),1)+2); S7:=R7>ref(R7,1);
R8:=backset(S7,ref(barslast(HD),1)+2); S8:=R8>ref(R8,1);
R9:=backset(S8,ref(barslast(HD),1)+2); S9:=R9>ref(R9,1);
R10:=backset(S9,ref(barslast(HD),1)+2); S10:=R10>ref(R10,1);
R11:=backset(S10,ref(barslast(HD),1)+2); S11:=R11>ref(R11,1);
R12:=backset(S11,ref(barslast(HD),1)+2); S12:=R12>ref(R12,1);
R13:=backset(S12,ref(barslast(HD),1)+2); S13:=R13>ref(R13,1);
R14:=backset(S13,ref(barslast(HD),1)+2); S14:=R14>ref(R14,1);
R15:=backset(S14,ref(barslast(HD),1)+2); S15:=R15>ref(R15,1);
前一低:=REF(L,BARSLAST(u1));
前二低:=REF(L,BARSLAST(u2));
前三低:=REF(L,BARSLAST(u3));
前四低:=REF(L,BARSLAST(u4));
前五低:=REF(L,BARSLAST(u5));
前六低:=REF(L,BARSLAST(u6));
前七低:=REF(L,BARSLAST(u7));
前八低:=REF(L,BARSLAST(u8));
前九低:=REF(L,BARSLAST(u9));
前十低:=REF(L,BARSLAST(u10));
前十一低:=REF(L,BARSLAST(u11));
前十二低:=REF(L,BARSLAST(u12));
前十三低:=REF(L,BARSLAST(u13));
前十四低:=REF(L,BARSLAST(u14));
前十五低:=REF(L,BARSLAST(u15));
前一高:=REF(H,BARSLAST(s1));
前二高:=REF(H,BARSLAST(s2));
前三高:=REF(H,BARSLAST(s3));
前四高:=REF(H,BARSLAST(s4));
前五高:=REF(H,BARSLAST(s5));
前六高:=REF(H,BARSLAST(s6));
前七高:=REF(H,BARSLAST(s7));
前八高:=REF(H,BARSLAST(s8));
前九高:=REF(H,BARSLAST(s9));
前十高:=REF(H,BARSLAST(s10));
前十一高:=REF(H,BARSLAST(s11));
前十二高:=REF(H,BARSLAST(s12));
前十三高:=REF(H,BARSLAST(s13));
前十四高:=REF(H,BARSLAST(s14));
前十五高:=REF(H,BARSLAST(s15));
qdwz1:=BARSLAST(u1);
qdwz2:=BARSLAST(u2);
qdwz3:=BARSLAST(u3);
qdwz4:=BARSLAST(u4);
qdwz5:=BARSLAST(u5);
qdwz6:=BARSLAST(u6);
qdwz7:=BARSLAST(u7);
qdwz8:=BARSLAST(u8);
qdwz9:=BARSLAST(u9);
qdwz10:=BARSLAST(u10);
qdwz11:=BARSLAST(u11);
qdwz12:=BARSLAST(u12);
qdwz13:=BARSLAST(u13);
qdwz14:=BARSLAST(u14);
qdwz15:=BARSLAST(u15);
qgwz1:=BARSLAST(s1);
qgwz2:=BARSLAST(s2);
qgwz3:=BARSLAST(s3);
qgwz4:=BARSLAST(s4);
qgwz5:=BARSLAST(s5);
qgwz6:=BARSLAST(s6);
qgwz7:=BARSLAST(s7);
qgwz8:=BARSLAST(s8);
qgwz9:=BARSLAST(s9);
qgwz10:=BARSLAST(s10);
qgwz11:=BARSLAST(s11);
qgwz12:=BARSLAST(s12);
qgwz13:=BARSLAST(s13);
qgwz14:=BARSLAST(s14);
qgwz15:=BARSLAST(s15);
tj1:=if(qdwz1<qgwz1,1,0);
SA1:=DATACOUNT;
if TJ1[SA1]=0 then begin
TJ_1A01_XT1:=xtqkwz1<qgwz1 and 前一低<ref(h,xtqkwz1);
if TJ_1A01_XT1[SA1] then begin
A_1A01_XT1:=((前一高-前一低)*(qdwz1-xtqkwz1))/(xtqkg1-前一低)+0.5;
B_1A01_XT1:=(xtqkg1-前一低)/(qdwz1-xtqkwz1);
C_1A01_XT1:=A_1A01_XT1-(qdwz1-qgwz1);
DRAWSL(u1,l,B_1A01_XT1[datacount],A_1A01_XT1[datacount],0),Coloryellow;
DRAWSL(s1,h,0,C_1A01_XT1[datacount],0),coloryellow;
A_1A01_XT2:=((前一高-前一低)*(qdwz1-xtqkwz2))/(xtqkg2-前一低)+0.5;
B_1A01_XT2:=(xtqkg2-前一低)/(qdwz1-xtqkwz2);
C_1A01_XT2:=A_1A01_XT2-(qdwz1-qgwz1);
DRAWSL(u1,l,B_1A01_XT2[datacount],A_1A01_XT2[datacount],0),Coloryellow;
end;
TJ_1A02_XT1:=xtqkwz1<qgwz2 and 前二低<ref(h,xtqkwz1) and xtqkwz1>qgwz1;
if TJ_1A02_XT1[SA1] then begin
A_1A02_XT1:=((前二高-前二低)*(qdwz2-xtqkwz1))/(xtqkg1-前二低)+0.5;
B_1A02_XT1:=(xtqkg1-前二低)/(qdwz2-xtqkwz1);
C_1A02_XT1:=A_1A02_XT1-(qdwz2-qgwz2);
DRAWSL(u2,l,B_1A02_XT1[datacount],A_1A02_XT1[datacount],0),Coloryellow;
DRAWSL(s2,h,0,C_1A02_XT1[datacount],0),coloryellow;
A_1A02_XT2:=((前二高-前二低)*(qdwz2-xtqkwz2))/(xtqkg2-前二低)+0.5;
B_1A02_XT2:=(xtqkg2-前二低)/(qdwz2-xtqkwz2);
C_1A02_XT2:=A_1A02_XT2-(qdwz2-qgwz2);
DRAWSL(u2,l,B_1A02_XT2[datacount],A_1A02_XT2[datacount],0),Coloryellow;
end;
TJ_1A03_XT1:=xtqkwz1<qgwz3 and 前三低<ref(h,xtqkwz1) and xtqkwz1>qgwz2;
if TJ_1A03_XT1[SA1] then begin
A_1A03_XT1:=((前三高-前三低)*(qdwz3-xtqkwz1))/(xtqkg1-前三低)+0.5;
B_1A03_XT1:=(xtqkg1-前三低)/(qdwz3-xtqkwz1);
C_1A03_XT1:=A_1A03_XT1-(qdwz3-qgwz3);
DRAWSL(u3,l,B_1A03_XT1[datacount],A_1A03_XT1[datacount],0),Coloryellow;
DRAWSL(s3,h,0,C_1A03_XT1[datacount],0),coloryellow;
A_1A03_XT2:=((前三高-前三低)*(qdwz3-xtqkwz2))/(xtqkg2-前三低)+0.5;
B_1A03_XT2:=(xtqkg2-前三低)/(qdwz3-xtqkwz2);
C_1A03_XT2:=A_1A03_XT2-(qdwz3-qgwz3);
DRAWSL(u3,l,B_1A03_XT2[datacount],A_1A03_XT2[datacount],0),Coloryellow;
end;
TJ_1A04_XT1:=xtqkwz1<qgwz4 and 前四低<ref(h,xtqkwz1) and xtqkwz1>qgwz3;
if TJ_1A04_XT1[SA1] then begin
A_1A04_XT1:=((前四高-前四低)*(qdwz4-xtqkwz1))/(xtqkg1-前四低)+0.5;
B_1A04_XT1:=(xtqkg1-前四低)/(qdwz4-xtqkwz1);
C_1A04_XT1:=A_1A04_XT1-(qdwz4-qgwz4);
DRAWSL(u4,l,B_1A04_XT1[datacount],A_1A04_XT1[datacount],0),Coloryellow;
DRAWSL(s4,h,0,C_1A04_XT1[datacount],0),coloryellow;
 

 

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

 

 

有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

怎么收费,代编流程等详情请点击查阅!

(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容