function setupform(form)
{
// declare Arrays
tilename = new Array();
tileprice = new Array();
tileimage = new Array();
tileedge = new Array();
gridname = new Array();
gridimage = new Array();
gridtrimprice = new Array();
gridmbarprice = new Array();
gridct12price = new Array();
gridct6price = new Array();
lightname = new Array();
lightimage = new Array();
lightprice = new Array();
lighttiles = new Array();
lightdetails = new Array();

// **************************************************************************************************************
// tile data
tilenumber = 11;
j=0
tilename[j] = "Armstrong Tatra - Square Edge";
tileprice[j] = 1.93;
tileimage[j] = "diyimages/arm_tatra.jpg";

j++
tilename[j] = "Armstrong Cortega - Square Edge";
tileprice[j] = 2.23;
tileimage[j] = "diyimages/arm_cortega.jpg";

j++
tilename[j] = "Armstrong Dune 95RH - Square Edge";
tileprice[j] = 2.94;
tileimage[j] = "diyimages/arm_dune.jpg";

j++
tilename[j] = "Armstrong Dune - Tegular";
tileprice[j] = 3.45;
tileimage[j] = "diyimages/arm_dune.jpg";

j++
tilename[j] = "Armstrong Fine Fissured 95RH - Square Edge";
tileprice[j] = 2.12;
tileimage[j] = "diyimages/arm_ff.jpg";

j++
tilename[j] = "Armstrong ColourTone Dune (Carerra) - Square Edge";
tileprice[j] = 4.11;
tileimage[j] = "diyimages/arm_dune_carerra.jpg";

j++
tilename[j] = "Armstrong ColourTone Dune (Platinum) - Square Edge";
tileprice[j] = 4.11;
tileimage[j] = "diyimages/arm_dune_platinum.jpg";

j++
tilename[j] = "Armstrong ColourTone Dune (Blue Mountain) - Square Edge";
tileprice[j] = 4.11;
tileimage[j] = "diyimages/arm_dune_bluemountain.jpg";

j++
tilename[j] = "Armstrong ColourTone Dune (Naxos) - Square Edge";
tileprice[j] = 4.11;
tileimage[j] = "diyimages/arm_dune_naxos.jpg";

j++
tilename[j] = "Armstrong ColourTone Dune (Toledo) - Square Edge";
tileprice[j] = 4.11;
tileimage[j] = "diyimages/arm_dune_toledo.jpg";

j++
tilename[j] = "Danogipps Danotile (PVC faced GRG)";
tileprice[j] = 2.18;
tileimage[j] = "diyimages/gyp_ss.gif";


// grid data

gridnumber = 9
j=0
gridname[j] = "Armstrong White"
gridimage[j] = "diyimages/white.gif"
gridtrimprice[j] = 3.60
gridmbarprice[j] = 5.53
gridct12price[j] = 1.86
gridct6price[j] = 0.95
j++
gridname[j] = "DONN Black"
gridimage[j] = "diyimages/black.gif"
gridtrimprice[j] = 4.32
gridmbarprice[j] = 8.38
gridct12price[j] = 2.72
gridct6price[j] = 1.39
j++
gridname[j] = "DONN Gold"
gridimage[j] = "diyimages/gold.gif"
gridtrimprice[j] = 6.65
gridmbarprice[j] = 9.35
gridct12price[j] = 3.11
gridct6price[j] = 1.58
j++
gridname[j] = "DONN Silver"
gridimage[j] = "diyimages/silver.gif"
gridtrimprice[j] = 6.65
gridmbarprice[j] = 9.35
gridct12price[j] = 3.11
gridct6price[j] = 1.58
j++
gridname[j] = "DONN Mirror Gold"
gridimage[j] = "diyimages/mirrorgold.gif"
gridtrimprice[j] = 16.15
gridmbarprice[j] = 15.28
gridct12price[j] = 5.04
gridct6price[j] = 2.53
j++
gridname[j] = "DONN Mirror Silver"
gridimage[j] = "diyimages/mirrorsilver.gif"
gridtrimprice[j] = 16.15
gridmbarprice[j] = 15.28
gridct12price[j] = 5.04
gridct6price[j] = 2.53
j++
gridname[j] = "Phoenix Mirror Gold"
gridimage[j] = "diyimages/mirrorgold.gif"
gridtrimprice[j] = 13.46
gridmbarprice[j] = 10.90
gridct12price[j] = 4.30
gridct6price[j] = 2.15
j++
gridname[j] = "Phoenix Mirror Silver"
gridimage[j] = "diyimages/mirrorsilver.gif"
gridtrimprice[j] = 13.46
gridmbarprice[j] = 10.90
gridct12price[j] = 4.30
gridct6price[j] = 2.15
j++
gridname[j] = "Organasol (Corosion Resistant) White"
gridimage[j] = "diyimages/white.gif"
gridtrimprice[j] = 11.60
gridmbarprice[j] = 17.11
gridct12price[j] = 6.17
gridct6price[j] = 3.11

// light data

lightnumber = 4;
j=0
lightname[j] = "None.."
lightprice[j] = 0.00
lighttiles[j] = 0
lightdetails[j] = "";
j++
lightname[j] = "Low voltage Downlighter White"
lightimage[j] = "diyimages/white.gif"
lightprice[j] = 23.50
lighttiles[j] = 0
lightdetails[j] = "Die-cast alloy downlighter in white.\nSupplied complete with 50W 60deg flood lamp and (OSRAM 20-70W dimmable electronic transformer with 5 year guarantee)."
j++
lightname[j] = "Low voltage Downlighter Chrome"
lightimage[j] = "diyimages/white.gif"
lightprice[j] = 24.50
lighttiles[j] = 0
lightdetails[j] = "Die-cast alloy downlighter in polished silver.\nSupplied complete with 50W 60deg flood lamp and (OSRAM 20-70W dimmable electronic transformer with 5 year guarantee)."
j++
lightname[j] = "Low voltage Downlighter Gold"
lightimage[j] = "diyimages/white.gif"
lightprice[j] = 24.50
lighttiles[j] = 0
lightdetails[j] = "Die-cast alloy downlighter in polished gold.\nSupplied complete with 50W 60deg flood lamp and (OSRAM 20-70W dimmable electronic transformer with 5 year guarantee)."

/*
j++
lightname[j] = "Low voltage Swivel Downlighter White"
lightimage[j] = "diyimages/white.gif"
lightprice[j] = 25.00
lighttiles[j] = 0
lightdetails[j] = "Die-cast alloy swivel downlighter in white.\nSupplied complete with 50W 60deg flood lamp and (OSRAM 20-70W dimmable electronic transformer with 5 year guarantee)."
j++
lightname[j] = "Low voltage Swivel Downlighter Chrome"
lightimage[j] = "diyimages/white.gif"
lightprice[j] = 26.00
lighttiles[j] = 0
lightdetails[j] = "Die-cast alloy swivel downlighter in polished silver.\nSupplied complete with 50W 60deg flood lamp and (OSRAM 20-70W dimmable electronic transformer with 5 year guarantee)."
j++
lightname[j] = "Low voltage Swivel Downlighter Gold"
lightimage[j] = "diyimages/white.gif"
lightprice[j] = 26.00
lighttiles[j] = 0
lightdetails[j] = "Die-cast alloy swivel downlighter in polished gold.\nSupplied complete with 50W 60deg flood lamp and (OSRAM 20-70W dimmable electronic transformer with 5 year guarantee)."

j++
lightname[j] = "600x600mm 4 tube fitting with Prismatic lens"
lightprice[j] = 0.00
lighttiles[j] = 1
lightdetails[j] = "600x600mm fully-enclosed white reccessed troffer unit. Supplied complete with 4No. coolwhite tubes. Prismatic styrene lens."
j++
lightname[j] = "600x600mm 4 tube fitting with Low Brightness louvre"
lightprice[j] = 0.00
lighttiles[j] = 1
lightdetails[j] = "600x600mm fully-enclosed white reccessed troffer unit. Supplied complete with 4No. coolwhite tubes. Standard Low Brightness louvre, polished aluminum parabolic reflector with satin aluminum cross-blades."
j++
lightname[j] = "600x600mm 4 tube fitting with Cat 2 louvre"
lightprice[j] = 0.00
lighttiles[j] = 1
lightdetails[j] = "600x600mm fully-enclosed white reccessed troffer unit. Supplied complete with 4No. coolwhite tubes. Category 2 Low Brightness louvre, polished aluminum parabolic reflector and cross-blades."
j++
lightname[j] = "1200x600mm 4 tube fitting with Prismatic lens"
lightprice[j] = 0.00
lighttiles[j] = 2
lightdetails[j] = "1200x600mm fully-enclosed white reccessed troffer unit. Supplied complete with 4No. coolwhite tubes. Prismatic styrene lens."
j++
lightname[j] = "1200x600mm 4 tube fitting with Low Brightness louvre"
lightprice[j] = 0.00
lighttiles[j] = 2
lightdetails[j] = "1200x600mm fully-enclosed white reccessed troffer unit. Supplied complete with 4No. coolwhite tubes. Standard Low Brightness louvre, polished aluminum parabolic reflector with satin aluminum cross-blades."
j++
lightname[j] = "1200x600mm 4 tube fitting with Cat 2 louvre"
lightimage[j] = "diyimages/white.gif"
lightprice[j] = 0.00
lighttiles[j] = 2
lightdetails[j] = "1200x600mm fully-enclosed white reccessed troffer unit. Supplied complete with 4No. coolwhite tubes. Category 2 Low Brightness louvre, polished aluminum parabolic reflector and cross-blades."

*/

// misc prices

shadowbatonprice = 2.50;
vineprice = 0.16
concprice = 0.28
pinsprice = 0.95;
wireprice = 0.36;
panelprice = 2.12;
trimlength = 3
pinsperbox = 50
pinspertrim = 10

// **************************************************************************************************************

// setup tile-select box in form
 
form.tileselect.options.length = tilenumber;
for (i=0; i<tilenumber ; i++)
{
form.tileselect.options[i].text = tilename[i];
form.tileselect.options[i].value = i;
}

// setup grid-select box in form

form.gridselect.options.length = gridnumber;
for (i=0; i<gridnumber ; i++)
{
form.gridselect.options[i].text = gridname[i];
form.gridselect.options[i].value = i;
}

// setup light-select box in form

form.lightselect.options.length = lightnumber;
for (i=0; i<lightnumber ; i++)
{
form.lightselect.options[i].text = lightname[i];
form.lightselect.options[i].value = i;
}

// refesh image(s)

document.images.tileimg.src = tileimage[form.tileselect.options.value];
document.images.gridimg1.src = gridimage[form.gridselect.options.value];
document.images.gridimg2.src = gridimage[form.gridselect.options.value];

// refresh descriptions
form.lightprice.value = "£ " + lightprice[form.lightselect.options.value];
form.lightdetails.value = lightdetails[form.lightselect.options.value];

}


