通达信金牛判官-随波逐流源码

买线:=EMA(C,2);
卖线:=EMA(SLOPE(C,21)*20+C,42);
 BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
DRAWICON(BU,L-0.1,1);
 DRAWICON(SEL,H+0.1,2);
 STICKLINE(买线>=卖线,LOW,HIGH,0.0,1),COLORRED;
 STICKLINE(买线>=卖线,CLOSE,OPEN,2,1),COLORRED;
 STICKLINE(买线<卖线,LOW,HIGH,0.0,1),COLORGREEN;
 STICKLINE(买线<卖线,CLOSE,OPEN,2,1),COLORGREEN;
散户:EMA(CLOSE,5),COLORWHITE;
操盘:MA(CLOSE,9),COLORCYAN,LINETHICK2;
界点:MA(CLOSE,20),COLORMAGENTA;
 LC:=REF(CLOSE,1);
 RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
 FF:=EMA(CLOSE,3);
 MA15:=EMA(CLOSE,21);
日:=150;昨前:=3;
高1:=REF(HHV(H,日),昨前);
低1:=REF(LLV(L,日),昨前);DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'底背离'),COLOR0000FF;
 AA:=(HHV(HIGH,20) - (2 * ATR));
 BB:=CROSS(CLOSE,REF(HHV(HIGH,55),1));
 SSS:=CROSS(MIN(MA(CLOSE,13),AA),CLOSE);
 BBB:=BARSLAST(BB);
 SSSB:=BARSLAST(SSS);
 B1:=((BBB = 0) AND (REF(SSSB,1) < REF(BBB,1)));
 B1B:=BARSLAST(B1);
 B2:=((((BB = 1) AND (B1B < SSSB)) AND (B1B > 0)) AND (COUNT(BB,SSSB) < 3));
 B2B:=BARSLAST(B2);
 B3:=((((BB = 1) AND (B2B < B1B)) AND (COUNT(BB,SSSB) < 4)) AND (COUNT(BB,SSSB) > 2));
 DRAWTEXT((B1 = 1),(LOW - 0.6),'跟进'),COLORYELLOW;
 DRAWTEXT((B2 = 1),(LOW - 0.6),'加码'),COLORFFAAFF;

H1:=高1-(高1-低1)*0.191;
 H2:=高1-(高1-低1)*0.382;
 H3:=高1-(高1-低1)*0.5;
 H4:=高1-(高1-低1)*0.618;
 H5:=高1-(高1-低1)*0.809;

顶:REFDATE(高1,DATE),COLORRED;
一0.809:REFDATE(H1,DATE),COLORYELLOW;
二0.618:REFDATE(H2,DATE),COLORMAGENTA;
三0.500:REFDATE(H3,DATE),COLORWHITE;
四0.382:REFDATE(H4,DATE),COLORGREEN;
五0.191:REFDATE(H5,DATE),COLORYELLOW;
低:REFDATE(低1,DATE),COLORRED;