INPUT:N(3,1,100); 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; A_1A04_XT2:=((前四高-前四低)*(qdwz4-xtqkwz2))/(xtqkg2-前四低)+0.5; B_1A04_XT2:=(xtqkg2-前四低)/(qdwz4-xtqkwz2); C_1A04_XT2:=A_1A04_XT2-(qdwz4-qgwz4); DRAWSL(u4,l,B_1A04_XT2[datacount],A_1A04_XT2[datacount],0),Coloryellow; end; TJ_1A01:=前一高<前二高; if TJ_1A01[SA1] then begin A_1A01:=((前二 |
- 软件大小:0 Bytes
- 推荐星级:
- 更新时间:2012-04-13 05:08:37
- 软件类别: 国产软件 / 通达信公式
- 软件语言:简体中文
- 授权方式: 共享软件
- 联系方式:暂无联系方式
- 官方主页: Home Page
- 点击大图: 【一键转帖到论坛】
- 插件情况:
- 运行环境:Win2000/WinXP/Win2003/WinVista
- 相关Tags:指标公式 股票软件,公式源码
-
(0)0%(0)0%
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!