// function to delcare room class

function room(len,wid,drop,fix,baton)
{
this.len = len;
this.wid = wid;
this.drop = drop;
this.fix = fix;
this.baton = baton;
}

// function to declare materials class

function materials(trim,mbar,ct12,ct6,sb,vine,conc,wire,pins,tiles,lights)
{
this.trim = trim;
this.mbar = mbar;
this.ct12 = ct12;
this.ct6 = ct6;
this.sb = sb;
this.vine = vine;
this.conc = conc;
this.wire = wire;
this.pins = pins;
this.tiles = tiles;
this.lights = lights;
}


function trim(room)
{
qtrim=Math.ceil(((room.wid*2)+(room.len*2))/3)
return qtrim
}


function mbar(room)
{
return (Math.ceil(Math.floor((Math.ceil(room.wid / 0.6)-0.0001) / 2 ) * (Math.ceil(Math.ceil(room.len / 0.6) / 3 ) / 2)));
}


function ct12(room)
{
return (Math.ceil((Math.ceil(room.wid / 0.6) / 2) * (Math.ceil(room.len / 0.6) - 1)));
}

function ct6(room)
{
return (Math.ceil(room.len / 0.6) * (Math.floor(Math.ceil(room.wid / 0.6) / 2)));
}

function sb(room)
{
batonlength = 3;
return (Math.ceil((2*room.len + 2*room.wid)/batonlength));
}

