同花顺主力清洗组合公式，彩带有买卖信号源码附图 EA

 //探测金矿GSW20 20191226@GZ;

r

SHORT:=9;

r

LONG:=17;

r

多方:((7)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(30),4,1))-(3)*(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(30),4,1),3,1))-SMA(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(30),4,1),3,1),2,1)),COLOR0000FF;

r

空方:(EMA(MA(多方,5),7)),COLORF0F000;

r

LowArea_Thres:=16;

r

Diamond_Thres:=12;

r

PIT_THRES:= 21;

r

HIGH_THRES:=75;

r

PRICE:=C,nodraw;

r

MA5:=MA(C,5),nodraw;

r

DIF1:=EMA(CLOSE,12) – EMA(C,26); DEA1:=EMA(DIF1,9);

r

CMACD:=(DIF1-DEA1)*2,nodraw;

r

CCCI:=CCI,nodraw;

r

Zeros:0,nodraw;

r

最新价:=C,nodraw, ;

r

季:=MA(C,60),nodraw,colorcyan;

r

通:=MA(C,17),nodraw, ;

r

子:=MA(C,26),nodraw, ;

r

午:=MA(C,100),nodraw, ;

r

辰:=MA(C,145),nodraw, ;

r

卯:=MA(C,455),nodraw, ;;

r

申:=MA(C,320),nodraw, ;;

r

亥:=MA(C,732),nodraw, ;;

r

突季:=CROSS(C,季) AND C>REF(C,1),nodraw;

r

突子:=CROSS(C,子) AND C>REF(C,1),nodraw;

r

突通:=CROSS(C,通) AND C>REF(C,1),nodraw;

r

突子:=CROSS(C,子) AND C>REF(C,1),nodraw;

r

突午:=CROSS(C,子) AND C>REF(C,1),nodraw;

r

突辰:=CROSS(C,辰) AND C>REF(C,1),nodraw;

r

突卯:=CROSS(C,卯) AND C>REF(C,1),nodraw;

r

突申:=CROSS(C,申) AND C>REF(C,1),nodraw;

r

突亥:=CROSS(C,亥) AND C>REF(C,1),nodraw;

r

均线最大值:=MAX(通,MAX(子,MAX(季,MAX(午,MAX(辰,MAX(卯,MAX(申,亥))))))),nodraw;

r

突通子:=突通+突子,nodraw;

r

突均线:=突通+突季+突子+突午+突辰+突卯+突申+突亥,nodraw;

r

通线上:=C>通,nodraw;

r

通增:通>REF(通,1),nodraw;

r

子线上:=C>子,nodraw;

r

疯牛:=C>均线最大值,nodraw;

r

突均线期:=COUNT(突均线,PASTDAYS),nodraw;

r

突通子期:=COUNT(突通子,PASTDAYS),nodraw;

r

通子金叉:CROSS(通,子),nodraw;

r

子午金叉:=CROSS(子,午);

r

小牛初现:CROSS(通,子) AND (通>REF(通,1)) AND MACD>0 AND CCI>100 AND HIGH> MA(C,5) AND 子>REF(子,1) AND 季>REF(季,1) AND C>季  ,nodraw;

r

蛟龙出海:CROSS(子,午) AND (子>REF(子,1)) AND MACD>0 AND CCI>100 AND HIGH> MA(C,5) AND (通>REF(通,1)) AND 午>REF(午,1) AND 季>REF(季,1) AND C>季 ,nodraw;

r

HIGHRisk:=多方> HIGH_THRES OR 空方>HIGH_THRES;

r

多方势增:(REF(多方,1) < 多方) AND 多方>空方,nodraw;

r

STICKLINE((空方<=多方),空方,多方,3,0),COLOR0000FF;

r

STICKLINE((多方>76) AND (多方>=空方),空方,多方,5,1),COLORFF33FF;

r

STICKLINE((空方>多方),多方,空方,3,0),COLORF0F000;

r

低吸区:=(空方<18) AND (空方>多方) AND (REF(空方,1) > 空方) AND (REF(多方,1) < 多方);

r

STICKLINE(低吸区,多方,空方*1.15,3,0),COLOR00FFFF;

r

TJ:=FILTER(低吸区,5);

r

DRAWTEXT(TJ,空方*1.8,’吸’),COLORFFFF00;

r

探钻石矿:=(空方<12) AND (空方<=多方),COLOR00FFFF,nodraw;

r

钻石底:CROSS(多方,空方) AND (空方<PIT_THRES),COLOR0000FF,nodraw;

r

DRAWTEXT(CROSS(多方,空方) AND (空方<PIT_THRES),空方-5,’钻’),COLOR00FFFF;

r

钻石底OR低吸:(低吸区 OR 钻石底) AND  (MACD>REF(MACD,1)),nodraw;

r

 
r