通达信分时看盘权证X

通达信分时看盘权证X

 {牛牛指标网提供：www.tdx001.com}

1. {权证X，有未来函数,考虑到股友习惯，我加了EMA红持股显示，是无未来的，作为选择使用，   
2. N   1  100  3  }   
3.   
4. VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);   
5. VAR2:=HIGH-REF(HIGH,1);   
6. VAR3:=REF(LOW,1)-LOW;   
7. VAR4:=SUM(IF(VAR2>0 AND VAR2>VAR3,VAR2,0),25);   
8. VAR5:=SUM(IF(VAR3>0 AND VAR3>VAR2,VAR3,0),25);   
9. VAR6:=VAR4*100/VAR1;   
10. VAR7:=VAR5*100/VAR1;   
11. VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,15);   
12. VAR9:=(VAR8+REF(VAR8,15))/2;   
13. A:=(VAR7>VAR6 AND VAR7>25 AND VAR6<25);   
14. B:ZIG(3,9/5)*100;   
15. G:MA(B,2);   
16. D:CROSS(B,G)*1000,COLORRED;   
17. W:CROSS(G,B)*1000,COLORBLUE;   
18. E:=REF(INDEXC,1);   
19. F:=SMA(MAX(INDEXC-E,0),N,1)/SMA(ABS(INDEXC-E),N,1);   
20. VAR10:=F AND F<8;   
21. VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;   
22. VAR12:=SMA(VAR11,N,1);   
23. VAR13:=SMA(VAR12,N,1);   
24. VAR14:=VAR13 AND VAR13<20;   
25. A AND D AND VAR10 AND VAR14 ;   
26. DRAWTEXT(W=1000,500,'S' ),COLORWHITE ;   
27. DRAWTEXT(D=1000, 500,'B'),COLORWHITE ;    
28.   
29. 突破:=REF(EMA(C,N),1)COLORMAGENTA,LINETHICK2;   
30. A1X:=(EMA(C,N)-突破)/突破*100,NODRAW;   
31. 出击:IF(A1X>=0,REF(EMA(C,N),BARSLAST(CROSS(A1X,0))+1),DRAWNULL)COLORYELLOW,LINETHICK0;   
32. 休假:IF(A1X<0,REF(EMA(C,N),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORBLUE,LINETHICK0;   
33. STICKLINE(A1X>=0,1,100,2,0)COLOR9800FF;   
34. STICKLINE(A1X<0,1,100,2,0)COLORGREEN;   
35. 持币:IF(A1X<0,突破,DRAWNULL)COLORGREEN,LINETHICK0;   
36. DRAWTEXT(ISLASTBAR,50,'   EMA'),COLORYELLOW;   

 

82055141.gif