Script Grafik: "Purzel"

Script mit Doppelklick oder STRG+R aufrufen!
____________________________________________

ScriptBegin
var Grafik="Script Turtle";

var a=8;    // Quadrat
var d=a*0.13; // Zwischenraum
var x0=-130;  // Startpunkt
var y0=82;
var imax=29;
var jmax=19;
var magicW=2.0;

// Farben ----------------------------------
var Hintergrund= "#d2b48c";
var Penfarbe = "black";
var Pen_mm = -1;
var RndFarbe1 ="#c2c200";//"#cba71e"; // "b49007"; 
var RndFarbe2 = "brown";
var Alpha = 120;  // Transparenz 0 - 255



function init()
{t.setBrush(Hintergrund);
 t.setPage();
 t.setRndRGB(RndFarbe1,RndFarbe2); 
  t.setRndHeller(80,70);
}



function draw()
{ defQuadrat("Quadrat");
  
  t.goTo(x0,y0);
  //t.draw("Quadrat");
  drawQuadrate("Quadrat");
}


function rndW(w,i,j)
{ 
  if (j<2) return w;
  if (j<5) return t.rndW(-j*magicW,j*magicW);
  return t.rndW(-j*2*magicW,j*2*magicW);
} 

function rndX(x,i,j)
{ return x+i*(a+d);
} 

function rndY(y,i,j)
{ return y-j*(a+d);
} 


function drawQuadrate(Name)
{
  w=0;
  for(i=0; i<imax; i++)
   for(j=0; j<jmax; j++)
   { t.goTo( rndX(x0,i,j), rndY(y0,i,j));
     t.turnTo( rndW(w,i,j));
     
     t.setBrush(t.rndRGB2());
     t.draw("Quadrat",false);
   }
}


function defQuadrat(Name)
{ 
  t.turnTo(0);  t.goTo(0,0); t.setNoStyle();
  t.beginPolygon();
  for(i=0; i<4; i++){t.move(a);t.turn(90);}
  t.endPolygon();

  t.setPen(Penfarbe,Pen_mm); t.setBrush(RndFarbe1);
  t.defDraw(Name);
  t.draw("Name");  
}




ScriptEnd

