[大智慧指标] 大智慧顺意操盘指标公式源码[大智慧公式]

大智慧顺意操盘公式源码：

{参数:N:5,250,14;}

源码：

1. X:=(CLOSE+HIGH+LOW)/3;
   
2. A:=EMA(X,10);
   
3. B:=ref(A,1);
   
4. if(A>B,A,0),pointdot,LINETHICK5,COLOR0000FF;
   
5. if(B>A,B,0),pointdot,LINETHICK5,COLOR00FF00;
   
6. RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
   
7. K:=SMA(RSV,3,1);
   
8. D:=SMA(K,3,1);
   
9. J:=3*K-2*D;
   
10. MTM:=C-ref(C,1);{追加用}
    
11. DY:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);{买、追加用}
    
12. DIFF:=( EMA(CLOSE,7) - EMA(CLOSE,19)),COLORwhite;
    
13. DEA:=EMA(DIFF,9),COLORf00ff0 ;
    
14. MACD:=0.90*(DIFF-DEA), COLORSTICK;
    
15. tj:=(diff>=dea);
    
16. tj1:=(diff>=0);
    
17. CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
    
18. WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=4 OR CXH=9));
    
19. STICKline(tj,h,l,0.5,0),COLORyelLOW;
    
20. STICKline(tj,o,c,4,0),COLORyelLOW;
    
21. STICKline(tj1 and tj,h,l,0.5,0),colorf00ff0;
    
22. STICKline(tj1 and tj,o,c,5,1),colorf00ff0;
    
23. STICKline(diff<dea,h,l,0.5,0),colorf0f000;
    
24. STICKline(diff<dea,o,c,3,0),colorf0f000;
    
25. {买}
    
26. DX:=LLV(J,2)=LLV(J,8);
    
27. 买:IF(CROSS(J,ref(J+0.01,1)) AND DX AND J<20,1,0),COLORRED;
    
28. 买1:=IF(LLV(DY,2)=LLV(DY,7) AND COUNT(DY<0,2) AND CROSS(DY,MA(DY,2)),1,0);
    
29. DRAWTEXT(买=1,LOW-0.02,'买'),COLORRED;
    
30. STICKLINE(买=1,H,L,0,1),COLORRED,LINETHICK2;
    
31. STICKLINE(买=1,O,C,4,1),COLORRED,LINETHICK2;
    
32. DRAWICON(买=1 AND 买1=1,LOW*0.97,1);
    
33. DRAWTEXT(买=1 AND 买1=1,LOW*0.968,'●'),COLORWHITE;
    
34. DRAWTEXT(买=1 AND 买1=1,LOW*0.968,'优'),COLOR3300FF,LINETHICK2; {本文来至CXH99.COM}
    
35. 
    
36. {卖}
    
37. 卖:IF(HHV(DY,2)=HHV(DY,7) AND COUNT(DY>50,2) AND CROSS(MA(DY,2),DY),1,0),COLORBLUE;
    
38. DRAWTEXT(卖=1,HIGH*1.02,'卖'),COLORBLUE;
    
39. STICKLINE(卖=1,H,L,0,1),COLORBLUE,LINETHICK2;
    
40. STICKLINE(卖=1,O,C,4,1),COLORBLUE,LINETHICK2;
    
41. {减仓}
    
42. DZ:=HHV(J,2)=HHV(J,8) AND J>80;
    
43. 注意:IF(CROSS(ref(J-0.01,1),J) AND ref(DZ,1),1,0),COLORYELLOW;
    
44. DRAWTEXT(注意=1 AND CLOSE<OPEN,HIGH*1.02,'减'),COLORYELLOW;
    
45. STICKLINE(注意=1,H,L,0,1),COLORYELLOW,LINETHICK2;
    
46. STICKLINE(注意=1,O,C,4,1),COLORYELLOW,LINETHICK2;
    
47. 
    
48. {买跌}
    
49. {N:5,250,14;}
    
50. KA:=N/2;
    
51. DTPL:=MA(C,N)>MA(C,N*1.5) AND MA(C,N*1.5)>MA(C,N*3) AND MA(C,3)>MA(C,N*6);
    
52. 连续走强:=COUNT(C>MA(C,N),KA)=KA;
    
53. ZQSJ:=BARSLAST(连续走强);
    
54. 下穿:=CROSS(MA(C,N),C);
    
55. GL:=MA(C,N/2)/MA(C,N*2)>=1.05;
    
56. 买跌A:=(下穿 AND ZQSJ<=3 AND DTPL AND GL)*N;
    
57. DRAWTEXT(买跌A>0 AND 卖=0,LOW-0.04,'跌'),COLOR00FF00;
    
58. 买跌:IF((下穿 AND ZQSJ<=3 AND DTPL AND GL)*N,1,0),COLOR00FF00;
    
59. STICKLINE(买跌A>0 AND 卖=0,HIGH,LOW,0,1),COLOR00FF00,LINETHICK2;
    
60. STICKLINE(买跌A>0 AND 卖=0,OPEN,CLOSE,4,1),COLOR00FF00,LINETHICK2;
    
61. {老鼠仓}
    
62. AA1:=AMOUNT/V;
    
63. BB1:=LOW<AA1*0.9;
    
64. CC1:=(CLOSE-ref(CLOSE,1))/ref(CLOSE,1)*100>1.2;
    
65. DD1:=LOW<MA(CLOSE,5)*0.921;
    
66. EE1:=V<MA(V,5)*1.5;
    
67. 老鼠仓:IF(BB1 AND CC1 AND DD1 AND EE1,1,0),COLOR0099FF;
    
68. DRAWTEXT(老鼠仓,l*0.96,'鼠'),COLOR0099FF;
    