function pins(room)
{
return (Math.ceil((((2 * room.len) + (2 * room.wid)) / trimlength) * (pinspertrim / pinsperbox)));
}

function tiles(room)
{
return (Math.ceil(room.len / 0.6) * Math.ceil(room.wid / 0.6));
}

function process(form)
{
// read
theroom = new room(form.len.value, form.wid.value, form.drop.value, form.fix.value, form.baton.value);

// setup
quan = new materials(0,0,0,0,0,0,0,0,0,0,0);
price = new materials(0,0,0,0,0,0,0,0,0,0,0);

// calculate quantities
quan.trim = trim(theroom);
quan.mbar = mbar(theroom);
quan.ct12 = ct12(theroom);
quan.ct6 = ct6(theroom);
if (lighttiles[form.lightselect.options.value] == 2)
{
quan.ct6 = quan.ct6 - form.lights.value
}
quan.sb = sb(theroom) * theroom.baton;
if (theroom.fix=="t") {quan.vine = quan.mbar * 3} else {quan.vine=0};
if (theroom.fix=="c") {quan.conc = quan.mbar * 3} else {quan.conc=0};
quan.wire = quan.mbar * theroom.drop * 3;
quan.pins = pins(theroom);
quan.tiles = tiles(theroom) - ( form.lights.value * lighttiles[form.lightselect.options.value] );
quan.lights = form.lights.value;

// calculate price
price.trim = gridtrimprice[form.gridselect.options.value];
price.mbar = gridmbarprice[form.gridselect.options.value];
price.ct12 = gridct12price[form.gridselect.options.value];
price.ct6 = gridct6price[form.gridselect.options.value];
price.sb = shadowbatonprice;
price.vine = vineprice;
price.conc = concprice;
price.pins = pinsprice;
price.wire = wireprice;
price.tiles = tileprice[form.tileselect.options.value];
price.lights = lightprice[form.lightselect.options.value];

subtotal = 0

subtotal += quan.trim * price.trim;
subtotal += quan.mbar * price.mbar;
subtotal += quan.ct12 * price.ct12;
subtotal += quan.ct6 * price.ct6;
subtotal += quan.sb * price.sb;
subtotal += quan.vine * price.vine;
subtotal += quan.conc * price.conc;
subtotal += quan.pins * price.pins;
subtotal += quan.wire * price.wire;
subtotal += quan.tiles * price.tiles;
subtotal += quan.lights * price.lights;

subtotal =  topence(subtotal);
vatrate = 17.5
vat = topence(subtotal * vatrate / 100)
total = topence(subtotal + vat)

// write
form.subtotal.value = "£ " + subtotal;
form.vat.value = "£ " + vat;
form.total.value = "£ " + total;

form.ntile.value = tilename[form.tileselect.options.value];
form.ngrid.value = gridname[form.gridselect.options.value];
form.nlight.value = lightname[form.lightselect.options.value];

form.qtrim.value = quan.trim;
form.qmbar.value = quan.mbar;
form.qct12.value = quan.ct12;
form.qct6.value = quan.ct6;
form.qsb.value = quan.sb;
form.qvine.value = quan.vine;
form.qconc.value = quan.conc;
form.qpins.value = quan.pins;
form.qwire.value = quan.wire;
form.qtiles.value = quan.tiles;
form.qlights.value = quan.lights;

form.ptrim.value = price.trim;
form.pmbar.value = price.mbar;
form.pct12.value = price.ct12;
form.pct6.value = price.ct6;
form.psb.value = price.sb;
form.pvine.value = price.vine;
form.pconc.value = price.conc;
form.ppins.value = price.pins;
form.pwire.value = price.wire;
form.ptiles.value = price.tiles;
form.plights.value = price.lights;

form.strim.value = topence(price.trim * quan.trim);
form.smbar.value = topence(price.mbar * quan.mbar);
form.sct12.value = topence(price.ct12 * quan.ct12);
form.sct6.value = topence(price.ct6 * quan.ct6);
form.ssb.value = topence(price.sb * quan.sb);
form.svine.value = topence(price.vine * quan.vine);
form.sconc.value = topence(price.conc * quan.conc);
form.spins.value = topence(price.pins * quan.pins);
form.swire.value = topence(price.wire * quan.wire);
form.stiles.value = topence(price.tiles * quan.tiles);
form.slights.value = topence(price.lights * quan.lights);

form.psqm.value = topence( subtotal / (theroom.len * theroom.wid));

}

