/*
C-note$ -- Hundred-dollar auctions of noteworthy Carpenters items
(featured message in KC RAM, newsletter of the Karen Carpenter Remembrance Page)
*/

// month covered:
var cnmonth = "November";

// intro/summary: -- if not blank, include <br><br> at end
var cnintro = "";


// table listing:

// date
// auction site
// number/ID
// item
// quoted description
// # bidders
// sold for <span style=\"font-size: .8em;\"><br>GBP 100.00</span>
// remarks

var cni = new Array();
var cnj = -1;

cni[++cnj] = new Array(); var cnk = -1;
cni[cnj][++cnk] = "11/16/03";
cni[cnj][++cnk] = "eBay";
cni[cnj][++cnk] = "2571821689";
cni[cnj][++cnk] = "CARPENTERS 11 MINI-LP CDS JAPAN MINT LIKE NEW";
cni[cnj][++cnk] = "Released in 1998 on POLYDOR K.K.(cat# POCM-9040/50). Very hard to find Japan only CD. perfect condition. disc : all mint (11 cds) sleeve : mint outer box : mint 186 pages booklet and still seald handkerchief included.";
cni[cnj][++cnk] = "1";
cni[cnj][++cnk] = "US $199.99";
cni[cnj][++cnk] = "";

cni[++cnj] = new Array(); var cnk = -1;
cni[cnj][++cnk] = "11/16/03";
cni[cnj][++cnk] = "eBay";
cni[cnj][++cnk] = "2572119973";
cni[cnj][++cnk] = "CARPENTERS NOW & THEN JAPAN 24K GOLD CD RARE";
cni[cnj][++cnk] = "1989 Pony Canyon/A&M. Cat. # D33Y3394. 5\" CD. Lyric included. Japan only 24K gold CD. Ultra hard to find even in Japan.";
cni[cnj][++cnk] = "7";
cni[cnj][++cnk] = "US $312.99";
cni[cnj][++cnk] = "";

cni[++cnj] = new Array(); var cnk = -1;
cni[cnj][++cnk] = "11/17/03";
cni[cnj][++cnk] = "eBay";
cni[cnj][++cnk] = "2573846396";
cni[cnj][++cnk] = "THE CARPENTERS NOW & THEN JAPAN 24K GOLD CD";
cni[cnj][++cnk] = "released in 1989 by A&M, Catalogue # D33Y3394. The cd and sleeve in Mint condition. Bought this brand new in Japan 2 years ago from a private collector.";
cni[cnj][++cnk] = "1";
cni[cnj][++cnk] = "US $180.00";
cni[cnj][++cnk] = "";

cni[++cnj] = new Array(); var cnk = -1;
cni[cnj][++cnk] = "11/19/03";
cni[cnj][++cnk] = "eBay";
cni[cnj][++cnk] = "2572821898";
cni[cnj][++cnk] = "Carpenters - The CD collection";
cni[cnj][++cnk] = "The Compact Disc Collection. 12 CD box set manufactured in UK only 1989-1990. Limited edition number 0881. This collection is wonderfully presented in a 12\" white box decorated in red and gold. It has a signed inscription by Richard Carpenter and several pages of information about their albums and careers. The collection includes the entire Carpenters catalogue of work excluding the greatest hits and live albums.";
cni[cnj][++cnk] = "1";
cni[cnj][++cnk] = "US $163.61 <span style=\"font-size: .8em;\"><br>GBP 95.00</span>";
cni[cnj][++cnk] = "";

cni[++cnj] = new Array(); var cnk = -1;
cni[cnj][++cnk] = "11/24/03";
cni[cnj][++cnk] = "eBay";
cni[cnj][++cnk] = "3364092423";
cni[cnj][++cnk] = "The Carpenters Fan Club 8X10 Karen Carpenter";
cni[cnj][++cnk] = "B&W 8X10 photo of Karen & Richard Carpenter taken during the taping of their 1978 \"A Christmas Portrait\" ABC TV special. It is an original from the Downey fan club.";
cni[cnj][++cnk] = "4";
cni[cnj][++cnk] = "US $178.00";
cni[cnj][++cnk] = "";


