通达信获利筹码源码

1. 获利筹码:EMA(WINNER(C)*70,5),COLORRED;    
2. 亏损筹码:EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5),COLORF0FF00;   
3. STICKLINE(亏损筹码>0,0,亏损筹码,2.5,0),COLOR66FF00;   
4. 主力控筹:IF(获利筹码>亏损筹码,获利筹码*2,获利筹码),,COLORRED;   
5. STICKLINE(主力控筹>0,0,主力控筹,2.5,0),COLORFFFFFF;   
6. STICKLINE(获利筹码>0,0,获利筹码,2.5,0),COLORFFFFFF;   
7. AI:=AMOUNT/VOL/100;   
8. C0:=REF(C,2)*0.865;    
9. C1:=REF(C,13)*0.772;    
10. DSY:=100*VOL/CAPITAL;    
11. 抄底:IF((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,100, 0),COLOR00FF00;    
12. STICKLINE(抄底,0,30,4,0),,COLORFF00FC;   
13. 动态底部:EMA(IF(L<= LLV(L,30),SMA(ABS(L-REF(L,1)),30,1)/SMA(MAX(L-REF(L,1),0),30,1),0),3)*10,STICK,COLORYELLOW,LINETHICK2;   
14. SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);   
15. 主力筹码:EMA(WINNER(CLOSE)*70,10),COLORWHITE;   
16. 散户筹码:EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,10),COLOR00FF00;   
17. {STICKLINE(主力筹码>散户筹码, 主力筹码,散户筹码,6,0),COLORRED;   
18. STICKLINE(主力筹码<散户筹码, 主力筹码,散户筹码,6,0),COLOR00FF00;};   
19. ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}   
20. SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//散户筹码估算}   
21. ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//散户套牢筹码比率}   
22. ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}   
23. ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量}   
24. ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天数}   
25. ZSHJJ:=EMA(ZSHTL,89);{//散户警戒}   
26. ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}   
27. ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{//资金流入强度}   
28. SH8:=EMA(ZSHTL,8);   
29. DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);   
30. {散户套牢筹码}   
31. STICKLINE(C>0,ZSHTL,ZZLKP,0,0),COLOREEEEEE;   
32. {散户筹码警戒}   
33. STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,1,0),COLORAAAAAA;   
34. {主力控盘筹码}   
35. STICKLINE(C>0,ZZLKP,0,0,0),COLORBLUE;   
36. {铸顶风险区}   
37. STICKLINE(ZZLKP>75,ZZLKP,0,2,0),COLORFFFFFF;   
38. {顶部:(ZZLKP>75),COLORFFFFFF;}   
39. {主力筹码警戒}   
40. STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,4,0),COLORRED;   
41. {筑底散兵坑}   
42. STICKLINE(ZSHTL>=90,ZZLKP,0,5,0),COLOR66FFCC;   
43. {底部:(ZSHTL>=90),COLOR66FFCC;}   
44. {筹码总量上升}   
45. IF(ZCMZL,ZCMZL>REF(ZCMZL,1),DRAWNULL),COLOR0066FF,LINETHICK1;   
46. {增量资金};   
47. {//------【数值显示】}   
48. 强分界: 80,COLORYELLOW;   
49. 主持仓:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),9);   
50. 庄筹集中度:=EMA(主持仓,1);   
51. 庄筹集中监控线:EMA(庄筹集中度,1),COLORRED,LINETHICK3;   
52. 庄筹集中警戒线:=EMA(庄筹集中监控线,3);   
53. 庄筹集中生命线:EMA(庄筹集中警戒线,20),COLORFF00C5,LINETHICK3;   
54. 弱分界: 20,COLORYELLOW;   
55. VAR1:=(HIGH+LOW+CLOSE)/3;   
56. 短线:EMA((HHV(VAR1,15)-VAR1)/(HHV(VAR1,15)-LLV(VAR1,15)),2)*50,COLORFF0000,LINETHICK3;   
57. 黑马启动点:CROSS(庄筹集中度,短线) ;   
58. DRAWICON(黑马启动点,庄筹集中度-0.1,10);   
59.