function topence(n)
{
return (Math.round(n * 100) / 100)
}

function refresh(form)
{
document.images.tileimg.src = tileimage[form.tileselect.options.value];
document.images.gridimg1.src = gridimage[form.gridselect.options.value];
document.images.gridimg2.src = gridimage[form.gridselect.options.value];
form.lightprice.value = "£ " + lightprice[form.lightselect.options.value];
form.lightdetails.value = lightdetails[form.lightselect.options.value];
}

/* This notice must be untouched at all times.

wz_jsgraphics.js    v. 2.11
The latest version is available at
http://www.walterzorn.com
or http://www.devira.com
or http://www.walterzorn.de

Copyright (c) 2002-2003 Walter Zorn. All rights reserved.
Created 3. 11. 2002 by Walter Zorn (Web: http://www.walterzorn.com )
Last modified: 18. 12. 2003

Performance optimizations for Internet Explorer
by Thomas Frank and John Holdsworth

High Performance JavaScript Graphics Library.
Provides methods
- to draw lines, rectangles, ellipses, polygons
  with specifiable line thickness,
- to fill rectangles and ellipses
- to draw text.
NOTE: Operations, functions and branching have rather been optimized
to efficiency and speed than to shortness of source code.

This program is free software;
you can redistribute it and/or modify it under the terms of the
GNU General Public License as published by the Free Software Foundation;
either version 2 of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY;
without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU General Public License
at http://www.gnu.org/copyleft/gpl.html for more details.
*/


var jg_ihtm, jg_ie, jg_fast, jg_dom,
jg_n4 = (document.layers && typeof document.classes != "undefined");


function chkDHTM(x, i)
{
	x = document.body || null;
	jg_ie = x && typeof x.insertAdjacentHTML != "undefined";
	jg_dom = (x && !jg_ie &&
		typeof x.appendChild != "undefined" &&
		typeof document.createRange != "undefined" &&
		typeof (i = document.createRange()).setStartBefore != "undefined" &&
		typeof i.createContextualFragment != "undefined");
	jg_ihtm = !jg_ie && !jg_dom && x && typeof x.innerHTML != "undefined";
	jg_fast = jg_ie && document.all && !window.opera;
}


function pntDoc()
{
	this.wnd.document.write(jg_fast? this.htmRpc() : this.htm);
	this.htm = '';
}


function pntCnvDom()
{
	var x = document.createRange();
	x.setStartBefore(this.cnv);
	x = x.createContextualFragment(jg_fast? this.htmRpc() : this.htm);
	this.cnv.appendChild(x);
	this.htm = '';
}


function pntCnvIe()
{
	this.cnv.insertAdjacentHTML("beforeEnd", jg_fast? this.htmRpc() : this.htm);
	this.htm = '';
}


function pntCnvIhtm()
{
	this.cnv.innerHTML += this.htm;
	this.htm = '';
}


function pntCnv()
{
	this.htm = '';
}


function mkDiv(x, y, w, h)
{
	this.htm += '<div style="position:absolute;'+
		'left:' + x + 'px;'+
		'top:' + y + 'px;'+
		'width:' + w + 'px;'+
		'height:' + h + 'px;'+
		'clip:rect(0,'+w+'px,'+h+'px,0);'+
		'overflow:hidden;background-color:' + this.color +
		';"><\/div>';
}


