"Ceas 1 - copie" - Processing

ID	Autor	Duplicat din	Ultima modificare
`#1697`	Panainte Rares (PanainteRares)	Ceas 1	Miercuri, 14 feb 2018, 16:05

var sec ;
var min ; 
var h;
var end_sec;
var end_min;
var end_h;

function setup() {
	createCanvas(400, 400);
 	angleMode(DEGREES);
  	translate(200,200);
  	rotate(-90);
}

function draw() {
  	
  	background(50);
  	
  	sec = second();
  	min = minute();
  	h = hour();
	noFill();
  	strokeWeight(8);
  
	stroke(255,50,150);
  	end_sec = map(sec+millis(),0,60000,0,360);
  	arc(0,0,300,300,0,end_sec);
  
  	stroke(150,50,255);
  	end_min = map(min,0,60,0,360);
  	arc(0,0,280,280,0,end_min);
  
  	stroke(50,150,255);
  	end_h = map(h%12,0,12,0,360);
  	arc(0,0,260,260,0,end_h);
  
  	push();
  	rotate(end_sec);
  	stroke(255,50,150);
  	line(0,0,100,0);
  	pop();
  	
  	push();
  	rotate(end_min);
  	stroke(150,50,255);
  	line(0,0,70,0);
  	pop();
 	
  	push();
  	rotate(end_h);
  	stroke(50,150,255);
  	line(0,0,40,0);
  	pop();
}