gspt1:=(HIGH-CLOSE)/CLOSE>0.05;
gspt2:=(OPEN-LOW)/CLOSE< 0.03;
gspt3:=CLOSE>OPEN;
gspt4:=(CLOSE-OPEN)/CLOSE< 0.02;
gspt5:=MAX(CLOSE,OPEN);
gspt6:=MAX(REF(gspt5,1),REF(gspt5,2));
gspt7:=MAX(gspt6,REF(gspt5,3));
gspt8:=MAX(gspt7,REF(gspt5,4));
gspt9:=MAX(gspt8,REF(gspt5,5));
gspt10:=MAX(gspt9,REF(gspt5,6));
gspt11:=MAX(gspt10,REF(gspt5,7));
gspt12:=MAX(gspt11,REF(gspt5,8));
gspt13:=MAX(gspt12,REF(gspt5,9));
gspt14:=MAX(gspt13,REF(gspt5,10));
gspt15:=MAX(gspt14,REF(gspt5,11));
gspt16:=MAX(gspt15,REF(gspt5,12));
gspt17:=MAX(gspt16,REF(gspt5,13));
gspt18:=MAX(gspt17,REF(gspt5,14));
gspt19:=MAX(gspt18,REF(gspt5,15));
gspt20:=MAX(gspt19,REF(gspt5,16));
gspt21:=MAX(gspt20,REF(gspt5,17));
gspt22:=MAX(gspt21,REF(gspt5,18));
gspt23:=MAX(gspt22,REF(gspt5,19));
gspt24:=MAX(gspt23,REF(gspt5,20));
gspt25:=MAX(gspt24,REF(gspt5,21));
gspt26:=MAX(gspt25,REF(gspt5,22));
gspt27:=MAX(gspt26,REF(gspt5,23));
gspt28:=MAX(gspt27,REF(gspt5,24));
gspt29:=MAX(gspt28,REF(gspt5,25));
gspt30:=MAX(gspt29,REF(gspt5,26));
gspt31:=HIGH>gspt30;
gspt32:=EMA(EMA(CLOSE,13),13);
gspt33:=(gspt32-REF(gspt32,1))/REF(gspt32,1)*1000;
gspt34:=gspt33< 16;
gspt35:=FINANCE(33)>(-0.3);
gspt36:=MA(CLOSE,5);
gspt37:=(CLOSE-gspt36)/gspt36*100>3;
XG:=gspt1 AND gspt2 AND gspt3 AND gspt4 AND gspt31 AND gspt34 AND gspt35 AND gspt37;
DRAWTEXT(XG,L*0.99,'红影'), COLORWHITE;
{
如果说遇到多股时,可用红影排序优选从大到小! X_1:=MA(CLOSE,5);
红影排序:(CLOSE-X_1)/X_1*100;
}