Problem Description

The GeoSurvComp geologic survey company is responsible for detecting underground oil deposits. GeoSurvComp works with one large rectangular region of land at a time, and creates a grid that divides the land into numerous square plots. It then analyzes each plot separately, using sensing equipment to determine whether or not the plot contains oil. A plot containing oil is called a pocket. If two pockets are adjacent, then they are part of the same oil deposit. Oil deposits can be quite large and may contain numerous pockets. Your job is to determine how many different oil deposits are contained in a grid. 

Input

The input file contains one or more grids. Each grid begins with a line containing m and n, the number of rows and columns in the grid, separated by a single space. If m = 0 it signals the end of the input; otherwise 1 <= m <= 100 and 1 <= n <= 100. Following this are m lines of n characters each (not counting the end-of-line characters). Each character corresponds to one plot, and is either `*', representing the absence of oil, or `@', representing an oil pocket.

Output

For each grid, output the number of distinct oil deposits. Two different pockets are part of the same oil deposit if they are adjacent horizontally, vertically, or diagonally. An oil deposit will not contain more than 100 pockets.

Sample Input

1 1*3 5*@*@***@***@*@*1 8@@****@*5 5 ****@*@@*@*@**@@@@*@@@**@0 0

Sample Output

0122 此题是最简单的搜索啦，就不说啦，找到一个没用过的入口一直搜下去，就行啦 代码：

#include
      
       #include
       
        char a[105][105];int map[105][105];int dfs(int i,int j);int n,m,count;int main(){        while(scanf("%d%d",&n,&m)!=EOF&&n&&m)    {        int i,j;        count=0;        memset(map,0,sizeof(map));        for(i=0;i
        
         
          
           =0&&a[i-1][j]=='@'&&map[i-1][j]==0){map[i-1][j]=1;dfs(i-1,j);}    if(j-1>=0&&a[i][j-1]=='@'&&map[i][j-1]==0){map[i][j-1]=1;dfs(i,j-1);}    if(i+1
           
            
             =0&&j+1
             
              
               =0&&a[i+1][j-1]=='@'&&map[i+1][j-1]==0){map[i+1][j-1]=1;dfs(i+1,j-1);}    if(i-1>=0&&j-1>=0&&a[i-1][j-1]=='@'&&map[i-1][j-1]==0){map[i-1][j-1]=1;dfs(i-1,j-1);}    return 1;}