通达信点石成金指标(源码)

周期:=15;
过滤:=8;
{抄底时刻}
VR2:=MA(CLOSE,5);
VR3:=MA(CLOSE,10);
VR4:=MA(CLOSE,20);
VR5:=MA(CLOSE,30);
VR6:=(VR2+VR3+VR4+VR5)/(4);
VR7:=((VR6-REF(VR6,周期))/(REF(VR6,周期)))*(100);
VR8:=((VR6-REF(VR6,周期))/(REF(VR6,周期)))*(100);
VR9:=EMA(VR7,过滤);
抄底时刻:(TROUGHBARS(3,15,1)=0) AND (HIGH>LOW+0.01);
{牛股导航}
P10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
LW大底:P10;
点石成金: IF((LW大底 AND 抄底时刻),10,0),COLORMAGENTA,LINETHICK2;
DRAWTEXT(点石成金>0,8,' 点石成金20'), COLORMAGENTA,LINETHICK1;