软件名称：[B]【通达信】立体K线及背离－－-【源码－－-贴图－－-TNI格式公式】[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：3.00 KB
官方主页：Home Page
更新时间：2013-11-28 06:01:36
软件简介:

1. {P1(1,260,5),P2(1,260,10),P3(1,260,20),P4(1,260,30),P5(1,300,60),P6(1,999,120),N(0,6,3)}
    
2. WX:=MA(CLOSE,0);
    
3. M1:MA(CLOSE,P1);
    
4. M2:MA(CLOSE,P2)*IF(N<2,WX,1);
    
5. M3:MA(CLOSE,P3)*IF(N<3,WX,1);
    
6. M4:MA(CLOSE,P4)*IF(N<4,WX,1);
    
7. M5:MA(CLOSE,P5)*IF(N<5,WX,1);
    
8. M6:MA(CLOSE,P6)*IF(N<6,WX,1);
    
9. 
    
10. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR009900;
     
11. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.5,0 ),COLOR00CC00;
     
12. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.4,0 ),COLOR33FF00;
     
13. STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.1,0 ),COLOR66FF00;
     
14. 
     
15. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0 ),COLOR000099;
     
16. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.5,0 ),COLOR0000CC;
     
17. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.4,0 ),COLOR0000FF;
     
18. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.1 ,0 ),COLOR0033FF;
     
19. 
     
20. STICKLINE(CLOSE>OPEN,OPEN,LOW,0,0 ),COLOR9933FF;
     
21. STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0 ,0 ),COLOR9933FF;
     
22. STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0,0 ),COLOR66CC33;
     
23. STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0 ,0 ),COLOR66CC33;
     
24. 
     
25. A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
     
26. B1:=REF(CLOSE,A1+1)>CLOSE AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
     
27. 
     
28. A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
     
29. B2:=REF(CLOSE,A2+1)>CLOSE AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
     
30. 
     
31. A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
     
32. B3:=REF(CLOSE,A3+1)>CLOSE AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
     
33. 
     
34. FIL1:=FILTER(B1>0,7) OR FILTER(B2>0,7) OR FILTER(B3>0,7);
     
35. DRAWTEXT(FIL1,LOW-0.02,'K线底背'),COLORRED;
     
36. 
     
37. C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
     
38. D1:=REF(CLOSE,C1+1)<CLOSE AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
     
39. 
     
40. C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
     
41. D2:=REF(CLOSE,C2+1)<CLOSE AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K");
     
42. 
     
43. C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
     
44. D3:=REF(CLOSE,C3+1)<CLOSE AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
     
45. 
     
46. FIL2:=FILTER(D1>0,7) OR FILTER(D2>0,7) OR FILTER(D3>0,7);
     
47. DRAWTEXT(FIL2,HIGH+0.1,'K线顶背'),COLORBLUE;

[url=http://www.70822.com/soft/sort013/sort05/down-67727.html]【通达信】立体K线及背离－－-【源码－－-贴图－－-TNI格式公式】[/url]