// programmed by James Hilbert (aged 69) May 3, 2004
// Retired plumber and living in Spain 
#include "playpen.h"
#include <iostream>

using namespace fgw;
using namespace std;

int main(){
	playpen paper;
	
// try different numbers for clear
	paper.clear(198);
	paper.setplotmode(disjoint);

	paper.scale(64);
	paper.plot(-2, -2, 117);
	paper.plot(-2, 2, 117);
	paper.plot(2, -2, 117);
	paper.plot(2, 2, 117);
		
	paper.plot(-1, 0, 147);
	paper.plot(1, 0, 147);
	paper.plot(0, 1, 147);
	paper.plot(0, -1, 147);
	
	paper.scale(32);
	paper.plot(-2, -2, 157);
	paper.plot(-2, 2, 157);
	paper.plot(2, -2, 157);
	paper.plot(2, 2, 157);
		
	paper.plot(-1, 0, 167);
	paper.plot(1, 0, 167);
	paper.plot(0, 1, 167);
	paper.plot(0, -1, 167);

	paper.scale(16);
	paper.plot(-2, -2, 197);
	paper.plot(-2, 2, 197);
	paper.plot(2, -2, 197);
	paper.plot(2, 2, 197);
		
	paper.plot(-1, 0, 227);
	paper.plot(1, 0, 227);
	paper.plot(0, 1, 227);
	paper.plot(0, -1, 227);	                      
	paper.scale(7);
// try different plotting modes
	paper.setplotmode(direct);


// I
	paper.plot(-28,-3, red4 + red2 + red1 );
	paper.plot(-28,-2, red4 + red2 + red1 );
	paper.plot(-28,-1, red4 + red2 + red1 );
	paper.plot(-28,0, red4 + red2 + red1 );
	paper.plot(-28,1, red4 + red2 + red1 );
	paper.plot(-28,2, red4 + red2 + red1 );
	paper.plot(-28,3, red4 + red2 + red1 );
	paper.plot(-28,4, red4 + red2 + red1 );
	paper.plot(-28,5, red4 + red2 + red1 );
	paper.plot(-28,6, red4 + red2 + red1 );
	// can
	paper.plot(-24,-1, red4 + red2 + red1 );
	paper.plot(-24,0, red4 + red2 + red1 );
	paper.plot(-24,1, red4 + red2 + red1 );
	paper.plot(-23,-2, red4 + red2 + red1 );
	paper.plot(-23,2, red4 + red2 + red1 );
	paper.plot(-22,-3, red4 + red2 + red1 );
	paper.plot(-22,3, red4 + red2 + red1 );
	paper.plot(-21,-2, red4 + red2 + red1 );
	paper.plot(-21,2, red4 + red2 + red1 );
	
	paper.plot(-19,-3, red4 + red2 + red1 );
	paper.plot(-19,-2, red4 + red2 + red1 );
	paper.plot(-18,-1, red4 + red2 + red1 );
	paper.plot(-17,0, red4 + red2 + red1 );
	paper.plot(-17,1, red4 + red2 + red1 );
	paper.plot(-17,2, red4 + red2 + red1 );
	paper.plot(-16,0, red4 + red2 + red1 );
	paper.plot(-16,3, red4 + red2 + red1 );
	paper.plot(-13,-3, red4 + red2 + red1 );
	paper.plot(-13,-2, red4 + red2 + red1 );
	paper.plot(-14,-1, red4 + red2 + red1 );
	paper.plot(-15,0, red4 + red2 + red1 );
	paper.plot(-15,1, red4 + red2 + red1 );
	paper.plot(-15,2, red4 + red2 + red1 );
	
	paper.plot(-11,-3, red4 + red2 + red1 );
	paper.plot(-11,-2, red4 + red2 + red1 );
	paper.plot(-11,-1, red4 + red2 + red1 );
	paper.plot(-11,0, red4 + red2 + red1 );
	paper.plot(-11,1, red4 + red2 + red1 );
	paper.plot(-11,2, red4 + red2 + red1 );
	paper.plot(-11,3, red4 + red2 + red1 );
	
	paper.plot(-10,2, red4 + red2 + red1 );
	paper.plot(-9,1, red4 + red2 + red1 );
	paper.plot(-8,0, red4 + red2 + red1 );
	paper.plot(-7,-1, red4 + red2 + red1 );
	paper.plot(-6,-2, red4 + red2 + red1 );
	
	paper.plot(-5,-3, red4 + red2 + red1 );
	paper.plot(-5,-2, red4 + red2 + red1 );
	paper.plot(-5,-1, red4 + red2 + red1 );
	paper.plot(-5,0, red4 + red2 + red1 );
	paper.plot(-5,1, red4 + red2 + red1 );
	paper.plot(-5,2, red4 + red2 + red1 );
	paper.plot(-5,3, red4 + red2 + red1 );
	
// do
	
	paper.plot(-1,-3, red4 + red2 + red1 );
	paper.plot(-1,-2, red4 + red2 + red1 );
	paper.plot(-1,-1, red4 + red2 + red1 );
	paper.plot(-1,0, red4 + red2 + red1 );
	paper.plot(-1,1, red4 + red2 + red1 );
	paper.plot(-1,2, red4 + red2 + red1 );
	paper.plot(-1,3, red4 + red2 + red1 );
	paper.plot(0,3, red4 + red2 + red1 );
	paper.plot(0,-3, red4 + red2 + red1 );
	paper.plot(1,-3, red4 + red2 + red1 );
	paper.plot(2,-2, red4 + red2 + red1 );
	paper.plot(3,-1, red4 + red2 + red1 );
	paper.plot(3,0, red4 + red2 + red1 );
	paper.plot(3,1, red4 + red2 + red1 );
	paper.plot(2,2, red4 + red2 + red1 );
	paper.plot(1,3, red4 + red2 + red1 );

	paper.plot(7,-3, red4 + red2 + red1 );
	paper.plot(6,-2, red4 + red2 + red1 );
	paper.plot(5,-1, red4 + red2 + red1 );
	paper.plot(5,0, red4 + red2 + red1 );
	paper.plot(5,1, red4 + red2 + red1 );
	paper.plot(6,2, red4 + red2 + red1 );
	paper.plot(7,3, red4 + red2 + red1 );
	paper.plot(8,-3, red4 + red2 + red1 );
	paper.plot(8,3, red4 + red2 + red1 );
	paper.plot(9,-2, red4 + red2 + red1 );
	paper.plot(9,2, red4 + red2 + red1 );
	paper.plot(10,1, red4 + red2 + red1 );
	paper.plot(10,0, red4 + red2 + red1 );
	paper.plot(10, -1, red4 + red2 + red1 );
// it
	paper.plot(13,-3, red4 + red2 + red1 );
	paper.plot(13,-2, red4 + red2 + red1 );
	paper.plot(13,-1, red4 + red2 + red1 );
	paper.plot(13,0, red4 + red2 + red1 );
	paper.plot(13,1, red4 + red2 + red1 );
	paper.plot(13,2, red4 + red2 + red1 );
	paper.plot(13,3, red4 + red2 + red1 );
	
	paper.plot(15,3, red4 + red2 + red1 );
	paper.plot(16,3, red4 + red2 + red1 );
	paper.plot(17,-3, red4 + red2 + red1 );
	paper.plot(17,-2, red4 + red2 + red1 );
	paper.plot(17,-1, red4 + red2 + red1 );
	paper.plot(17,0, red4 + red2 + red1 );
	paper.plot(17,1, red4 + red2 + red1 );
	paper.plot(17,2, red4 + red2 + red1 );
	paper.plot(17,3, red4 + red2 + red1 );
	paper.plot(18,3, red4 + red2 + red1 );
	paper.plot(19,3, red4 + red2 + red1 );
	                                       
    paper.display();
// added by fgw to store picture to PNG file
	SavePlaypen(paper, "hurray.png");
	cout << "press RETURN";
	cin.get();
}