通达信东家每日解盘公式

[复制链接]
查看324 | 回复0 | 2022-7-24 09:04:00 | 显示全部楼层 |阅读模式

为解决通达信解盘难题,我归纳了一些股友的作品,用分栏列出的的方法进行了尝试,经过多次的试验测试,能对大盘趋势;长短线进出;KDJ.MACD.RSI.DMI.CCI.圆底的底顶背离;成交量能;短线是银买点等进行每天自动测算列出。对个股的持股持币有指导性作用,希使更多的股友经过我的公布能多创作出更好的作品,并给我一份参考。希大家看好顶贴加分,也希望高手提供建议,将此指标更完善。
 

复制内容到剪贴板
  1. {N:5,30,8;ZF:1,10,5;M:1.100.3;}   
  2. V1:=MA(V,5);   
  3. V2:=MA(V,10);   
  4. MA5:=MA(CLOSE,5);   
  5. MA10:=MA(CLOSE,10);   
  6. MA13:=MA(CLOSE,13);   
  7. MA20:=MA(CLOSE,20);   
  8. MA40:=MA(CLOSE,40);   
  9. MA60:=MA(CLOSE,60);   
  10. MA75:=MA(CLOSE,75);   
  11.   
  12. LC:=REF(C,1);   
  13. K9:=SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1);   
  14. STICKLINE(1=1,11,-1,4,0),COLOR444444;   
  15. STICKLINE(C<=MA(C,13) AND MA(C,13)<=REF(MA(C,13),1),11,-1,4,0),COLOR663300;   
  16. STICKLINE(C>=MA(C,13) AND MA(C,13)>=REF(MA(C,13),1),11,-1,4,0),COLOR000055;   
  17. D9:=SMA(K9,3,1);   
  18. J9:=3*K9-2*D9;   
  19. KK:K9*0.1;   
  20. JJ:J9*0.1;   
  21. VAR1:=DYNAINFO(17)*REF(MA(V,5),1);   
  22. VAR2:=DYNAINFO(7)=C AND DYNAINFO(10)=AMOUNT;   
  23. VAR3:=IF(DYNAINFO(7)=C AND DYNAINFO(10)=AMOUNT,VAR1,VAR2);   
  24. VAR4:=BARSLAST(CROSS(MA5,MA60));   
  25. VAR5:=BARSLAST(CROSS(MA10,MA60));   
  26. VAR6:=BARSLAST(HIGH=HHV(HIGH,VAR5));   
  27. VAR7:=BARSLAST(CROSS(MA10,MA5));   
  28. VAR8:=BARSLAST(CROSS(MA5,MA10));   
  29. VAR9:=VAR4>VAR5 AND VAR5>VAR6 AND VAR6>VAR7 AND VAR7>VAR8 AND VAR8<5;   
  30. VARA:=COUNT(CROSS(MA10,MA5),VAR5)=1;   
  31. VARB:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100;   
  32. VARC:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100;   
  33. VARD:=(VARC-VARB)/20+6;   
  34.   
  35. AA:=MA(VARD,5);   
  36. YYY:=EMA((INDEXC-LLV(INDEXL,11))/(HHV(INDEXH,25)-LLV(INDEXL,11))*4,8)+1;   
  37. YY:=POW(YYY,2)-10;   
  38. XXX:=EMA((C-LLV(L,11))/(HHV(H,25)-LLV(L,11))*4,8)+1;   
  39. XX:=IF(1=1,POW(XXX,2)-10,DRAWNULL);   
  40.   
  41. 预:=CLOSE>MA(CLOSE,13);   
  42. 升:=CLOSE>MA(CLOSE,5) AND CLOSE<MA(CLOSE,13);   
  43. CCI背:=IF(LLV(CCI,2)>LLV(CCI,7) AND LLV(L,2)<=LLV(L,7)  AND HHV(H,10)>MA(CLOSE,60),1,0),COLORWHITE;   
  44. TR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);   
  45. HD:=HIGH-REF(HIGH,1);   
  46. LD:=REF(LOW,1)-LOW;   
  47. PDM:=SUM(IF(HD>0 AND HD>LD,HD,0),14);   
  48. MDM:=SUM(IF(LD>0 AND LD>HD,LD,0),14);   
  49. PDI:=PDM*100/TR;   
  50. MDI:=MDM*100/TR;   
  51. A1:=BARSLAST(REF(CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)),1));   
  52. B1:=REF(C,A1+1)>C && REF("MACD.DIF"(12,26,9),A1+1)<"MACD.DIF"(12,26,9) && CROSS ("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9));   
  53. A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));   
  54. B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS ("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));   
  55. A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));   
  56. B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS ("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));   
  57. C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)),1));   
  58. D1:=REF(C,C1+1)<C AND REF("MACD.DIF"(12,26,9),C1+1)>"MACD.DIF"(12,26,9) AND CROSS ("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9));   
  59. C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));   
  60. D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS ("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));   
  61. C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));   
  62. D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS ("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));   
  63. C4:=BARSLAST(REF(CROSS(MDI,PDI),1));   
  64. D4:=REF(C,C4+1)<C AND REF(MDI,C4+1)>MDI AND CROSS(MDI,PDI);   
  65. A4:=BARSLAST(REF(CROSS(PDI,MDI),1));   
  66. B4:=REF(C,A4+1)>C AND REF(PDI,A4+1)<PDI AND CROSS(PDI,MDI);   
  67.   
  68. PDAY1:=BARSLAST(CROSS(MA60,MA5));    
  69. PDAY2:=BARSLAST(CROSS(MA60,MA10));    
  70. PDAY3:=BARSLAST(LOW=LLV(LOW,PDAY2));   
  71. PDAY4:=BARSLAST(CROSS(MA5,MA10));   
  72. PDAY5:=BARSLAST(CROSS(MA10,MA5));   
  73. A11:=PDAY1>PDAY2 AND PDAY2>PDAY3 AND PDAY3>PDAY4 AND PDAY4>PDAY5 AND PDAY5<5;    
  74. A12:=COUNT(CROSS(MA10,MA5),PDAY2)=1;   
  75. A13:=OPEN<MA20 OR OPEN<MA40 OR OPEN<MA60;   
  76. A14:=C>MAX(MA20,MAX(MA40,MA60));   
  77. A15:=V/MA(V,30)>1.2;   
  78. A16:=C/REF(C,1)>1.049;   
  79. A17:=MIN(MA(C,5),MA(C,10))>MA(C,60) AND CROSS(MA(C,5),MA(C,10));   
  80. A18:=MIN(MA(C,5),MA(C,10))/MA(C,60)<1.05;   
  81. A19:=COUNT(V<MA(V,10),10)>6;   
  82. A20:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;   
  83. A21:=SMA(SMA(A20,3,1),3,1)/28.57;   
  84. A22:=EMA(A21,5);   
  85. A23:=3*A21-2*A22;   
  86. A24:=(LOW+HIGH+CLOSE*2)/4;   
  87. A25:=MA(A24,4);   
  88. A26:=HHV(A25,10);   
  89. A27:=MA(A26,3);   
  90. A28:=1.25*A27-0.25*A26;   
  91. A29:=IF(A28>A26,A26,A28);   
  92. A30:=LLV(A25,10);   
  93. A31:=MA(A30,3);   
  94. A32:=1.25*A31-0.25*A30;   
  95. A33:=IF(A32<A30,A30,A32);   
  96. A34:=CROSS(C,A33) AND CROSS(C,MA13) AND CROSS(C,A29);   
  97. A35:=CROSS(C,MA13) AND CROSS(C,A29);   
  98.   
  99.   
  100. DRAWTEXT(IF(YY<-8.6 AND INDEXC<(MA(INDEXC,26)-2.2*STD(INDEXC,26)) AND PERIOD=5,10,DRAWNULL)=10 AND CURRBARSCOUNT=40,10,'大盘  
  101. 低'),COLOR0055FF;   
  102. DRAWTEXT(IF(YY>10.8 AND INDEXC>(MA(INDEXC,26)+2*STD(INDEXC,26)) AND PERIOD=5,9,DRAWNULL)=9 AND CURRBARSCOUNT=40,10,'大盘高'),COLORFFFF00;   
  103. DRAWTEXT(CONST(IF(C>=MA(C,10) AND MA(C,10)>REF(MA(C,10),1) AND MA(C,20)>REF(MA(C,20),1) AND MA(C,40)>REF(MA(C,40),1) AND MA   
  104. (C,10)>REF(MA(C,20),1),1,0)) AND CURRBARSCOUNT=40,11,'上升趋势'),COLOR0033FF;   
  105. DRAWTEXT(CONST(IF(C<=MA(C,10) AND MA(C,10)<REF(MA(C,11),1) AND MA(C,20)<REF(MA(C,20),1)AND MA(C,40)<REF(MA(C,40),1) AND MA   
  106. (C,10)<REF(MA(C,20),1),1,0)) AND CURRBARSCOUNT=40,12,'下跌趋势'),COLORFFFFFF;   
  107.   
  108. DRAWTEXT(CONST(IF((IF(V>=VAR3 AND PERIOD=5,V,VAR3))=LLV((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),10),1,0)) AND CURRBARSCOUNT=40,-2,'缩量'),COLOR00FF00;   
  109. DRAWTEXT(CONST(IF((IF(V>=VAR3 AND PERIOD=5,V,VAR3))=LLV((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),10) AND J9<70,1,0)) AND CURRBARSCOUNT=40,-2,'缩量,一旦放量上升可买入'),COLOR00FF00;   
  110. DRAWTEXT((CONST(((IF(ISLASTBAR AND PERIOD=5,(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),0))+(IF(ISLASTBAR AND PERIOD=5,(DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),0)))/REF(V,1)>2)) AND CURRBARSCOUNT=40,-3,'预比昨量放1倍以上'),COLORGREEN;   
  111. DRAWTEXT((CONST(((IF(ISLASTBAR AND PERIOD=5,(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),0))+(IF(ISLASTBAR AND PERIOD=5,(DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),0)))/REF(V,1)<0.5)) AND CURRBARSCOUNT=40,-3,'预比昨量缩一半以上'),COLORYELLOW;   
  112. DRAWTEXT((DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))/(DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))>1.4 AND CURRBARSCOUNT=40,-4,'卖盘/买盘>1.4'),COLORGREEN;   
  113. DRAWTEXT((DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))/(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))>1.4 AND CURRBARSCOUNT=40,-4,'买量/卖盘>1.4'),COLORYELLOW;   
  114.   
  115. DRAWTEXT(CONST(IF(MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) AND MA(C,20)>REF (MA(C,20),1) AND MA(C,30)>REF(MA   
  116. (C,30),1) AND C>MA(C,5) AND C>MA(C,10) AND C>MA(C,30) AND C>LC AND V1>V2 AND ((IF(V>=VAR3 AND PERIOD=5,V,VAR3))>REF((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),1) OR (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>V1) AND C>LC AND XX<8    
  117. AND C>O,1,0)) AND CURRBARSCOUNT=40,-5,'量能理想  继续持有'),COLOR00FFFF;   
  118. DRAWTEXT(CONST(IF(C>LC AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) AND C>MA(C,5) AND REF(MA(C,5),1)>=REF(MA   
  119. (C,5),2) AND V1<=V2 AND ((IF(V>=VAR3 AND PERIOD=5,V,VAR3))<REF ((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),1) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))<V1) AND (DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))>(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)),1,0)) AND CURRBARSCOUNT=40,-5,'量弱少量买  明放量加仓'),COLORFF00FF;   
  120. DRAWTEXT(CONST(IF(C<LC AND C<MA(C,5) AND (DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))<(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>REF((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),1) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>V1,1,0)) AND CURRBARSCOUNT=40,-5,'放量跌'),COLOR00FF00;   
  121. DRAWTEXT(CONST(IF(C<LC*0.96 AND C<MA(C,5) AND (DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))>(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))*1.15 AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>REF ((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),1) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>V1,1,0)) AND CURRBARSCOUNT=40,-6,'有抄底资金进入'),COLOR00CCCC;   
  122. DRAWTEXT(CONST(IF(C<LC AND MA(C,5)<REF(MA(C,5),1) AND C<MA(C,5) AND C<MA(C,10) AND MA(C,10)>REF(MA(C,10),1) AND REF(MA(C,5),1)>=REF(MA(C,5),2),1,0)) AND CURRBARSCOUNT=40,-6,'减部分仓'),COLOR00FF00;   
  123. DRAWTEXT(CONST(IF(LLV(J9,5)<-15 AND C=LLV(C,10) AND C<L*1.016 AND C<MA(C,10)*0.96,1,0)) AND CURRBARSCOUNT=40,-6,'可少量抢反弹  
  124. ,快进快出'),COLOR00FF00;   
  125. DRAWTEXT(CONST(IF(C<LC AND MA(C,5)<REF(MA(C,5),1) AND MA(C,10)<=REF(MA(C,10),1) AND (DYNAINFO(23)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V))<(DYNAINFO(22)*((IF(V>=VAR3 AND PERIOD=5,V,VAR3))/V)) AND C<MA(C,5) AND C<MA(C,10) AND (IF(V>=VAR3 AND PERIOD=5,V,VAR3))>LLV((IF(V>=VAR3 AND PERIOD=5,V,VAR3)),10),1,0)) AND CURRBARSCOUNT=40,-7,'走弱离场'),COLORFFFF00;   
  126.   
  127. DRAWTEXT(((V>REF(V,1)*3 AND HHV(REF(H,1),15)>LLV(REF(L,1),15)*1.18 AND HHV(H,5)>LLV(L,70)*1.3 AND HHV(H,40)>LLV(L,40)*1.3 AND    
  128. J9>90) OR XX>12) AND C>(MA(C,26)+2*STD(C,26)) AND C<LC*1.0985 AND CURRBARSCOUNT=40,12,'          危险'),COLOR00FF00;   
  129.   
  130. DRAWTEXT(CONST(IF((C>MA(C,5) AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>=REF(MA(C,10),1) AND MA(C,5)>=MA(C,10)) OR (XX>REF(XX,1)    
  131. AND XX>YY AND C>LC),1,0)) AND CURRBARSCOUNT=23,-6,'短线强'),COLORFF44FF;   
  132. DRAWTEXT(CONST(IF(C<MA(C,5) AND C<MA(C,10) AND (MA(C,5)<REF(MA(C,5),1) OR MA(C,10)<REF(MA(C,10),1) OR MA(C,5)<MA(C,10) OR    
  133. C<LC),1,0)) AND CURRBARSCOUNT=23,-6,'短线弱'),COLOR00FF00;   
  134. DRAWTEXT(CONST(IF((C>MA(C,5) AND C<MA(C,10)) OR (C<=MA(C,5) AND (C>=MA(C,10) OR MA(C,10)>=REF(MA(C,10),1))),1,0)) AND C<LC    
  135. AND CURRBARSCOUNT=23,-5,'短线盘整'),COLORFF77CC;   
  136. DRAWTEXT((CONST(IF(CLOSE>=MA(CLOSE,13),1,0))) AND CURRBARSCOUNT=23,-2,'短线上升持股'),COLORGREEN;   
  137. DRAWTEXT((CONST(IF(CLOSE<MA(CLOSE,13) AND C<MA(CLOSE,5),1,0))) AND CURRBARSCOUNT=23,-3,'短线下降持币'),COLORGREEN;   
  138. DRAWTEXT((CONST(IF(CROSS(MA(CLOSE,13),CLOSE),1,0))) AND CURRBARSCOUNT=23,-4,'短线下降卖出'),COLORGREEN;   
  139.   
  140. DRAWTEXT((CONST(IF(C>=MA75,1,0))) AND CURRBARSCOUNT=30,-2,'长线上升持股'),COLORGREEN;   
  141. DRAWTEXT((CONST(IF(C<MA75,1,0))) AND CURRBARSCOUNT=30,-3,'长线下降持币'),COLORGREEN;   
  142. DRAWTEXT((CONST(IF((CLOSE>MA(CLOSE,3) AND CLOSE<MA(CLOSE,13) AND COUNT(C<MA13,20)>=15),1,0))) AND CURRBARSCOUNT=23,-4,'低买持  
  143. 股信号'),COLORGREEN;   
  144. DRAWTEXT((CONST(IF(CROSS(CLOSE,MA13),1,0))) AND CURRBARSCOUNT=30,-5,'加买信号'),COLORGREEN;   
  145.   
  146. DRAWTEXT(B1,JJ-1,'M底'),COLORFF44FF;   
  147. DRAWTEXT(B2,JJ-3,'K底'),COLORFF44FF;   
  148. DRAWTEXT(B3,JJ-2,'R底'),COLORFF44FF;   
  149. DRAWTEXT(B4,JJ-1,'D底'),COLORFF44FF;   
  150. DRAWTEXT(D1,JJ+1,'M顶'),COLORGREEN;   
  151. DRAWTEXT(D2,JJ+3,'K顶'),COLORGREEN;   
  152. DRAWTEXT(D3,JJ+2,'R顶'),COLORGREEN;   
  153. DRAWTEXT(D4,JJ+1,'D顶'),COLORGREEN;   
  154. DRAWTEXT(CROSS(MA(C,13),MA(C,21)),JJ-1,'圆底'),COLORFF44FF;   
  155. DRAWTEXT(CCI背 AND REF(CCI,1)<-150  AND C>O,JJ-1,' CCI进'),COLORGREEN;   
  156.   
  157. DRAWTEXT(A11 AND A12 AND CURRBARSCOUNT=30,-7,'唐鸭头买点'),COLORGREEN;   
  158. DRAWTEXT((VAR9 AND VARA  AND MA60>REF(MA60,1) AND CURRBARSCOUNT=30),-5,'老鸭头买点'),COLORGREEN;   
  159. DRAWTEXT(A17 AND A18 AND A19 AND CURRBARSCOUNT=30,-6,'青龙取水买点'),COLORGREEN;   
  160. DRAWTEXT(CROSS(A23,A21) AND A21<2.1 AND C>O AND CURRBARSCOUNT=30,-7,'绝买买点'),COLORGREEN;   
  161. DRAWTEXT((A34 OR A35) AND CURRBARSCOUNT=30,-5,'的卢买点'),COLORGREEN;   
  162. DRAWTEXT(A13 AND A14 AND A15 AND A16 AND CURRBARSCOUNT=30,-6,'出水芙蓉买点'),COLORGREEN;   

C681844861.jpg

C681844861.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则