通达信解盘难题--东家每日解盘

 

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

{N:5,30,8;ZF:1,10,5;M:1.100.3;}   
V1:=MA(V,5);   
V2:=MA(V,10);   
MA5:=MA(CLOSE,5);   
MA10:=MA(CLOSE,10);   
MA13:=MA(CLOSE,13);   
MA20:=MA(CLOSE,20);   
MA40:=MA(CLOSE,40);   
MA60:=MA(CLOSE,60);   
MA75:=MA(CLOSE,75);   
  
LC:=REF(C,1);   
K9:=SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1);   
STICKLINE(1=1,11,-1,4,0),COLOR444444;   
STICKLINE(C<=MA(C,13) AND MA(C,13)<=REF(MA(C,13),1),11,-1,4,0),COLOR663300;   
STICKLINE(C>=MA(C,13) AND MA(C,13)>=REF(MA(C,13),1),11,-1,4,0),COLOR000055;   
D9:=SMA(K9,3,1);   
J9:=3*K9-2*D9;   
KK:K9*0.1;   
JJ:J9*0.1;   
VAR1:=DYNAINFO(17)*REF(MA(V,5),1);   
VAR2:=DYNAINFO(7)=C AND DYNAINFO(10)=AMOUNT;   
VAR3:=IF(DYNAINFO(7)=C AND DYNAINFO(10)=AMOUNT,VAR1,VAR2);   
VAR4:=BARSLAST(CROSS(MA5,MA60));   
VAR5:=BARSLAST(CROSS(MA10,MA60));   
VAR6:=BARSLAST(HIGH=HHV(HIGH,VAR5));   
VAR7:=BARSLAST(CROSS(MA10,MA5));   
VAR8:=BARSLAST(CROSS(MA5,MA10));   
VAR9:=VAR4>VAR5 AND VAR5>VAR6 AND VAR6>VAR7 AND VAR7>VAR8 AND VAR8<5;   
VARA:=COUNT(CROSS(MA10,MA5),VAR5)=1;   
VARB:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100;   
VARC:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100;   
VARD:=(VARC-VARB)/20+6;   
  
AA:=MA(VARD,5);   
YYY:=EMA((INDEXC-LLV(INDEXL,11))/(HHV(INDEXH,25)-LLV(INDEXL,11))*4,8)+1;   
YY:=POW(YYY,2)-10;   
XXX:=EMA((C-LLV(L,11))/(HHV(H,25)-LLV(L,11))*4,8)+1;   
XX:=IF(1=1,POW(XXX,2)-10,DRAWNULL);   
  
预:=CLOSE>MA(CLOSE,13);   
升:=CLOSE>MA(CLOSE,5) AND CLOSE<MA(CLOSE,13);   
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;   
TR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);   
HD:=HIGH-REF(HIGH,1);   
LD:=REF(LOW,1)-LOW;   
PDM:=SUM(IF(HD>0 AND HD>LD,HD,0),14);   
MDM:=SUM(IF(LD>0 AND LD>HD,LD,0),14);   
PDI:=PDM*100/TR;   
MDI:=MDM*100/TR;   
A1:=BARSLAST(REF(CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)),1));   
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));   
A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));   
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));   
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));   
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));   
C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)),1));   
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));   
C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));   
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));   
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));   
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));   
C4:=BARSLAST(REF(CROSS(MDI,PDI),1));   
D4:=REF(C,C4+1)<C AND REF(MDI,C4+1)>MDI AND CROSS(MDI,PDI);   
A4:=BARSLAST(REF(CROSS(PDI,MDI),1));   
B4:=REF(C,A4+1)>C AND REF(PDI,A4+1)<PDI AND CROSS(PDI,MDI);   
  
PDAY1:=BARSLAST(CROSS(MA60,MA5));    
PDAY2:=BARSLAST(CROSS(MA60,MA10));    
PDAY3:=BARSLAST(LOW=LLV(LOW,PDAY2));   
PDAY4:=BARSLAST(CROSS(MA5,MA10));   
PDAY5:=BARSLAST(CROSS(MA10,MA5));   
A11:=PDAY1>PDAY2 AND PDAY2>PDAY3 AND PDAY3>PDAY4 AND PDAY4>PDAY5 AND PDAY5<5;    
A12:=COUNT(CROSS(MA10,MA5),PDAY2)=1;   
A13:=OPEN<MA20 OR OPEN<MA40 OR OPEN<MA60;   
A14:=C>MAX(MA20,MAX(MA40,MA60));   
A15:=V/MA(V,30)>1.2;   
A16:=C/REF(C,1)>1.049;   
A17:=MIN(MA(C,5),MA(C,10))>MA(C,60) AND CROSS(MA(C,5),MA(C,10));   
A18:=MIN(MA(C,5),MA(C,10))/MA(C,60)<1.05;   
A19:=COUNT(V<MA(V,10),10)>6;   
A20:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;   
A21:=SMA(SMA(A20,3,1),3,1)/28.57;   
A22:=EMA(A21,5);   
A23:=3*A21-2*A22;   
A24:=(LOW+HIGH+CLOSE*2)/4;   
A25:=MA(A24,4);   
A26:=HHV(A25,10);   
A27:=MA(A26,3);   
A28:=1.25*A27-0.25*A26;   
A29:=IF(A28>A26,A26,A28);   
A30:=LLV(A25,10);   
A31:=MA(A30,3);   
A32:=1.25*A31-0.25*A30;   
A33:=IF(A32<A30,A30,A32);   
A34:=CROSS(C,A33) AND CROSS(C,MA13) AND CROSS(C,A29);   
A35:=CROSS(C,MA13) AND CROSS(C,A29);   
  
  
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,'大盘  
低'),COLOR0055FF;   
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;   
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   
(C,10)>REF(MA(C,20),1),1,0)) AND CURRBARSCOU