function mkDivIe(x, y, w, h)
{ 
	this.htm += '%%'+this.color+';'+x+';'+y+';'+w+';'+h+';';
}


function mkDivPrt(x, y, w, h)
{
	this.htm += '<div style="position:absolute;'+
		'border-left:' + w + 'px solid ' + this.color + ';'+
		'left:' + x + 'px;'+
		'top:' + y + 'px;'+
		'width:0px;'+
		'height:' + h + 'px;'+
		'clip:rect(0,'+w+'px,'+h+'px,0);'+
		'overflow:hidden;background-color:' + this.color + ';'+
		'"><\/div>';
}


function mkLyr(x, y, w, h)
{
	this.htm += '<layer '+
		'left="' + x + '" '+
		'top="' + y + '" '+
		'width="' + w + '" '+
		'height="' + h + '" '+
		'bgcolor="' + this.color + '"><\/layer>\n';
}


function mkLbl(txt, x, y)
{
	this.htm += '<div style="position:absolute;white-space:nowrap;'+
		'left:' + x + 'px;'+
		'top:' + y + 'px;'+
		'font-family:' +  this.ftFam + ';'+
		'font-size:' + this.ftSz + ';'+
		'color:' + this.color + ';' + this.ftSty + '">'+
		txt +
		'<\/div>';
}


var regex =  /%%([^;]+);([^;]+);([^;]+);([^;]+);([^;]+);/g;

function htmRpc()
{
	return this.htm.replace(
		regex,
		'<div style="overflow:hidden;position:absolute;background-color:'+
		'$1;left:$2;top:$3;width:$4;height:$5"></div>\n');
}


function htmPrtRpc()
{
	return this.htm.replace(
		regex,
		'<div style="overflow:hidden;position:absolute;background-color:'+
		'$1;left:$2;top:$3;width:$4;height:$5;border-left:$4px solid $1"></div>\n');
}


function mkLin(x1, y1, x2, y2)
{
	if (x1 > x2)
	{
		var _x2 = x2;
		var _y2 = y2;
		x2 = x1;
		y2 = y1;
		x1 = _x2;
		y1 = _y2;
	}
	var dx = x2-x1, dy = Math.abs(y2-y1),
	x = x1, y = y1,
	yIncr = (y1 > y2)? -1 : 1;

	if (dx >= dy)
	{
		var pr = dy<<1,
		pru = pr - (dx<<1),
		p = pr-dx,
		ox = x;
		while ((dx--) > 0)
		{
			++x;
			if (p > 0)
			{
				this.mkDiv(ox, y, x-ox, 1);
				y += yIncr;
				p += pru;
				ox = x;
			}
			else p += pr;
		}
		this.mkDiv(ox, y, x2-ox+1, 1);
	}

	else
	{
		var pr = dx<<1,
		pru = pr - (dy<<1),
		p = pr-dy,
		oy = y;
		if (y2 <= y1)
		{
			while ((dy--) > 0)
			{
				if (p > 0)
				{
					this.mkDiv(x++, y, 1, oy-y+1);
					y += yIncr;
					p += pru;
					oy = y;
				}
				else
				{
					y += yIncr;
					p += pr;
				}
			}
			this.mkDiv(x2, y2, 1, oy-y2+1);
		}
		else
		{
			while ((dy--) > 0)
			{
				y += yIncr;
				if (p > 0)
				{
					this.mkDiv(x++, oy, 1, y-oy);
					p += pru;
					oy = y;
				}
				else p += pr;
			}
			this.mkDiv(x2, oy, 1, y2-oy+1);
		}
	}
}


function mkLin2D(x1, y1, x2, y2)
{
	if (x1 > x2)
	{
		var _x2 = x2;
		var _y2 = y2;
		x2 = x1;
		y2 = y1;
		x1 = _x2;
		y1 = _y2;
	}
	var dx = x2-x1, dy = Math.abs(y2-y1),
	x = x1, y = y1,
	yIncr = (y1 > y2)? -1 : 1;

	var s = this.stroke;
	if (dx >= dy)
	{
		if (s-3 > 0)
		{
			var _s = (s*dx*Math.sqrt(1+dy*dy/(dx*dx))-dx-(s>>1)*dy) / dx;
			_s = (!(s-4)? Math.ceil(_s) : Math.round(_s)) + 1;
		}
		else var _s = s;
		var ad = Math.ceil(s/2);

		var pr = dy<<1,
		pru = pr - (dx<<1),
		p = pr-dx,
		ox = x;
		while ((dx--) > 0)
		{
			++x;
			if (p > 0)
			{
				this.mkDiv(ox, y, x-ox+ad, _s);
				y += yIncr;
				p += pru;
				ox = x;
			}
			else p += pr;
		}
		this.mkDiv(ox, y, x2-ox+ad+1, _s);
	}

	else
	{
		if (s-3 > 0)
		{
			var _s = (s*dy*Math.sqrt(1+dx*dx/(dy*dy))-(s>>1)*dx-dy) / dy;
			_s = (!(s-4)? Math.ceil(_s) : Math.round(_s)) + 1;
		}
		else var _s = s;
		var ad = Math.round(s/2);

		var pr = dx<<1,
		pru = pr - (dy<<1),
		p = pr-dy,
		oy = y;
		if (y2 <= y1)
		{
			++ad;
			while ((dy--) > 0)
			{
				if (p > 0)
				{
					this.mkDiv(x++, y, _s, oy-y+ad);
					y += yIncr;
					p += pru;
					oy = y;
				}
				else
				{
					y += yIncr;
					p += pr;
				}
			}
			this.mkDiv(x2, y2, _s, oy-y2+ad);
		}
		else
		{
			while ((dy--) > 0)
			{
				y += yIncr;
				if (p > 0)
				{
					this.mkDiv(x++, oy, _s, y-oy+ad);
					p += pru;
					oy = y;
				}
				else p += pr;
			}
			this.mkDiv(x2, oy, _s, y2-oy+ad+1);
		}
	}
}


