Simulation Window

InitGraph();
rows=31;cols=31;
ScaleWindow(0, 0,cols+1, rows+1);
Colour(Black);
BoxFill(0,0,cols+1,rows+1);

pic1=new Array(cols);pic2=new Array(cols);
for(var i = 0;i<=cols;i++){
   pic1[i]=new Array(rows);pic2[i]=new Array(rows);
}

for(var i = 1;i<cols;i++){    //for each point
   for(var j = 1;j<rows;j++) { //except edge
      m = 0;
      for (k = i - 1;k<=i + 1;k++) {
         for (l = j - 1;l<= j + 1;l++) {
            m = m + pic1 [k][l]; //add 9 values in 3x3 block
         }
      }
      if (m > 4) {  //If majority are white
         pic2 [i][j] = 1; //set pixel of pic2 to white
      }else{
         pic2 [i][j] = 0; //set pixel of pic2 to blacck
      };
   LineStart(i+.4,j+.4);
   }
 }
}
//Set up picture with a ragged diamond
for (i = 0;i<= cols;i++){ 
   for (j = 0; j<=rows;j++) {
      k = Math.abs(i - rows/2) + Math.abs(j - cols/2);
      if (k + 6 * Math.random() < 12) { 
         pic1[i][j] = 1;}
      else {
         pic1 [i][j] = 0;
      };
   }
}
showpic1();
n=0;
setTimeout('eval(document.panels.step.value);',2000);