magic_square result !

Study 2008. 10. 6. 04:22

#include <stdio.h>
#define SWAP(x, y, temp) (temp=x, x=y, y=temp)

int dataInput(int* blank, char * argv[]) ; // 기본 데이터 입력
int substitute(int* blank, int i, int n) ;  // 재귀적 입력
int check() ; // 마방진의 유효성 검사
void output() ; // 결과 출력

struct point {
 int x ;
 int y ;
} ;

int square[5][5];     // 마방진을 담을 배열
struct point coordinate[25] ;  // 마방진에 숫자가 없는 곳의 좌표를 저장하기 위한 배열

int main(int argc, char * argv[])
{
 int blank[25];     // 마방진에 없는 숫자를 담을 배열
 int count = dataInput(blank, argv); 
 
 if(count == -1) 
  return 0 ;
 else 
  substitute(blank, 0, count - 1);

return 0 ; 
}

int dataInput(int* blank, char * argv[])
{
 FILE* file;
 int i, x, y, count ;
 int check_blank[26];    // 마방진에 없는 숫자를 판별하는 배열
 file = fopen(argv[1], "r");

if(file == NULL) {
  printf("File open failed.\n") ;
  return -1 ;
 }
 
 for(i = 0 ; i < 26 ; i++)
  check_blank[i] = 0 ;
  
 for(x = 0 ; x < 5 ; x++) 
 {  
  for(y = 0 ; y < 5; y++) 
   fscanf(file, "%d", &square[x][y]);  
 }
 
 fclose(file);

/* 최초의 반복문으로 배열내에 0이 들어있는 좌표를 새로운 배열에 저장하고
    마방진 내에 없는 값을 blank 배열에 저장 */ 
 
 for(x = 0, count = 0 ; x < 5 ; x++) 
 {  
  for(y = 0 ; y < 5 ; y++) 
  {   
   if(square[x][y] == 0) 
   {   
    coordinate[count].x = x;
    coordinate[count].y = y;        
    count ++ ;    
   }   
   else 
    check_blank[square[x][y]] = 1 ;
  }
 }

for(i = 1, count = 0 ; i <= 26 ; i++) 
 {  
  if(check_blank[i] == 0) 
  {   
   blank[count] = i;   
   count ++;   
  }
 } 
 return count ;
}

int substitute(int* blank, int i, int blankCount)
{ 
 int j, temp;

if(i == blankCount)
 {
  for(j = 0 ; j <= blankCount ; j++) 
  {
   square[coordinate[j].x][coordinate[j].y] = blank[j];   
  }
  
  if(check() == 12)
  {
   output() ;
   return 0 ;
  }
 }  
 else
 {  
  for(j = i ; j <= blankCount ; j++) 
  {   
   SWAP(blank[i], blank[j], temp);   
   substitute(blank, i + 1, blankCount) ;   
   SWAP(blank[i], blank[j], temp);
  }  
 }
 return 0;
}

int check()
{ 
 int x , y ;
 int solution = 0;
 int checkSum ;
 
 //↓
 for(x = 0 ; x < 5 ; x++) 
 {
  for(y = 0, checkSum = 0 ; y < 5 ; y++ )
   checkSum += square[x][y] ;
  
  if(checkSum == 65) 
   solution += 1 ;
 }
 
 //→
 for(y = 0 ; y < 5; y++) 
 {
  for(x = 0, checkSum = 0 ; x < 5 ; x++)    
   checkSum += square[x][y] ;
  
  if(checkSum == 65) 
   solution += 1 ;
 }
 
 //↘
 for(x = 0, checkSum = 0 ; x < 5 ; x++)  
  checkSum += square[x][x];

if(checkSum == 65) 
  solution += 1 ;

//↙
 for(x = 4, checkSum = 0, y = 0 ; x >= 0 ; x--) 
 { 
  checkSum += square[x][y];
  y++;
 }

if(checkSum == 65) 
  solution += 1 ;
 
 return solution ;
}

// 완성된 마방진을 출력
void output()
{
 FILE* file;
 int x, y ;
 file = fopen(".\\output.txt", "wr");
 
 for(x = 0; x < 5; x ++)
 {   
  for(y = 0; y < 5; y++) 
   fprintf(file, "%d ", square[x][y]);
  
  fprintf(file, "\n\n");  
 } 
 fclose(file);
 printf("Output Answer.\n") ;
 return ;
}

라스君이 코딩하고 유미르님이 기름기를 쫙 뺀, 마방진 빈칸 메우기 소스,,,
물론 제출 한건 기름기가 빠지기 전의 소스다,