function mkLinDott(x1, y1, x2, y2)
{
	if (x1 > x2)
	{
		var _x2 = x2;
		var _y2 = y2;
		x2 = x1;
		y2 = y1;
		x1 = _x2;
		y1 = _y2;
	}
	var dx = x2-x1, dy = Math.abs(y2-y1),
	x = x1, y = y1,
	yIncr = (y1 > y2)? -1 : 1,
	drw = true;
	if (dx >= dy)
	{
		var pr = dy<<1,
		pru = pr - (dx<<1),
		p = pr-dx;
		while ((dx--) > 0)
		{
			if (drw) this.mkDiv(x, y, 1, 1);
			drw = !drw;
			if (p > 0)
			{
				y += yIncr;
				p += pru;
			}
			else p += pr;
			++x;
		}
		if (drw) this.mkDiv(x, y, 1, 1);
	}

	else
	{
		var pr = dx<<1,
		pru = pr - (dy<<1),
		p = pr-dy;
		while ((dy--) > 0)
		{
			if (drw) this.mkDiv(x, y, 1, 1);
			drw = !drw;
			y += yIncr;
			if (p > 0)
			{
				++x;
				p += pru;
			}
			else p += pr;
		}
		if (drw) this.mkDiv(x, y, 1, 1);
	}
}


function mkOv(left, top, width, height)
{
	var a = width>>1, b = height>>1,
	wod = width&1, hod = (height&1)+1,
	cx = left+a, cy = top+b,
	x = 0, y = b,
	ox = 0, oy = b,
	aa = (a*a)<<1, bb = (b*b)<<1,
	st = (aa>>1)*(1-(b<<1)) + bb,
	tt = (bb>>1) - aa*((b<<1)-1),
	w, h;
	while (y > 0)
	{
		if (st < 0)
		{
			st += bb*((x<<1)+3);
			tt += (bb<<1)*(++x);
		}
		else if (tt < 0)
		{
			st += bb*((x<<1)+3) - (aa<<1)*(y-1);
			tt += (bb<<1)*(++x) - aa*(((y--)<<1)-3);
			w = x-ox;
			h = oy-y;
			if (w&2 && h&2)
			{
				this.mkOvQds(cx, cy, -x+2, ox+wod, -oy, oy-1+hod, 1, 1);
				this.mkOvQds(cx, cy, -x+1, x-1+wod, -y-1, y+hod, 1, 1);
			}
			else this.mkOvQds(cx, cy, -x+1, ox+wod, -oy, oy-h+hod, w, h);
			ox = x;
			oy = y;
		}
		else
		{
			tt -= aa*((y<<1)-3);
			st -= (aa<<1)*(--y);
		}
	}
	this.mkDiv(cx-a, cy-oy, a-ox+1, (oy<<1)+hod);
	this.mkDiv(cx+ox+wod, cy-oy, a-ox+1, (oy<<1)+hod);
}


