///////////////////////////////////////////////////
//Programming Concepts and Applications
//for Artists and Designers
//Keith Kelley/task 02
/////////////////////////////////////////////////
// use globally available functions to:
//Blue Background
setBackgroundColor(.1, .2, .6);
//Red Pen color
setPenColor(.8, .1, .3);
//Thin pen weight
setPenWeight(.01);//Change Drawing to Variable
var drw = drawLine
//DRAWING TRIANGLE
//Top of triangle
drw(.45, .25, .5, .25)
//Left side of triangle
drw(.45, .25, .25, .61)
//Bottom left corner
drw(.25, .61, .27, .65)
//Bottom of triangle
drw(.27, .65, .67, .65)
//Bottom right corner of triangle
drw(.67, .65, .7, .61)
//Right side of triangle
drw(.7, .61, .5, .25)
//Left interior line of triangle
drw(.5, .25, .325, .56)
//Bottom interior line
drw(.25, .61, .6, .61)
//Right interior line
drw(.5, .34, .67, .65)
//Left interior line
drw(.5, .34, .37, .56)
//Center horizontal line
drw(.325, .56, .57, .56)
//Right center line
drw(.6, .61, .475, .385)
//FILLING IN TRIANGLE
//Bottom Triangle; utilized loop, then shown another way of achieving it
var e = .325
var f = .56
var g =.57
var h = .56
var e1, g1, e2, g2

e2 = .001*(.026/.05)
g2 = .001*(.03/.05)
e1 = e
g1 = g

while(f<=.61)
{

drawline(e1, f, g1, f)
e1 = e1 - e2
g1 = g1 + g2
f+=.001;
}
//Left Side of Triangle
var i = .45
var j = .25
var k =.5
var l = .25
var i1, k1, i2, k2

i2 = .001*(.2/.36)
k2 = .001*(.2010/.36)
i1 = i
k1 = k

while(j<=.61)
{
drawline(i1, j, k1, j)
i1 = i1 - i2
k1 = k1 - k2
j+=.001;
}
//Complete
// stop playback head to prevent continuous redrawing
//
stop();