/* built with Studio Sketchpad: 
 *   https://sketchpad.cc
 * 
 * observe the evolution of this sketch: 
 *   https://bard117s14.sketchpad.cc/sp/pad/view/ro.6DBB9Rb97Wr/rev.1685
 * 
 * authors: 
 *   Stefanie Walker
 *   Tessa von Walderdorff

 * license (unless otherwise specified): 
 *   creative commons attribution-share alike 3.0 license.
 *   https://creativecommons.org/licenses/by-sa/3.0/ 
 */ 



// This sketch builds on a prior work, "Self Portrait", created by Keith O'Hara
// http://bard117s14.sketchpad.cc/sp/pad/view/ro.A7dB7f8cmROVdL/rev.66

/* First Self-Portrait
* Stefanie Walker   [email protected]
* January 30, 2014 


*In this image, I attempted to make a close depiction of what I look like. Though I wasn't completely accurate with some of my shapes, I learned how much certain shapes need to be tweaked in accordance to the size of the canvas, as well as how difficult it is to make curved lines. Acrs are really difficult. Hopefully with more practice and studying I will be able to create a more accurate self-portrait using coding*/
 
size(400,400);
background(87,19,77);
 
 
//back of hair
fill(205,52,1);
noStroke();
ellipse (200,230, 300,370);
 
//Face
fill(250,220,188);
stroke(60, 36, 3);
rect(150,300,100,100);
ellipse(200,200,210,300);
 
//nose
stroke(227,168,102);
strokeWeight(6);
line(204,200,204,230);
line(204,230,206,240);
line(206,240,208,250);
arc(202, 260,30, 15, 0, PI);
 
//eye whites
strokeWeight(3);
stroke(0);
fill(250);
ellipse(150,170,50,27);
ellipse(250,170,50,27);
 
//iris
strokeWeight(1);
fill(10,80,250);
ellipse(150,170,20,20);
ellipse(250,170,20,20);
 
//pupil
fill(0);
ellipse(150, 170,10,10);
ellipse(250,170,10,10);
 
//eyeliner
strokeWeight(3);
line(127,161,120,155);
line(124,165,120,155);
line(268,161,275,155);
line(271,165,275,155);
 
//eye shine
noStroke();
fill(255);
ellipse(159,170,5,5);
ellipse(259,170,5,5);
 
//eyebrows
strokeWeight(4);
noFill();
stroke(205,52,1);
arc(150, 150, 52, 30, PI+QUARTER_PI, TWO_PI);
arc(250,150, 52, 30, PI+QUARTER_PI, TWO_PI );
 
//mouth
stroke(160, 0, 30);
strokeWeight(5);
stroke(160, 0, 30);
strokeWeight(5);
noFill();
arc(200, 280, 80, 30, 0, PI, OPEN);
 
//hair
stroke(205,52,1);
fill(205,52,1);
arc(205, 127, 200, 155, -PI, 0.3);  
noFill();
bezier(100, 100, 140, 125, 100, 200, 80, 315);
bezier(120, 95, 80, 120, 120, 150, 120, 300);
bezier(300, 105, 280, 150, 300,300, 300, 290);
bezier(100, 100, 125, 140, 200, 100, 315, 180);
arc(114,350, 60, 60, HALF_PI, PI);
arc(300,350, 60, 60, HALF_PI, PI);