function mkOv2D(left, top, width, height)
{
	var s = this.stroke;
	width += s-1;
	height += s-1;
	var a = width>>1, b = height>>1,
	wod = width&1, hod = (height&1)+1,
	cx = left+a, cy = top+b,
	x = 0, y = b,
	aa = (a*a)<<1, bb = (b*b)<<1,
	st = (aa>>1)*(1-(b<<1)) + bb,
	tt = (bb>>1) - aa*((b<<1)-1);

	if (s-4 < 0 && (!(s-2) || width-51 > 0 && height-51 > 0))
	{
		var ox = 0, oy = b,
		w, h,
		pxl, pxr, pxt, pxb, pxw;
		while (y > 0)
		{
			if (st < 0)
			{
				st += bb*((x<<1)+3);
				tt += (bb<<1)*(++x);
			}
			else if (tt < 0)
			{
				st += bb*((x<<1)+3) - (aa<<1)*(y-1);
				tt += (bb<<1)*(++x) - aa*(((y--)<<1)-3);
				w = x-ox;
				h = oy-y;

				if (w-1)
				{
					pxw = w+1+(s&1);
					h = s;
				}
				else if (h-1)
				{
					pxw = s;
					h += 1+(s&1);
				}
				else pxw = h = s;
				this.mkOvQds(cx, cy, -x+1, ox-pxw+w+wod, -oy, -h+oy+hod, pxw, h);
				ox = x;
				oy = y;
			}
			else
			{
				tt -= aa*((y<<1)-3);
				st -= (aa<<1)*(--y);
			}
		}
		this.mkDiv(cx-a, cy-oy, s, (oy<<1)+hod);
		this.mkDiv(cx+a+wod-s+1, cy-oy, s, (oy<<1)+hod);
	}

	else
	{
		var _a = (width-((s-1)<<1))>>1,
		_b = (height-((s-1)<<1))>>1,
		_x = 0, _y = _b,
		_aa = (_a*_a)<<1, _bb = (_b*_b)<<1,
		_st = (_aa>>1)*(1-(_b<<1)) + _bb,
		_tt = (_bb>>1) - _aa*((_b<<1)-1),

		pxl = new Array(),
		pxt = new Array(),
		_pxb = new Array();
		pxl[0] = 0;
		pxt[0] = b;
		_pxb[0] = _b-1;
		while (y > 0)
		{
			if (st < 0)
			{
				st += bb*((x<<1)+3);
				tt += (bb<<1)*(++x);
				pxl[pxl.length] = x;
				pxt[pxt.length] = y;
			}
			else if (tt < 0)
			{
				st += bb*((x<<1)+3) - (aa<<1)*(y-1);
				tt += (bb<<1)*(++x) - aa*(((y--)<<1)-3);
				pxl[pxl.length] = x;
				pxt[pxt.length] = y;
			}
			else
			{
				tt -= aa*((y<<1)-3);
				st -= (aa<<1)*(--y);
			}

			if (_y > 0)
			{
				if (_st < 0)
				{
					_st += _bb*((_x<<1)+3);
					_tt += (_bb<<1)*(++_x);
					_pxb[_pxb.length] = _y-1;
				}
				else if (_tt < 0)
				{
					_st += _bb*((_x<<1)+3) - (_aa<<1)*(_y-1);
					_tt += (_bb<<1)*(++_x) - _aa*(((_y--)<<1)-3);
					_pxb[_pxb.length] = _y-1;
				}
				else
				{
					_tt -= _aa*((_y<<1)-3);
					_st -= (_aa<<1)*(--_y);
					_pxb[_pxb.length-1]--;
				}
			}
		}

		var ox = 0, oy = b,
		_oy = _pxb[0],
		l = pxl.length,
		w, h;
		for (var i = 0; i < l; i++)
		{
			if (typeof _pxb[i] != "undefined")
			{
				if (_pxb[i] < _oy || pxt[i] < oy)
				{
					x = pxl[i];
					this.mkOvQds(cx, cy, -x+1, ox+wod, -oy, _oy+hod, x-ox, oy-_oy);
					ox = x;
					oy = pxt[i];
					_oy = _pxb[i];
				}
			}
			else
			{
				x = pxl[i];
				this.mkDiv(cx-x+1, cy-oy, 1, (oy<<1)+hod);
				this.mkDiv(cx+ox+wod, cy-oy, 1, (oy<<1)+hod);
				ox = x;
				oy = pxt[i];
			}
		}
		this.mkDiv(cx-a, cy-oy, 1, (oy<<1)+hod);
		this.mkDiv(cx+ox+wod, cy-oy, 1, (oy<<1)+hod);
	}
}


function mkOvDott(left, top, width, height)
{
	var a = width>>1, b = height>>1,
	wod = width&1, hod = height&1,
	cx = left+a, cy = top+b,
	x = 0, y = b,
	aa2 = (a*a)<<1, aa4 = aa2<<1, bb = (b*b)<<1,
	st = (aa2>>1)*(1-(b<<1)) + bb,
	tt = (bb>>1) - aa2*((b<<1)-1),
	drw = true;
	while (y > 0)
	{
		if (st < 0)
		{
			st += bb*((x<<1)+3);
			tt += (bb<<1)*(++x);
		}
		else if (tt < 0)
		{
			st += bb*((x<<1)+3) - aa4*(y-1);
			tt += (bb<<1)*(++x) - aa2*(((y--)<<1)-3);
		}
		else
		{
			tt -= aa2*((y<<1)-3);
			st -= aa4*(--y);
		}
		if (drw) this.mkOvQds(cx, cy, -x, x+wod, -y, y+hod, 1, 1);
		drw = !drw;
	}
}


function mkRect(x, y, w, h)
{
	var s = this.stroke;
	this.mkDiv(x, y, w, s);
	this.mkDiv(x+w, y, s, h);
	this.mkDiv(x, y+h, w+s, s);
	this.mkDiv(x, y+s, s, h-s);
}


function mkRectDott(x, y, w, h)
{
	this.drawLine(x, y, x+w, y);
	this.drawLine(x+w, y, x+w, y+h);
	this.drawLine(x, y+h, x+w, y+h);
	this.drawLine(x, y, x, y+h);
}


