<?
/*-- lecture ds nbEtape.dat --*/	
	$etape=0;
	$fichier = 'nbEtape.dat';	
	if(file_exists($fichier)){
		$fp = fopen($fichier, 'r ');		
			$etape = fgets($fp);
			$etape = chop(ltrim($etape));						
		fclose($fp);		
	}
	
	/*-- lecture ds nbPos X .dat --*/	
	$pos=0;
	$fichier = 'nbPos'.$etape.'.dat';	
	if(file_exists($fichier)){
		$fp = fopen($fichier, 'r ');		
			$pos1 = fgets($fp);
			$pos1 = chop(ltrim($pos1));		
			$pos2 = fgets($fp);
			$pos2 = chop(ltrim($pos2));					
		fclose($fp);
		$pos++;		
	}
	
		if($etape>0 AND $etape<$etapmax AND $pos1<$pos2){
			/*-- lecture du etape X .dat --*/	
				$fichier = 'Etape'.$etape.'.dat';	
			    $fp = fopen($fichier, 'r ');		
					for ($j = 1; $j <= 9; $j++) {	
						for ($i = 1; $i <= 9; $i++) {				
							$line = fgets($fp);
							$A[$i][$j] = chop(ltrim($line));		
							$B[$i][$j] = chop(ltrim($line));								
						}
					}
				fclose($fp);
				
				/*-- recherche case à  modifier --*/
				for ($j = 1; $j <= 9; $j++) {	
					for ($i = 1; $i <= 9; $i++) {				
						$case =	$A[$i][$j];	
						$l=strlen($case);
						if($l>1){$ii=$i;$jj=$j;break 2;}								
					}
				}	
				$case=$B[$ii][$jj];
				$pos1++;
				$nb=substr($case,$pos1,1);
				$B[$ii][$jj]=$nb;
				
			/*-- enregistrement  ds nbPos X .dat --*/
				$fichier = 'nbPos'.$etape.'.dat';	
				if(file_exists($fichier)){  
					unlink($fichier);
				}
				$fp = fopen($fichier, 'a ');		
					$pos1 = chop(ltrim($pos1));
					fputs($fp, $pos1);	
					fputs($fp,"\n");
					$pos2=	chop(ltrim($pos2));			
					fputs($fp, $pos2);	
					fputs($fp,"\n");
				fclose($fp);		
		
			/*-- enregistrement ds grilletemp.dat --*/
				$fichier = 'grilletemp.dat';
				if(file_exists($fichier)){  
					unlink($fichier);
				}
				$fp = fopen($fichier, 'a ');		
				for ($j = 1; $j <= 9; $j++) {	
					for ($i = 1; $i <= 9; $i++) {
						$line = $B[$i][$j];						
						fputs($fp, $line);	
						fputs($fp,"\n");
					}
				}
				fclose($fp);
		}
		elseif($etape>1 AND $etape<$etapmax AND $pos1==$pos2){//on descend
				$etape--;
			/*-- enregistrement ds nbEtape --*/
				$fichier = 'nbEtape.dat';
				if(file_exists($fichier)){  
					unlink($fichier);
				}
				$fp = fopen($fichier, 'a ');		
					fputs($fp, $etape);	
					fputs($fp,"\n");
				fclose($fp);		
				
			/*-- lecture du etape X .dat --*/	
				$fichier = 'Etape'.$etape.'.dat';	
			    $fp = fopen($fichier, 'r ');		
					for ($j = 1; $j <= 9; $j++) {	
						for ($i = 1; $i <= 9; $i++) {				
							$line = fgets($fp);
							$A[$i][$j] = chop(ltrim($line));
							$B[$i][$j] = chop(ltrim($line));									
						}
					}
				fclose($fp);	
		
			/*-- lecture ds nbPos X .dat --*/	
				
				$fichier = 'nbPos'.$etape.'.dat';	
				if(file_exists($fichier)){
					$fp = fopen($fichier, 'r ');		
						$pos1 = fgets($fp);
						$pos1 = chop(ltrim($pos1));		
						$pos2 = fgets($fp);
						$pos2 = chop(ltrim($pos2));					
					fclose($fp);
					$pos1++;		
				}
				/*-- enregistrement  ds nbPos X .dat --*/
				$fichier = 'nbPos'.$etape.'.dat';	
				if(file_exists($fichier)){  
					unlink($fichier);
				}
				$fp = fopen($fichier, 'a ');		
					$pos1 = chop(ltrim($pos1));
					fputs($fp, $pos1);	
					fputs($fp,"\n");
					$pos2=	chop(ltrim($pos2));			
					fputs($fp, $pos2);	
					fputs($fp,"\n");
				fclose($fp);	
				
				/*-- recherche case à  modifier --*/
				for ($j = 1; $j <= 9; $j++) {	
					for ($i = 1; $i <= 9; $i++) {				
						$case =	$A[$i][$j];	
						$l=strlen($case);
						if($l>1){$ii=$i;$jj=$j;break 2;}								
					}
				}	
				$case=$B[$ii][$jj];
				$nb=substr($case,$pos1,1);
				$B[$ii][$jj]=$nb;
				
				/*-- enregistrement ds grilletemp.dat --*/
				$fichier = 'grilletemp.dat';
				if(file_exists($fichier)){  
					unlink($fichier);
				}
				$fp = fopen($fichier, 'a ');		
				for ($j = 1; $j <= 9; $j++) {	
					for ($i = 1; $i <= 9; $i++) {
						$line = $B[$i][$j];						
						fputs($fp, $line);	
						fputs($fp,"\n");
					}
				}
				fclose($fp);
			}
			include('GrilleReso.txt');		
			echo"<script language='JavaScript'>					
			window.document.location='resolution.php?nomgrille=$nomgrille';		
			</script>";
?>