#include <stdio.h>
#include <stdlib.h>
 char rida[128], koobas[50][50];
 int i, a, b, x, y, c, v, r, m;
 int avaus=0;
 int read=0;
 int pikkus=0;
 int leitud=0;
 int leitudt=0;

int ylesse(){
if(koobas[c][v]!='t'){
  koobas[c][v]='s';
  }
  c=c-1;
  koobas[c][v]='i';
}
int vasakule(){
if(koobas[c][v]!='t'){
 koobas[c][v]='s';
 }
 v=v-1;
 koobas[c][v]='i';
}

int paremale(){
if(koobas[c][v]!='t'){
  koobas[c][v]='s';
  }
 v=v+1;
 koobas[c][v]='i';
}

int alla(){
if(koobas[c][v]!='t'){
  koobas[c][v]='s';
  }
 c=c+1;
 koobas[c][v]='i';
}

int sammy(){
if(koobas[c-1][v]!='o'){
leitud=0;
while(koobas[c-1][v]==' '){
ylesse();
}
}
}
int sammv(){
if(koobas[c][v-1]!='o'){
leitud=0;
while(koobas[c][v-1]==' '){
vasakule();
}
}
}
int sammp(){
if(koobas[c][v+1]!='o'){
leitud=0;
while(koobas[c][v+1]==' '){
paremale();
}
}
}
int samma(){
if(koobas[c+1][v]!='o'){
leitud=0;
while(koobas[c+1][v]==' '){
alla();
}
}
}
//int tagasi(){

//}

int main(void){

 //Puhasta  massiiv
 for (a = 0; a < 50; a++){
  for (b = 0; b < 50; b++){
   koobas[a][b] = 0; 
  }
 }
 for (a = 0; a < 128; a++){
 rida[a]=0;
 }
 FILE *sisse=fopen("koobas3.txt", "r");
 a = 0;
 while(!feof(sisse)){
  fgets(rida, 128, sisse);
   pikkus=strlen(rida);
  for (b = 0; b < pikkus; b++){
   koobas[a][b] = rida[b]; 
  }
  a++;
  read++;
 }

 fclose(sisse);
 printf("Koopa kaart n2eb v2lja selline:\n");
 printf("K6rgus, laius vastavalt: %d x %d\n", read, pikkus);
 for (a = 0; a < read; a++){
  for (b = 0; b < pikkus; b++){
   printf("%c", koobas[a][b]);
  }
  printf("\n");
 }
 printf("\n");
 a=0;
 for(b=0; b<pikkus;b++){
 if(koobas[a][b]=='a'){
 avaus=1;
 x=a;
 y=b;
 koobas[x+1][y]='t';
 c=x+1;
 v=y;
 } 
 }
 a=read-1;
 for(b=0; b<pikkus;b++){
 if(koobas[a][b]=='a'){
 avaus=1;
 x=a;
 y=b;
 koobas[x-1][y]='t';
 c=x-1;
 v=y;
 } 
 }
 b=0;
 for(a=0; a<read;a++){
 if(koobas[a][b]=='a'){
 avaus=1;
 x=a;
 y=b;
 koobas[x][y+1]='t';
 c=x;
 v=y+1;
 } 
 }
  b=pikkus-1;
 for(a=0; a<read;a++){
 if(koobas[a][b]=='a'){
 avaus=1;
 x=a;
 y=b;
 koobas[x][y-1]='t';
 c=x;
 v=y-1;
 } 
 }
 if(avaus==1){
 printf("Koopasse on sissep22s olemas kohal: %d ; %d\n", x+1,y);
 }
 //ringi liikumine
 
for(i=0; i<50; i++){
sammy();
sammv();
sammp();
samma();
}

if(koobas[c-1][v]=='o' || koobas[c+1][v]=='o' || koobas[c][v-1]=='o' || koobas[c][v+1]=='o'){
leitud=1;
if(koobas[c-1][v]=='o'){
c=c-1;
}
if(koobas[c+1][v]=='o'){
c=c+1;
}
if(koobas[c][v-1]=='o'){
v=v-1;
}
if(koobas[c][v+1]=='o'){
v=v+1;
}
}





//trykime välja kaardi

  printf("\n");
  printf("\n");
 for (a = 0; a < read; a++){
  for (b = 0; b < pikkus; b++){
   printf("%c", koobas[a][b]);
  }
  printf("\n");
 }
  printf("\n");
//vaatame kas saab teist teedpidi tagasi 
 if(leitud==1){
 printf("Leitud ots, kordinaatidega:");
  printf(" %d ; %d \n", c, v);
  for(i=0; i<50; i++){
sammy();
sammv();
sammp();
samma();
}
if(koobas[c-1][v]=='t' || koobas[c+1][v]=='t' || koobas[c][v-1]=='t' || koobas[c][v+1]=='t'){
leitudt=1;
}
} else {
 printf("Otsa ei leitud, miski on ees, v6i ots puudub\n");
 }
//trykime välja kaardi
  printf("\n");
  printf("\n");
 for (a = 0; a < read; a++){
  for (b = 0; b < pikkus; b++){
   printf("%c", koobas[a][b]);
  }
  printf("\n");
 }
  printf("\n");
 if(leitudt==1){
printf("Leitud teine tagasitee\n");
}  else {
printf("Teist tagasiteed pole\n");
}

 system("pause");
 return 0;
}