function jsgFont()
{
	this.PLAIN = 'font-weight:normal;';
	this.BOLD = 'font-weight:bold;';
	this.ITALIC = 'font-style:italic;';
	this.ITALIC_BOLD = this.ITALIC + this.BOLD;
	this.BOLD_ITALIC = this.ITALIC_BOLD;
}
var Font = new jsgFont();


function jsgStroke()
{
	this.DOTTED = -1;
}
var Stroke = new jsgStroke();


function jsGraphics(id, wnd)
{
	this.setColor = new Function('arg', 'this.color = arg.toLowerCase();');

	this.setStroke = function(x)
	{
		this.stroke = x;
		if (!(x+1))
		{
			this.drawLine = mkLinDott;
			this.mkOv = mkOvDott;
			this.drawRect = mkRectDott;
		}
		else if (x-1 > 0)
		{
			this.drawLine = mkLin2D;
			this.mkOv = mkOv2D;
			this.drawRect = mkRect;
		}
		else
		{
			this.drawLine = mkLin;
			this.mkOv = mkOv;
			this.drawRect = mkRect;
		}
	};


	this.setPrintable = function(arg)
	{
		this.printable = arg;
		if (jg_fast)
		{
			this.mkDiv = mkDivIe;
			this.htmRpc = arg? htmPrtRpc : htmRpc;
		}
		else this.mkDiv = jg_n4? mkLyr : arg? mkDivPrt : mkDiv;
	};


	this.setFont = function(fam, sz, sty)
	{
		this.ftFam = fam;
		this.ftSz = sz;
		this.ftSty = sty || Font.PLAIN;
	};


	this.drawPolyline = this.drawPolyLine = function(x, y, s)
	{
		for (var i=0 ; i<x.length-1 ; i++ )
			this.drawLine(x[i], y[i], x[i+1], y[i+1]);
	};


	this.fillRect = function(x, y, w, h)
	{
		this.mkDiv(x, y, w, h);
	};


	this.drawPolygon = function(x, y)
	{
		this.drawPolyline(x, y);
		this.drawLine(x[x.length-1], y[x.length-1], x[0], y[0]);
	};


	this.drawEllipse = this.drawOval = function(x, y, w, h)
	{
		this.mkOv(x, y, w, h);
	};


	this.fillEllipse = this.fillOval = function(left, top, w, h)
	{
		var a = (w -= 1)>>1, b = (h -= 1)>>1,
		wod = (w&1)+1, hod = (h&1)+1,
		cx = left+a, cy = top+b,
		x = 0, y = b,
		ox = 0, oy = b,
		aa2 = (a*a)<<1, aa4 = aa2<<1, bb = (b*b)<<1,
		st = (aa2>>1)*(1-(b<<1)) + bb,
		tt = (bb>>1) - aa2*((b<<1)-1),
		pxl, dw, dh;
		if (w+1) while (y > 0)
		{
			if (st < 0)
			{
				st += bb*((x<<1)+3);
				tt += (bb<<1)*(++x);
			}
			else if (tt < 0)
			{
				st += bb*((x<<1)+3) - aa4*(y-1);
				pxl = cx-x;
				dw = (x<<1)+wod;
				tt += (bb<<1)*(++x) - aa2*(((y--)<<1)-3);
				dh = oy-y;
				this.mkDiv(pxl, cy-oy, dw, dh);
				this.mkDiv(pxl, cy+oy-dh+hod, dw, dh);
				ox = x;
				oy = y;
			}
			else
			{
				tt -= aa2*((y<<1)-3);
				st -= aa4*(--y);
			}
		}
		this.mkDiv(cx-a, cy-oy, w+1, (oy<<1)+hod);
	};


	this.drawString = mkLbl;


	this.clear = function()
	{
		this.htm = "";
		if (this.cnv) this.cnv.innerHTML = this.defhtm;
	};


	this.mkOvQds = function(cx, cy, xl, xr, yt, yb, w, h)
	{
		this.mkDiv(xr+cx, yt+cy, w, h);
		this.mkDiv(xr+cx, yb+cy, w, h);
		this.mkDiv(xl+cx, yb+cy, w, h);
		this.mkDiv(xl+cx, yt+cy, w, h);
	};

	this.setStroke(1);
	this.setFont('verdana,geneva,helvetica,sans-serif', String.fromCharCode(0x31, 0x32, 0x70, 0x78), Font.PLAIN);
	this.color = '#000000';
	this.htm = '';
	this.wnd = wnd || window;

	if (!(jg_ie || jg_dom || jg_ihtm)) chkDHTM();
	if (typeof id != 'string' || !id) this.paint = pntDoc;
	else
	{
		this.cnv = document.all? (this.wnd.document.all[id] || null)
			: document.getElementById? (this.wnd.document.getElementById(id) || null)
			: null;
		this.defhtm = (this.cnv && this.cnv.innerHTML)? this.cnv.innerHTML : '';
		this.paint = jg_dom? pntCnvDom : jg_ie? pntCnvIe : jg_ihtm? pntCnvIhtm : pntCnv;
	}

	this.setPrintable(false);
}