通达信黄金分割起爆主图及选股指标(源码)

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,日),昨前);
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),COLORFFFF00;
二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;
HJF1:=O<MA(C,5) AND C>MA(C,5) AND O<MA(C,10) AND C>MA(C,10) AND O<MA(C,20) AND C>MA(C,20) AND O<MA(C,120) AND C>MA(C,120);
HJF11:=O<MA(C,5) AND C>MA(C,5) AND O<MA(C,10) AND C>MA(C,10) AND O<MA(C,20) AND C>MA(C,20) AND O<MA(C,60)AND C>MA(C,60);
HJF2:=(O<低 AND C>低 AND 低/O<1.06) OR (O<五0.191 AND C>五0.191 AND 五0.191/O<1.06) OR (O<四0.382 AND C>四0.382 AND 四0.382/O<1.06);
HJF3:=C/REF(C,1)>1.04;
HFXG:=(HJF1 OR HJF11) AND HJF2 AND HJF3;
DRAWICON(HFXG,L*0.96,11);
DRAWTEXT(HFXG,L*0.92,"起爆"),COLORGREEN;

{
选股公式:

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,日),昨前);
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);
一0.809:=REFDATE(H1,DATE);
二0.618:=REFDATE(H2,DATE);
三0.500:=REFDATE(H3,DATE);
四0.382:=REFDATE(H4,DATE);
五0.191:=REFDATE(H5,DATE);
低:=REFDATE(低1,DATE);
HJF1:=O<MA(C,5) AND C>MA(C,5) AND O<MA(C,10) AND C>MA(C,10) AND O<MA(C,20) AND C>MA(C,20) AND O<MA(C,120) AND C>MA(C,120);
HJF11:=O<MA(C,5) AND C>MA(C,5) AND O<MA(C,10) AND C>MA(C,10) AND O<MA(C,20) AND C>MA(C,20) AND O<MA(C,60)AND C>MA(C,60);
HJF2:=(O<低 AND C>低 AND 低/O<1.06) OR (O<五0.191 AND C>五0.191 AND 五0.191/O<1.06) OR (O<四0.382 AND C>四0.382 AND 四0.382/O<1.06);
HJF3:=C/REF(C,1)>1.04;
HFXG1:(HJF1 OR HJF11) AND HJF2 AND HJF3;
}