// Ohjelman tehnyt: e-Oppi Oy
// 28.2.2018
int a = 380; // Laskurin alkuarvo 
int b = 380; // Laskurin alkuarvo 
int c = 570; // Laskurin alkuarvo 
int d = 570; // Laskurin alkuarvo 
int e = 570; // Laskurin alkuarvo 
int f = 570; // Laskurin alkuarvo 
void setup () {
     size(1000,700); // ikkunan koko
     stroke(0); // Musta viivan väri
     textSize(30); // Tekstin koko
}
void draw() {
     background(255); // Tyhjennä tausta
     int a2 = round(map(a,0,950,0,500));
     int b2 = round(map(b,0,950,0,500));
     float c2 = round(10*map(c,0,950,-5,5))/10.0;
     float d2 = round(10*map(d,0,950,-5,5))/10.0;
     int e2 = round(map(e,0,950,-500,500));
     int f2 = round(map(f,0,950,-500,500));
     fill(0,200,255);
     fill(255);
     rect(500,200,500,500);
     stroke(200);
     pushMatrix();
     translate(500+a2,200+b2);
     if (c2 > 0) {
        if (d2 > 0) {
          scale(c2,d2);
        } else {
          scale(c2,d2-0.1);
        }
     } else {
         if (d2 > 0) {
          scale(c2-0.1,d2);
        } else {
          scale(c2-0.1,d2-0.1);
        }
     }
     for (int t=-10; t <= 10; t++) {
        line(t*50,-500,t*50,500);
        line(-500,t*50,500,t*50);
     }
      strokeWeight(3);
      line(0,-500,0,500);
      line(-500,0,500,0);
     fill(255,0,0,200);
     strokeWeight(1);
     stroke(0);
     fill(0,0,255,200);
     ellipse(e2,f2,100,100);
     popMatrix();
     fill(240);
     noStroke();
     rect(0,200,500,500);
     rect(0,0,1000,200);
  
     stroke(0);  
     strokeWeight(1);
  
     fill(255,255,0); // Keltainen täyttöväri
     rect(0,0,999,30); // Piirrä keltainen suorakulmio
     rect(0,30,999,30); // Piirrä keltainen suorakulmio
     rect(0,60,999,30); // Piirrä keltainen suorakulmio
     rect(0,90,999,30); // Piirrä keltainen suorakulmio
     rect(0,120,999,30); // Piirrä keltainen suorakulmio
     rect(0,150,999,30); // Piirrä keltainen suorakulmio
     fill(255,100,100); // Punainen täyttöväri
     rect(a,0,60,30); // Piirrä punainen neliö
     rect(b,30,60,30); // Piirrä punainen neliö
     rect(c,60,60,30); // Piirrä punainen neliö
     rect(d,90,60,30); // Piirrä punainen neliö
     rect(e,120,60,30); // Piirrä punainen neliö
     rect(f,150,60,30); // Piirrä punainen neliö
     int x1 = mouseX; // Selvitä hiiren vaakakoordinaatti
     int y1 = mouseY;
     if (mousePressed == true) {
     if ((y1 > 0) && (y1 < 30)) {
          if ((x1>a) && (a < 950)) { // Jos hiiri on oikealla puolen
                a++; // niin kasvata laskuria
          }
          if ((x1<a) && (a >= 0)) { // Jos hiiri on vasemmalla puolen
                a--; // niin pienennä laskuria
          }
     }
     if ((y1 > 30) && (y1 < 60)) {
          if ((x1>b) && (b < 950)) { // Jos hiiri on oikealla puolen
                b++; // niin kasvata laskuria
          }
          if ((x1<b) && (b >= 0)) { // Jos hiiri on vasemmalla puolen
                b--; // niin pienennä laskuria
          }
     }
     if ((y1 > 60) && (y1 < 90)) {
          if ((x1>c) && (c < 950)) { // Jos hiiri on oikealla puolen
                c++; // niin kasvata laskuria
          }
          if ((x1<c) && (c > 0)){ // Jos hiiri on vasemmalla puolen
                c--; // niin pienennä laskuria
          }
     }
     if ((y1 > 90) && (y1 < 120)) {
          if ((x1>d) && (d < 950)) { // Jos hiiri on oikealla puolen
                d++; // niin kasvata laskuria
          }
          if ((x1<d) && (d > 0)){ // Jos hiiri on vasemmalla puolen
                d--; // niin pienennä laskuria
          }
      }
        if ((y1 > 120) && (y1 < 150)) {
          if ((x1>e) && (e < 950)) { // Jos hiiri on oikealla puolen
                e++; // niin kasvata laskuria
          }
          if ((x1<e) && (e > 0)){ // Jos hiiri on vasemmalla puolen
                e--; // niin pienennä laskuria
          }
     }
     if ((y1 > 150) && (y1 < 180)) {
          if ((x1>f) && (f < 950)) { // Jos hiiri on oikealla puolen
                f++; // niin kasvata laskuria
          }
          if ((x1<f) && (f > 0)){ // Jos hiiri on vasemmalla puolen
                f--; // niin pienennä laskuria
          }
      }
     }
     fill(0); // Musta tekstin väri
     textSize(20); // Tekstin koko
     text(a2,a+5,25);
     text(b2,b+5,55);
     if (c2 > 0) {
      text(nfc(c2,1),c+5,85);
     } else {
      text(nfc(c2-0.1,1),c+5,85);
     }
     if (d2 > 0) {
      text(nfc(d2,1),d+5,115);
     } else {
      text(nfc(d2-0.1,1),d+5,115);
     }
     text(e2,e+5,145);
     text(f2,f+5,175);
      
     textSize(25); // Tekstin koko
     text("void setup () {",10,240);
     text("size(500,500); ",50,270);
     text("}",10,300);
     text("void draw () {",10,330);
     text("background(255);",50,360);
     text("translate("+a2+","+b2+");",50,390);
     if (c2 > 0) {
       if (d2 > 0) {
        text("scale("+c2+","+d2+");",50,420);
       } else {
        text("scale("+c2+","+(d2-0.1)+");",50,420);
       }
     } else {
       if (d2 > 0) {
        text("scale("+(c2-0.1)+","+d2+");",50,420);
       } else {
        text("scale("+(c2-0.1)+","+(d2-0.1)+");",50,420);
       }
     }
     text("fill(0,0,255);",50,450);
     text("ellipse("+e2+","+f2+",100,100);",50,480);
     text("}",10,510);
}