var alltotal = 0;
var phighest = 0;
var plowest = 9999999;
var pval = new Array();
   for (t = 0; t < cni.length; t++) {
   var usd = convertUSD(cni[t][6]);
   alltotal += usd;
   pval[t] = usd;
   var plowest = (usd < plowest) ? usd : plowest;
   var phighest = (usd > phighest) ? usd : phighest;
   }
var usdtotal = CurrencyFormatted(alltotal);
var usdtotal = CommaFormatted(usdtotal);
var usdavg = CurrencyFormatted(alltotal/cni.length);
var usdavg = CommaFormatted(usdavg);
var usdlowest = CurrencyFormatted(plowest);
var usdlowest = CommaFormatted(usdlowest);
var usdhighest = CurrencyFormatted(phighest);
var usdhighest = CommaFormatted(usdhighest);

var ilowest = new Array();
var iln = -1;
var ihighest = new Array();
var ihn = -1;
   for (t = 0; t < pval.length; t++) {
      if (pval[t] == plowest) {
      ilowest[++iln] = t;
      }
      if (pval[t] == phighest) {
      ihighest[++ihn] = t;
      }
   }

var lweach = "";
var ll = ilowest.length;
   if (ll > 1) {
   var lweach = " each";
   var lshow = "s are ";
      for (k = 0; k < ll-1; k++) {
      var commasep = (k > 0) ? ", " : "";
      var lshow = lshow + commasep + "\"" + cni[ilowest[k]][3] + "\" (" + cni[ilowest[k]][0] + ")";
      }
   var lshow = lshow + " and \"" + cni[ilowest[ll-1]][3] + "\" (" + cni[ilowest[ll-1]][0] + ")";
   }
   else {
   var lshow = " is \"" + cni[ilowest[0]][3] + "\" (" + cni[ilowest[0]][0] + ")";
   }
var hweach = "";
var hl = ihighest.length;
   if (hl > 1) {
   var hweach = " each";
   var hshow = "s are \"";
      for (k = 0; k < hl-1; k++) {
      var commasep = (k > 0) ? ", " : "";
      var hshow = hshow + commasep + "\"" + cni[ihighest[k]][3] + "\" (" + cni[ihighest[k]][0] + ")";
      }
   var hshow = hshow + " and \"" + cni[ihighest[hl-1]][3] + "\" (" + cni[ihighest[hl-1]][0] + ")";
   }
   else {
   var hshow = " is \"" + cni[ihighest[0]][3] + "\" (" + cni[ihighest[0]][0] + ")";
   }

function showItems() {
   if (cni.length < 2) {
      if (cni.length < 1) {
      var cnhighlowdescr = 'No final bids of at least $100 on any Carpenters items were found for ' + cnmonth;
      }
      else {
      var cnhighlowdescr = 'Below is the only final bid of at least $100 on a Carpenters item found for ' + cnmonth;
      }
   }
   else {
   var cnhighlowdescr = 'Below are all final bids of at least $100 on Carpenters items found for ' + cnmonth + '. ';
      if (usdhighest == usdlowest) {
      var cnhighlowdescr = cnhighlowdescr + 'The ' + cni.length + ' listed sold for $' + usdhighest + hweach;
      }
      else {
      var cnhighlowdescr = cnhighlowdescr + 'Of the ' + cni.length + ' listed, the highest priced item' + hshow + ', which sold for $' + usdhighest + hweach + '. The lowest priced one' + lshow + ', which sold for a mere $' + usdlowest + lweach;
      }
   }
document.write(cnintro + cnhighlowdescr + '.<br><br><table width="100%" style="font-family: arial; font-size: .8em;" cellpadding="2" cellspacing="0" border="0"><tr><td></td><td colspan="4" height="1" bgcolor="#dddddd"></td></tr><tr valign="bottom"><td align="center"><i>Date</i><br></td><td align="center" bgcolor="#dddddd"><i>Site</i><br></td><td bgcolor="#eeeeee" class="cnitem"><i>Item</i><br></td><td align="center" bgcolor="#dddddd"><i>Bids</i><br></td><td nowrap align="right" bgcolor="#dddddd" class="cnsold"><i>Sold for</i><br></td></tr><tr bgcolor="#dddddd" valign="top"><td colspan="2" align="center"><i>Number/ID</i><br></td><td colspan="3" bgcolor="#eeeeee"><i><span class="cndesc">Description </span><span class="cnrmks">& remarks</span></i><br></td></tr><tr><td colspan="2"></td><td colspan="3" height="1" bgcolor="#bbbbbb"></td></tr><tr><td colspan="5" height="1"></td></tr>');
   for (j = 0; j < cni.length; j++) {
   document.write('<tr><td></td><td colspan="4" height="1" bgcolor="#eeeedd"></td></tr><tr valign="top"><td align="center">' + cni[j][0] + '<br></td><td bgcolor="#eeeedd"><a href="http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=' + cni[j][2] + '">' + cni[j][1] + '</a><br></td><td bgcolor="#ffffee" class="cnitem">' + cni[j][3] + '<br></td><td align="center" bgcolor="#eeeedd">' + cni[j][5] + '<br></td><td nowrap align="right" bgcolor="#eeeedd" class="cnsold">' + cni[j][6] + '<br></td></tr><tr valign="top"><td colspan="2" align="center" bgcolor="#eeeedd">' + cni[j][2] + '<br></td><td colspan="3" rowspan="2" bgcolor="#ffffee"><dl><dt class="cndesc">' + cni[j][4] + '<dd class="cnrmks">' + cni[j][7] + '<br></td></tr><tr><td colspan="2">&nbsp;</td></tr><tr><td colspan="2"></td><td colspan="3" height="1" bgcolor="#ccccbb"></td></tr>');
   }
document.write('</table>' + listTotals());
}

