int neo [10][10][10];

task main()
 {
	int x,y,z;
	sint xx,yy,zz;
	int valeur; 
	char buffer[10];

	inline "arrinit globale_neo,0 , 1000";


	/* init */

	for(x=0;x<10;x++)
	  {
		for(y=0;y<10;y++)
		  {
			for(z=0;z<10;z++)
			 {
				valeur=x*100+y*10+z;
				COP_NumtoString(valeur,buffer);
				COP_DrawText(1,1,buffer);
				/*COP_Wait(100);*/
			 }			
		  }
	  }
/*goto fin;*/
	/* init */

	for(x=0;x<10;x++)
	  {
		for(y=0;y<10;y++)
		  {
			for(z=0;z<10;z++)
			 {
				valeur=x*100+y*10+z;
				COP_NumtoString(valeur,buffer);
				COP_DrawText(1,1,buffer);
				neo[x][y][z]=valeur;
			 }
			/*COP_Wait(1000);*/
		  }
	  }

	/* display all values*/

	/*for(x=9;x>=0;x--)
	  {
		for(y=9;y>=0;y--)
		  {
			valeur=neo[x][y][3];
			COP_NumtoString(valeur,buffer);
			COP_DrawText(1,1,buffer);
			COP_Wait(1000);
		  }
	  }*/
	
/*goto fin;*/

	for(xx=9;xx>=0;xx--)
	  {
		for(yy=9;yy>=0;yy--)
		  {
			for(zz=9;zz>=0;zz--)
			 {
				valeur=neo[xx][yy][zz];
				COP_NumtoString(valeur,buffer);
				COP_DrawText(1,1,buffer);
			 }
		  }
	  }
	fin:

	COP_DrawText(1,1,"FIN");
        COP_Wait(5000);
 }