主力選股 《源碼,、附圖,、選股,、說明》

主力選股 《源碼,、附圖,、選股,、說明》
說明：看啦寶鋼主力【籌碼主升】,；俺的粉絲發(fā)短信要俺做選股器,。
無奈亂來幾筆，改為主力選股,。粉絲耍謝就謝寶鋼主力啦,！補一句；俺木有果果了,，頂不頂帖無所謂啦,！

主力選股源碼；
主力持倉:=EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3);
主籌:=WINNER(C)*100;
散籌:=(WINNER(C*1.1)-WINNER(C*0.9))*100;
XD1:=主力持倉>散籌;
XD2:=主籌>散籌;
XD3:=主力持倉>50;
XD4:=主籌>80 AND 散籌<REF(散籌,1);
XG:=XD1 AND XD2 AND XD3 AND XD4;
主力選股:XG AND  "MACD.DIF">="MACD.DEA" AND  "MACD.MACD">= REF("MACD.MACD",1);

注意事項：帶MONTH,，WEEK,，出信號時僅供參,。

周DIFF:="MACD.DIF#WEEK";
周DEA:="MACD.DEA#WEEK";
月DIFF:="MACD.DIF#MONTH";
月DEA:="MACD.DEA#MONTH";
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
RSI周死:=CROSS("RSI.RSI2#WEEK"(6,12,24),"RSI.RSI1#WEEK"(6,12,24));
RSI月死:=CROSS("RSI.RSI2#MONTH"(6,12,24),"RSI.RSI1#MONTH"(6,12,24));
MB:=CROSS(周DEA,周DIFF);
月N:=CROSS(月DEA,月DIFF);
CV:=CROSS(周D,周K);
月V:=CROSS(月D,月K);
SG:=CV OR MB OR RSI周死;
SH:=月N OR 月V OR RSI月死;
DRAWICON(SG,H*1.02,15);
DRAWICON(SH,H*1.04,2);
D周:=CROSS(周DIFF,周DEA);
D月:=CROSS(月DIFF,月DEA);
K月:=CROSS(月K,月D);
K周:=CROSS(周K,周D);
R周:=CROSS("RSI.RSI1#WEEK"(6,12,24),"RSI.RSI2#WEEK"(6,12,24)),COLORYELLOW;
R月:=CROSS("RSI.RSI1#MONTH"(6,12,24),"RSI.RSI2#MONTH"(6,12,24)),COLORRED;
BG:=D周 OR K周 OR R周;
BH:=D月 OR K月 OR R月;
DRAWICON(BG,L*0.98,1);
DRAWICON(BH,L*0.96,34);