通达信缺口公式十分不错源码

 通达信缺口公式十分不错源码

{牛牛指标网提供：www.tdx001.com}
复制内容到剪贴板

1. P:=0;   
2. KOH:=L>REF(H,1);   
3. KOL:=H<REF(L,1);   
4. HIF:=L>REF(H,BARSLAST(KOH)+1);   
5. NHIF:=L<=REF(H,BARSLAST(KOH)+1);   
6. LIF:=H<REF(L,BARSLAST(KOL)+1);   
7. NLIF:=H>=REF(L,BARSLAST(KOL)+1);   
8. N:=8{1 100 8};   
9. AA:=REF(H,N)=HHV(H,2*N+1);     
10. AA1:=REF(L,N)=LLV(L,2*N+1);   
11. QY:=BACKSET(AA,N+1);     
12. QY1:=BACKSET(AA1,N+1);   
13. CC:=FILTER(QY,N) AND H=HHV(H,N+1);     
14. CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);   
15. DDD:=BARSLAST(CC);     
16. DD1:=BARSLAST(CC1);   
17. GDTS:=IF(CC,CURRBARSCOUNT,0);     
18. DDTS:=IF(CC1,CURRBARSCOUNT,0);   
19. DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);     
20. DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);   
21. GDCS1:=CONST(DINGBUTS);     
22. DDCS1:=CONST(DDTS1);   
23. GDCS13:=CONST(REF(HIGH,GDCS1-1));     
24. DDCS13:=CONST(REF(L,DDCS1-1));   
25. DINGBUTS1:=REF(DINGBUTS,DDD+1);     
26. DDTS2:=REF(DDTS1,DD1+1);   
27. GDCS2:=CONST(DINGBUTS1);     
28. DDCS2:=CONST(DDTS2);   
29. GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));    
30. DDCS23:=CONST(REF(L,DDTS2-1));   
31. XG1:=BACKSET(ISLASTBAR,GDCS1);     
32. XD1:=BACKSET(ISLASTBAR,DDCS1);   
33. XG2:=BACKSET(ISLASTBAR,DINGBUTS1);     
34. XD2:=BACKSET(ISLASTBAR,DDTS2);   
35. XDD:=IF(DDCS13<=DDCS23,XD1,XD2);   
36. BCG:=SUM(XG1,0);   
37. BCD:=SUM(XDD,0);   
38. 上缺口:=P=0 AND HIF AND BARSLAST(KOH)<BARSLAST(NHIF) AND BARSLAST(HIF)<BARSLAST(NHIF);   
39. HG:=IF(上缺口{ AND DATE<1091201}{},REF(H,BARSLAST(KOH)+1),DRAWNULL);   
40. STICKLINE(上缺口,HG,HG*1.001,10,0),COLOR888888;   
41. 下缺口:=P=0 AND LIF AND BARSLAST(KOL)<BARSLAST(NLIF) AND BARSLAST(LIF)<BARSLAST(NLIF);   
42. LG:=IF(下缺口{ AND DATE<1091201}{},REF(L,BARSLAST(KOL)+1),DRAWNULL);   
43. STICKLINE(下缺口{ AND DATE<1091201}{},LG,LG*0.999,10,0),COLOR888888;   

C274554429.png