69. STICKLINE(老鼠仓,H,L,0,1),COLOR0099FF,LINETHICK2;
    
70. STICKLINE(老鼠仓,O,C,4,1),COLOR0099FF,LINETHICK2; {本文来至CXH99.COM}
    
71. 
    
72. {加仓}
    
73. 多:=EMA(CLOSE,3);
    
74. 空:=EMA(CLOSE,5);
    
75. 均衡:=EMA(空,5);
    
76. VARF1:=COUNT(CROSS(多,均衡),2)=1;
    
77. VARF2:=COUNT(CROSS(空,均衡),2)=1;
    
78. ADD:=FILTER(VARF1 AND VARF2,2);
    
79. X1:=IF(CLOSE>=ref(CLOSE,1) AND ref(CLOSE,1)>ref(OPEN,1),1,0);
    
80. X2:=IF(CLOSE>=ref(OPEN,1) AND ref(CLOSE,1)<ref(OPEN,1),1,0);
    
81. 
    
82. DRAWTEXT(ADD AND A>=ref(B,1) AND (X1=1 OR X2=1) AND 买<>1,LOW-0.03,'加'),COLORFF00FF;
    
83. STICKLINE(ADD AND 买<>1,HIGH,LOW,0,1),COLORFF00FF,LINETHICK2;
    
84. STICKLINE(ADD AND 买<>1,OPEN,CLOSE,4,1),COLORFF00FF,LINETHICK2;
    
85. 加仓1:IF(ADD AND 买<>1,1,0),COLORFF00FF;
    
86. 
    
87. {追加} {本文来至CXH99.COM}
    
88. 
    
89. ZX:=100*EMA(EMA(MTM,12),12)/EMA(EMA(ABS(MTM),12),12);
    
90. DXGD:=LLV(DY,2)=LLV(DY,5) AND CROSS(DY,MA(DY,2));
    
91. 加仓2:IF(DXGD AND BETWEEN(DY,0,60) AND ZX>0 AND 加仓1<>1 AND (X1=1 OR X2=1) AND 买<>1,1,0),COLORFFFFFF;
    
92. DRAWTEXT(FILTER(加仓2 AND A>=ref(B,1) AND ZX>ref(ZX,1),5) AND 买<>1,LOW-0.03,'加'),COLORFFFFFF;
    
93. STICKLINE(加仓2 AND 买<>1,H,L,0,1),COLORFFFFFF,LINETHICK2;
    
94. STICKLINE(加仓2 AND 买<>1,O,C,4,1),COLORFFFFFF,LINETHICK2; {内容来至程序化交易网 CXH99.COM}
    
95. 
    
96. {完美分割}
    
97. Z:INTPART(c/0.913 )*0.913,pointdot,LINETHICK2,colorgreen;
    
98. Z+(0.913),pointdot,LINETHICK2,colorgreen ;
    
99. Y:INTPART(c/3.652 )*3.652,pointdot,LINETHICK2,colorred;
    
100. Y+(3.652),pointdot,LINETHICK2,colorred;
     
101. 
     
102. {画线}
     
103. mj:=ZIG(3,10)>ref(ZIG(3,10),1) AND ref(ZIG(3,10),1)>ref(ZIG(3,10),2) AND ref(ZIG(3,10),2)<ref(ZIG(3,10),3) AND ZIG(3,5)>ref(ZIG(3,5),1) AND ref(ZIG(3,5),1)>ref(ZIG(3,5),2) AND ref(ZIG(3,5),2)<ref(ZIG(3,5),3)*48;
     
104. mc:=ZIG(3,10)<ref(ZIG(3,10),1) AND ref(ZIG(3,10),1)<ref(ZIG(3,10),2) AND ref(ZIG(3,10),2)>ref(ZIG(3,10),3) AND ZIG(3,5)<ref(ZIG(3,5),1) AND ref(ZIG(3,5),1)<ref(ZIG(3,5),2) AND ref(ZIG(3,5),2)>ref(ZIG(3,5),3)*(-47);
     
105. va1:=FILTER(llv(c,5)=llv(c,110) and mj,20);
     
106. va2:=FILTER(HHV(c,5)=HHV(c,110) and mc,20);
     
107. DRAWLINE(va2,HHV(h,5),va1,HHV(h,5),1),colorwhite;
     
108. DRAWLINE(va2,llv(l,5),va1,llv(l,5),1),color00ff00;
     
109. DRAWLINE(c=HHV(c,60),HHV(h,3),c=HHV(c,30) and c<HHV(c,45),HHV(HIGH,3),1),coloryelLOW;
     
110. DRAWLINE(c=LLV(c,60),LOW,c=LLV(c,30) and c>llv(c,45),LLV(LOW,3),1),colorffcc66;
     
111. DRAWLINE(HIGH>=HHV(HIGH,60),HIGH,LOW<=LLV(LOW,60),HHV(HIGH,6),1),colorffcccc;
     
112. DRAWLINE(LOW<=LLV(LOW,60),LOW,HHV(c,6)>=HHV(h,60),LLV(LOW,6),1),colorblue;
     
113. va11:=HIGH>=HHV(HIGH,60);
     
114. v1:=(ref(va11,1)>0 and va11<1);
     
115. va12:=LOW<=LLV(LOW,60);
     
116. v2:=ref(va12,1)>0 and va12<1;
     
117. DRAWLINE(v1,HIGH,v2,HHV(HIGH,6),1),colorffff33;
     
118. DRAWLINE(v2,LOW,v1,LLV(LOW,6),1),color0099ff;
     

复制代码

下载 (65.76 KB)

2018-12-15 10:27

感謝分享、版主辛苦了