通达信凯恩斯工作线源码

 通达信凯恩斯工作线源码

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

1. X0:=IF(C>=REF(C,1),AMOUNT/10000,0);   
2. X1:=IF(C<REF(C,1),AMOUNT/10000,0);   
3. DD:=(X0-X1);   
4. EE:=VOL/SUM(VOL,55);   
5. LC:=REF(CLOSE,1);   
6. JH:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;   
7. CP:FILTER(CROSS(75,JH),11);   
8. ZP:FILTER(CROSS(JH,25),22);   
9. DP:IF(C>1000,(DD/10000000000)/EE,DD/(FINANCE(33)*FINANCE(37)/4))*100;   

 

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

1. 七天线:MA(C,7),COLORFFFFFF;   
2. 工作线:EMA(C,14),POINTDOT,LINETHICK4,COLORYELLOW;   
3. 生命线:MA(C,22),LINETHICK2,COLORFF00FF;   
4. 季线:MA(C,66),LINETHICK2,COLOR0000FF;   
5. 半年线:MA(C,120),LINETHICK2,COLORFFFF00;   
6. 长期趋势线:MA(C,240),CIRCLEDOT,COLOREEBBEE;   
7. A0:="CPZB.ZP";   
8. A1:="CPZB.CP";   
9. A2:="CPZB.DP";   
10. STICKLINE((A2>=2.1),H,L,0,1),COLORGREEN;   
11. STICKLINE(((A2>=2.1) AND (C>REF(C,1))),O,C,3,1),COLORGREEN;   
12. STICKLINE(((A2>=2.1) AND (C<REF(C,1))),C,O,3,0),COLORGREEN;   
13. STICKLINE(((A2>0) AND (A2<5)),H,L,0,1),COLORRED;   
14. STICKLINE((((A2>0) AND (A2<5)) AND (C>REF(C,1))),O,C,3,0),COLORRED;   
15. STICKLINE((((A2>0) AND (A2<5)) AND (C<REF(C,1))),C,O,3,1),COLORRED;   
16. STICKLINE(((C>=工作线) AND (C>REF(C,1))),H,L,0,1),COLORRED;   
17. STICKLINE(((C>=工作线) AND (C>REF(C,1))),O,C,3,1),COLORRED;   
18. STICKLINE(((C>=工作线) AND (C<REF(C,1))),H,L,0,0),COLORRED;   
19. STICKLINE(((C>=工作线) AND (C<REF(C,1))),O,C,3,0),COLORRED;   
20. STICKLINE(((C<工作线) AND (C>REF(C,1))),H,L,0,1),COLORGREEN;   
21. STICKLINE(((C<工作线) AND (C>REF(C,1))),O,C,3,1),COLORGREEN;   
22. STICKLINE(((C<工作线) AND (C<REF(C,1))),H,L,0,0),COLORGREEN;   
23. STICKLINE(((C<工作线) AND (C<REF(C,1))),O,C,3,0),COLORGREEN;   
24. DRAWTEXT(A0,L,'￣￣'),LINETHICK2,COLORFFFFFF;   
25. DRAWTEXT(A0,L*0.999,' B-B'),LINETHICK5,COLORFFFFFF;   
26. DRAWTEXT(A1,H,'￣￣'),LINETHICK2,COLORCYAN;   
27. DRAWTEXT(A1,H*1.001,' S-S'),LINETHICK5,COLORCYAN;   
28. STICKLINE(A1,C,O,3,0),COLORFFFF00;   
29. STICKLINE(A1,H,L,0,0),COLORFFFF00;   
30. STICKLINE(A0,C,O,3,0),COLORFFFFFF;   
31. STICKLINE(A0,H,L,0,0),COLORFFFFFF;   
32. STICKLINE((A2>=10 AND A2<30),C,O,0,0),COLORFFBBFF;   
33. STICKLINE((A2>=10 AND A2<30),C,O,2,0),COLORMAGENTA;   
34. STICKLINE((A2>=10 AND A2<30),C,O,2.6,0),COLORFF22FF;   
35. STICKLINE((A2>=10 AND A2<30),C,O,2.2,0),COLORFF44FF;   
36. STICKLINE((A2>=10 AND A2<30),C,O,1.8,0),COLORFF66FF;   
37. STICKLINE((A2>=10 AND A2<30),C,O,1.4,0),COLORFF88FF;   
38. STICKLINE((A2>=10 AND A2<30),C,O,1,0),COLORFF99FF;   
39. STICKLINE((A2>=10 AND A2<30),C,O,0.6,0),COLORFFAAFF;   
40. STICKLINE((A2>=10 AND A2<30),C,O,0,0),COLORFFBBFF;   
41. A3:=EMA((((SLOPE(C,21)) * 20) + C),68);   
42. A4:=EMA(C,10);   
43. A5:=REF(C,2);   
44. A6:=((SMA((MAX((C - A5),0)),6,1)) / (SMA(ABS((C - A5)),6,1))) * 100;   
45. A7:=IF(((A6 < (REF(A6,1))) AND (A6 > 79)),A6,0);   
46. DRAWTEXT((CROSS(A4,A3)),L,'△'),LINETHICK2,COLORYELLOW;   
47. DRAWTEXT(A7,H,'○'),LINETHICK3,COLORGREEN;   
48. A8:=LLV(L,21);   
49. A9:=HHV(H,21);   
50. A10:=EMA((((CLOSE - A8) / (A9 - A8)) * 100),5);   
51. A11:=EMA((((CLOSE - A8) / (A9 - A8)) * 50),13);   
52. A12:=EMA(((0.667 * (REF(A10,1))) + (0.333 * A10)),2);   
53. A13:=LLV(L,55);   
54. A14:=HHV(H,34);   
55. A15:=EMA((((C - A13) / (A14 - A13)) * 100),3);   
56. A16:=(A11 + A15) / 2;   
57. A17:=EMA(((0.667 * (REF(A15,1))) + (0.333 * A10)),2);   
58. A18:=EMA(A16,5);   
59. A19:=EMA(((0.667 * (REF(A18,1))) + (0.333 * A18)),2);   
60. A20:=CROSS(A10,A11);   
61. A21:=(CROSS(A10,A19)) AND (A19 < 30);   
62. A22:=A21 * 0.6;   
63. DRAWTEXT((A22 = 0.6),L,'◇'),COLORYELLOW;   
64. DRAWTEXT((A20 = 1),L,'◇'),COLORWHITE;