[通达信指标/源码] [转载]主图指标【新股龙有心】(源码)

【股龙有心】主图指标首次优化，现去除了合成部分的思路，去除了信号提示，在保留原创KDJ决策的基
础上加入重心交易决策，MACD决策，引力理论决策，力求可为长中短线全天候决策的实用主图指标。
图解：

下载 (520.2 KB)

2018-10-18 13:12

下载 (512.44 KB)

2018-10-18 13:12

下载 (536.68 KB)

2018-10-18 13:12

下载 (301.66 KB)

2018-10-18 13:12

1. QWX1:=HHV(CLOSE,30);
   
2. QWX2:=LLV(CLOSE,30);
   
3. QWX3:=CONST((QWX1+QWX2)/2);
   
4. QWX4:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
   
5. QWX5:=CONST((1-7/100)*(DMA(CLOSE,QWX4)));
   
6. QWX6:=CONST((1+7/100)*(DMA(CLOSE,QWX4)));
   
7. {KDJ}
   
8. RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
   
9. KX:=SMA(RSV,3,1);
   
10. DX:=SMA(KX,3,1);
    
11. JX:=3*KX-2*DX;
    
12. {MACD}
    
13. DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26))*2+QWX3,COLORWHITE;
    
14. DEA:=EMA(DIF,9),COLORYELLOW;
    
15. MCD:=(DIF-DEA)*2+QWX3;
    
16. DRAWBAND(MCD,RGB(120,0,100),QWX3,RGB(60,100,50));
    
17. DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
    
18. 牛熊线:(EMA(CLOSE,30)+EMA(CLOSE,72))/2,LINETHICK2,COLORGREEN;
    
19. M5:MA(CLOSE,N),COLORWHITE;
    
20. M10:MA(CLOSE,M1),COLORYELLOW;
    
21. M20:MA(CLOSE,M2),COLORFF00FF;
    
22. VAR1:=IF(CLOSE>OPEN,CLOSE,OPEN);
    
23. VAR2:=MEMA(CLOSE,5);
    
24. VAR3:=ATAN((VAR2/REF(VAR2,1)-1)*100);
    
25. VAR4:=IF(VAR3>0,VAR3,VAR3);
    
26. VAR5:=(CLOSE/REF(CLOSE,1)-1)*100;
    
27. VAR6:=VAR5<1.5 AND VAR5>-1.5;
    
28. 今日之升★:LAST(VAR6,4,1) AND VAR5>2 AND VOL>REF(VOL,1),NODRAW,COLORYELLOW;
    
29. DRAWTEXT(今日之升★,L/1.01,'★'),COLORYELLOW;
    
30. 强势:IF(VAR4>=REF(VAR4,1) AND VAR4>=0,M10,DRAWNULL),COLORRED,LINETHICK2;
    
31. 整理:IF(VAR4<REF(VAR4,1) AND VAR4>0,M10,DRAWNULL),COLORGREEN,LINETHICK2;
    
32. 支撑:IF(PERIOD=5,IF(BARSLAST(CURRBARSCOUNT=5),QWX5,DRAWNULL),DRAWNULL),COLORCYAN;
    
33. 阻力:IF(PERIOD=5,IF(BARSLAST(CURRBARSCOUNT=5),QWX6,DRAWNULL),DRAWNULL),COLORYELLOW;
    
34. {柱型显示}
    
35. STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
    
36. STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
    
37. {蓝}
    
38. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORFF7700;
    
39. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;
    
40. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;
    
41. STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;
    
42. {红}
    
43. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;
    
44. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;
    
45. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF;
    
46. STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
    
47. {绿}   
    
48. STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,3,0),COLOR009900;
    
49. STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,2.2,0),COLOR00BB00;
    
50. STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,1.5,0),COLOR00DD00;   
    
51. STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00;
    
52. {灰}
    
53. STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,3,0),COLOR999999;
    
54. STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;      
    
55. STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,1.5,0),COLORDDDDDD;   
    
56. STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
    
57. STICKLINE(CROSS(JX,DX),OPEN,CLOSE,0.5,0),COLORYELLOW;
    
58. STICKLINE(CROSS(DX,JX),OPEN,CLOSE,0.5,0),COLOR000099;

复制代码