1st //// Filter conditions NR21 = (H - L) < Ref(LLV(H-L,20) ,-1); InsideBar = ((H < Ref(H,-1)) AND (Low > Ref(L,-1))); NR4 = (H - L) < Ref(LLV(H-L,3), -1); NR7 = (H - L) < Ref(LLV(H-L,6), -1); //// Scan the list for stocks matching the criteria Filter = (NR21 OR NR4 OR NR7) AND InsideBar ; AddColumn(H, "High",1.2 ); AddColumn(L, "Low ",1.2 ); AddColumn(H-L, "Range",1.2 ); AddColumn(C, "Close ",1.2 ); AddColumn(Volum e, "Volume ",1.0 ); AddColumn(ATR(8 ), "ATR 8 ",1.2 ); AddColumn(High, "Buy Above",1.2 ); AddColumn(Low, "Sell Below",1.2 ); color1 = IIf(NR4, colorGreen, IIf(NR7, colorBlue, IIf(NR21, colorRed,colorB lack))); AddTextColumn(W riteIf((NR4),"N R4",WriteIf(NR7 ,"NR7",WriteIf( NR21,"NR21"," ")))," ",1.2,color1); 2nd //// Filter conditions NR21 = (H - L) < Ref(LLV(H-L,20) ,-1); InsideBar = ...