b=2000 c=22
a=:mine*(:cas==0)*:cfr*(:r7<c)*(:r7>1)*(:bat>b) :l7=a goto2