dim $results[100][2]
$resultcounter=0
for $xBattle_Left1_mob= 1 to 100
     for $yBattle_Left1_mob= 1 to 100
          If PixelGetColor($xBattle_Left1_mob,$yBattle_Left1_mob) <> "000000" Then
             $resultcounter+=1
             $results[$resultcounter][0]=$xBattle_Left1_mob
             $results[$resultcounter][1]=$yBattle_Left1_mob
          Endif
     next
next