通达信恭喜发财副图 源码

 通达信恭喜发财副图 源码

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

复制内容到剪贴板

1. VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);   
2. VAR2:=HIGH-REF(HIGH,1);   
3. VAR3:=REF(LOW,1)-LOW;   
4. VAR4:=SUM(IF(VAR2>0 AND VAR2>VAR3,VAR2,0),25);   
5. VAR5:=SUM(IF(VAR3>0 AND VAR3>VAR2,VAR3,0),25);   
6. VAR6:=VAR4*100/VAR1;   
7. VAR7:=VAR5*100/VAR1;   
8. VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,15);   
9. VAR9:=(VAR8+REF(VAR8,15))/2;   
10. A:=(VAR7>VAR6 AND VAR7>25 AND VAR6<25);   
11. B:ZIG(3,50/5)*100,COLORWHITE;   
12. G:MA(B,2),COLORYELLOW;   
13. D:=CROSS(B,G)*1000,COLORRED;   
14. W:=CROSS(G,B)*1000,COLORBLUE;   
15. E:=REF(INDEXC,1);   
16. F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);   
17. VAR10:=F AND F<8;   
18. VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;   
19. VAR12:=SMA(VAR11,3,1);   
20. VAR13:=SMA(VAR12,3,1);   
21. VAR14:=VAR13 AND VAR13<20;   
22. MM:=A AND D AND VAR10 AND VAR14 ;   
23. DRAWTEXT(W=1000,B*1.05,'卖' ),COLOR00FF00;   
24. DRAWTEXT(D=1000,B*1.05,'买'),COLORRED;  

8475329634.png