function convertUSD(usdval) {
var ppcents = usdval.indexOf(".");
var ppdols = usdval.indexOf("$");
var susd = usdval.substring(ppdols+1,ppcents+3);
return eval(susd);
}

function listTotals() {
var cntotals = (cni.length < 2) ? '' : '<table width="100%" style="font-family: arial; font-size: .8em;"><tr valign="top"><td>' + cni.length + ' items<br></td><td align="right" class="cnsold"><i>total:&nbsp;</i> US $' + usdtotal + '<span style="font-size: .9em; font-weight: normal;"><br><i>average:&nbsp;</i> US $' + usdavg + '</span><br></td></tr></table>';
return cntotals;
}

// following 2 functions found at:
// http://devwebprocanada.com/devwebproca-44-20030520CurrencyFormattingandPuttingCommasInNumbers.html

function CurrencyFormatted(amount)
{
var i = parseFloat(amount);
if(isNaN(i)) { i = 0.00; }
var minus = '';
if(i < 0) { minus = '-'; }
i = Math.abs(i);
i = parseInt((i + .005) * 100);
i = i / 100;
s = new String(i);
if(s.indexOf('.') < 0) { s += '.00'; }
if(s.indexOf('.') == (s.length - 2)) { s += '0'; }
s = minus + s;
return s;
}
// end of function CurrencyFormatted()

function CommaFormatted(amount)
{
var delimiter = ","; // replace comma if desired
var a = amount.split('.',2)
var d = a[1];
var i = parseInt(a[0]);
if(isNaN(i)) { return ''; }
var minus = '';
if(i < 0) { minus = '-'; }
i = Math.abs(i);
var n = new String(i);
var a = [];
while(n.length > 3)
{
var nn = n.substr(n.length-3);
a.unshift(nn);
n = n.substr(0,n.length-3);
}
if(n.length > 0) { a.unshift(n); }
n = a.join(delimiter);
if(d.length < 1) { amount = n; }
else { amount = n + '.' + d; }
amount = minus + amount;
return amount;
}
// end of function CommaFormatted()

/*
URL for item list:

http://search-completed.ebay.com/search/search.dll?MfcISAPICommand=GetResult&ht=1&query2=carpenters&search_option=1&submit=+Search+&minPrice=100&maxPrice=&category0=&srchdesc=y&completedOnly=30&exclude=&st=&SortProperty=MetaEndSort&maxRecordsPerPage=50&worldlocation=ebayavail&region=0&available_to=1&located_in=1&ebaycurr=&siteid=0&query=carpenters&shortcut=&ebaytag1code_tmp=&ebaytag1_tmp=&ebaytag1code=&ebaytag1=&ebaytag12=ebayreg&from=R6
*/