
function goBuy() {
        ilist='';
        index=document.cookie.indexOf('ACT');
        countbegin=(document.cookie.indexOf('=', index)+1);
        countend=document.cookie.indexOf(';',index);
        if(countend==-1) { countend=document.cookie.length; }
        fulllist=document.cookie.substring(countbegin,countend);
        for(var i=0; i<= fulllist.length;i++) {
            if(fulllist.substring(i,i+1)=='[') {
                itemstart=i;
            } else if (fulllist.substring(i,i+1)==']') {
                itemend=i+1;
                ilist=ilist+fulllist.substring(itemstart,itemend);
            }
        }
        if (ilist > ""){
                ilist=changeSpaces(ilist);
        top.location='buy.htm?items='+ilist;
               }
        if (ilist == ""){
        alert ("Your shopping basket is empty. Please add a product to your basket first")
        }
               
    }

    function changeSpaces(tstring) {
        nstring='';
        for (var i=0; i <= tstring.length; i++) {
            if (tstring.charAt(i)==' ') { nstring=nstring+'^';
            } else { nstring=nstring+tstring.charAt(i); }
        }
        return nstring;
    }



function checkAdvanced(adv) {
     newAdv='';advlist=0;
    for (var j=0;j<=adv.length;j++) {
            if (adv.substring(j,j+1) == '{') {
            thisadv=1;
            advstart=j+1;
        } else if (adv.substring(j,j+1) == '}') {
            advend=j;
            advPrice2=adv.substring(advstart,advend);
            advlist++; applicable=true;
            if (applicable==true) {
                newAdv = newAdv+ '{'+advFrom+'~'+advTo+'~'+advPrice+'~'+advPrice2+'}'
            }
        } else if (adv.substring(j,j+1)=='~') {
            if (thisadv== 1) advFrom=adv.substring(advstart,j);
            if (thisadv== 2) advTo=adv.substring(advstart,j);
            if (thisadv== 3) advPrice=adv.substring(advstart,j);
            if (thisadv== 4) advPrice2=adv.substring(advstart,j);
            thisadv++;advstart=j+1;
        }
    }
    if (newAdv=='') newAdv='none';
    return newAdv;
}


   



 function showBasket() {
     currency=1;
     index=document.cookie.indexOf('ACT');
     countbegin=(document.cookie.indexOf('=',index)+1);
     countend=document.cookie.indexOf(';',index);
     if (countend==-1) { countend=document.cookie.length; }
     fulllist=document.cookie.substring(countbegin,countend);
     totprice=0;totprice2=0;shippingtotal=0;shippingtotal2=0;taxtotalone=0;taxtotalone2=0;taxtotaltwo=0;taxtotaltwo2=0;ordertotal=0;ordertotal2=0;
     taxablestandard=0;taxablesecond=0;taxable=0;
     document.writeln('<table width="500" border=0 cellpadding=2 cellspacing=0>');
     document.writeln('<tr>');
     document.writeln('<td  bgcolor=#EAEAEA ><font color=#000000 face="Arial" size=2>Product Name</font></td>');
     document.writeln('<td  bgcolor=#EAEAEA align=right><font color=#000000 face="Arial" size=2>Price</font></td>');
     document.writeln('<td bgcolor=#EAEAEA align=right><font color=#000000 face="Arial" size=2>Quantity</font></td><td  bgcolor=#EAEAEA align=right><font color=#000000 face="Arial" size=2>Total Cost</font></td><td  bgcolor=#EAEAEA align=right><font color=#000000 face="Arial" size=2>Action</font></td>');
     document.writeln('</tr>');
     itemlist=0;
     for (var i=0; i<=fulllist.length;i++) {
         if (fulllist.substring(i,i+1)=='[') {
             itemstart=i+1;
             thisitem=1;
         } else if (fulllist.substring(i,i+1)==']') {
             itemend=i;
             thequantity=fulllist.substring(itemstart,itemend);
             itemtotal=0;itemtotal2=0;
             if (theAP!='none') {
             if (currency==1) { tempprice=getAdvanced(theAP,1,thequantity); if (tempprice>0) theprice=tempprice; }
             if (currency==2) { tempprice=getAdvanced(theAP,2,thequantity); if (tempprice>0) theprice2=tempprice; }
             }
             itemtotal=(eval(theprice*thequantity));
             temptotal=itemtotal*100;
             totprice=totprice+itemtotal;
             itemlist=itemlist+1;
         document.writeln('<tr><td  ><font color=#000000 face="Arial" size=2>'+theitem+'</font></td>');
     document.writeln('<td   align=right><font color=#000000 face="Arial" size=2>'+presentValue(eval(theprice))+'</font></td>');
     document.writeln('<td   align=right><font color=#000000 face="Arial" size=2><input type=text name="quant'+itemlist+'" value='+thequantity+' size=3></font></td>');
     document.writeln('<td   align=right><font color=#000000 face="Arial" size=2>'+presentValue(itemtotal)+'</font></td>');
     document.writeln('<td   align=right><font color=#000000 face="Arial" size=2><input type=button name="remove'+itemlist+'" value="Remove" onClick="removeItem('+itemlist+');"></font></td></tr>');
             } else if (fulllist.substring(i,i+1)=='|') {
                 if (thisitem==1) theitem=fulllist.substring(itemstart,i);
                 if (thisitem== 2) theprice=fulllist.substring(itemstart,i);
                 if (thisitem== 3) thetaxable=fulllist.substring(itemstart,i);
                 if (thisitem== 4) theweight=fulllist.substring(itemstart,i);
                     if (thisitem== 5) theAP=fulllist.substring(itemstart,i);
               thisitem++; itemstart=i+1;
             }
         }
     document.writeln('<tr><td colspan=3  ><font color=#000000 face="Arial" size=2>Total Goods</font></td>');
     document.writeln('<td   align=right><font color=#000000 face="Arial" size=2>'+presentValue(totprice)+'</font></td>');
     document.writeln('<td   align=right><font color=#000000 face="Arial" size=2>&nbsp;</font></td>');
     document.writeln('</tr>');
     document.writeln('</table><br>');
     document.writeln('<input type=button name=clear value="Clear Basket" onClick="clearBasket();">');
     document.writeln('<input type=button name=update value="Update" onClick="updateBasket();">');
}



function ShowOrder() {
     currency=1;
     index=document.cookie.indexOf('ACT');
     countbegin=(document.cookie.indexOf('=',index)+1);
     countend=document.cookie.indexOf(';',index);
     if (countend==-1) { countend=document.cookie.length; }
     fulllist=document.cookie.substring(countbegin,countend);
	 
     totprice=0;totprice2=0;shippingtotal=0;shippingtotal2=0;taxtotalone=0;taxtotalone2=0;taxtotaltwo=0;taxtotaltwo2=0;ordertotal=0;ordertotal2=0;
     taxablestandard=0;taxablesecond=0;taxable=0;
	 
 //    document.writeln('<table width="500" border=0 cellpadding=2 cellspacing=0>');
 //    document.writeln('<tr>');
  //   document.writeln('<td  bgcolor=#EAEAEA ><font color=#000000 face="Arial" size=2>Product Name</font></td>');
//     document.writeln('<td  bgcolor=#EAEAEA align=right><font color=#000000 face="Arial" size=2>Price</font></td>');
//     document.writeln('<td bgcolor=#EAEAEA align=right><font color=#000000 face="Arial" size=2>Quantity</font></td><td  bgcolor=#EAEAEA align=right><font color=#000000 face="Arial" size=2>Total Cost</font></td><td  bgcolor=#EAEAEA align=right><font color=#000000 face="Arial" size=2>Action</font></td>');
//     document.writeln('</tr>');


     itemlist=0;
     for (var i=0; i<=fulllist.length;i++) {
         if (fulllist.substring(i,i+1)=='[') {
             itemstart=i+1;
             thisitem=1;
         } else if (fulllist.substring(i,i+1)==']') {
             itemend=i;
             thequantity=fulllist.substring(itemstart,itemend);
             itemtotal=0;itemtotal2=0;
             if (theAP!='none') {
             if (currency==1) { tempprice=getAdvanced(theAP,1,thequantity); if (tempprice>0) theprice=tempprice; }
             if (currency==2) { tempprice=getAdvanced(theAP,2,thequantity); if (tempprice>0) theprice2=tempprice; }
             }
             itemtotal=(eval(theprice*thequantity));
             temptotal=itemtotal*100;
             totprice=totprice+itemtotal;
             itemlist=itemlist+1;

             } else if (fulllist.substring(i,i+1)=='|') {
                 if (thisitem==1) theitem=fulllist.substring(itemstart,i);
                 if (thisitem== 2) theprice=fulllist.substring(itemstart,i);
                 if (thisitem== 3) thetaxable=fulllist.substring(itemstart,i);
                 if (thisitem== 4) theweight=fulllist.substring(itemstart,i);
                     if (thisitem== 5) theAP=fulllist.substring(itemstart,i);
               thisitem++; itemstart=i+1;
             }
         }
//     document.writeln('<tr><td colspan=3  ><font color=#000000 face="Arial" size=2>Total Goods</font></td>');
//     document.writeln('<td   align=right><font color=#000000 face="Arial" size=2>'+presentValue(totprice)+'</font></td>');
//     document.writeln('<td   align=right><font color=#000000 face="Arial" size=2>&nbsp;</font></td>');
//     document.writeln('</tr>');
//     document.writeln('</table><br>');
//     document.writeln('<input type=button name=clear value="Clear Basket" onClick="clearBasket();">');
//     document.writeln('<input type=button name=update value="Update" onClick="updateBasket();">');
     document.writeln('<table width=125  border=1 cellpadding=2 cellspacing=0 bordercolor=#C4C4FF class=border><tr>');
document.writeln('<td height=60 bgcolor=#F2F2F2><p align=center class=order > <span class=order2 >Your Basket</span>');
document.writeln('<br> No Items: '+itemlist+'<br> Order Value: '+presentValue(totprice)+'</p></td></tr></table><span class=fill>.</span>');
				 


}





function removeItem(itemno) {
        newItemList=null;
        itemlist=0;
        for(var i=0;i<=fulllist.length;i++) {
            if (fulllist.substring(i,i+1)=='[') {
                itemstart=i+1;
            } else if (fulllist.substring(i,i+1)==']') {
                itemend=i;
                theitem = fulllist.substring(itemstart,itemend);
                itemlist=itemlist+1;
                if(itemlist != itemno) {
                    newItemList = newItemList+'['+fulllist.substring(itemstart,itemend)+']';
                }
            }
        }
        index = document.cookie.indexOf('ACT');
        document.cookie='ACT='+newItemList+'; path=/; expires=Friday, 31-Dec-2010 08:00:00 GMT';
        self.location = '../cgi-bin/dav-my-basket.cgi';
    }


    function clearBasket() {
        if (confirm('Are you sure you wish to clear the basket?')) {
            index=document.cookie.indexOf('ACT');
            document.cookie='ACT=.' +'; path=/';
            self.location='../cgi-bin/dav-my-basket.cgi';
        }
    }
    function changeCurrency(num) {
         index=document.cookie.indexOf('TheCurrency');
         document.cookie='TheCurrency='+num+';  path=/; expires=Friday, 31-Dec-2010 08:00:00 GMT';
         self.location='../cgi-bin/dav-my-basket.cgi';
    }

    function updateBasket() {
        newItemList='';
        itemlist=0;
        for(var i=0;i<=fulllist.length; i++) {
            if(fulllist.substring(i,i+1)=='[') {
                thisitem=1;
                itemstart=i+1;
                fullstart=i+1;
            } else if(fulllist.substring(i,i+1)==']') {
                itemend=i;itemlist++;
                thiselement=document.basketform.elements['quant'+itemlist].value;
                newItemList=newItemList+'['+partList+'|'+thiselement+']'
            } else if(fulllist.substring(i,i+1)=='|') {
                partList=fulllist.substring(itemstart,i);
            }
        }
        index=document.cookie.indexOf('ACT');
        document.cookie='ACT='+newItemList+'; path=/; expires=Friday, 31-Dec-2010 08:00:00 GMT';
        self.location='../cgi-bin/dav-my-basket.cgi';
    }


function getAdvanced(adv,curr,qty) {
     newAdv='';advlist=0;applicable=true;advnewprice=0;
    for (var j=0;j<=adv.length;j++) {
            if (adv.substring(j,j+1) == '{') {
            thisadv=1;
            advstart=j+1;
        } else if (adv.substring(j,j+1) == '}') {
            advend=j;
            advPrice2=adv.substring(advstart,advend);
            advlist++; applicable=true;
            if (applicable==true) {
             if (eval(advFrom) > 0 && eval(advFrom) > eval(qty)) applicable=false;
             if (eval(advTo) > 0 && eval(advTo) < eval(qty)) applicable=false;
             if (curr==1 && applicable==true) advnewprice=advPrice;
             if (curr==2 && applicable==true) advnewprice=advPrice2;
            }
        } else if (adv.substring(j,j+1)=='~') {
            if (thisadv== 1) advFrom=adv.substring(advstart,j);
            if (thisadv== 2) advTo=adv.substring(advstart,j);
            if (thisadv== 3) advPrice=adv.substring(advstart,j);
            if (thisadv== 4) advPrice2=adv.substring(advstart,j);
            thisadv++;advstart=j+1;
        }
    }
     return advnewprice;
}


function presentValue(value) {
        if(value<=0.9999) {
            newPounds='0';
        } else {
            newPounds=parseInt(value);
        }
        dec='1';
        for (var i=1; i<=2;i++) {
            dec=dec+'0';
        }
        if (value>0) {
            newPence=Math.round((value+.000008 - newPounds)*(eval(dec)));
        } else {
            newPence=0;
        }
        compstring='9';
        for (var i=1; i <=2-1;i++) {
            if (eval(newPence) <= eval(compstring)) newPence='0'+newPence;
            compstring=compstring+'9';
        }
        if (2>0) {
            newString='£' + newPounds + '.' + newPence + '';
        } else {
            newString='£' + newPounds + '';
        }
        return (newString);
    }
    
    function buyItem(newItem,newPrice,newTaxable,newWeight,newAP,newQuantity) {
        if(newQuantity<=0) {
            rc = alert('The quantity entered is incorrect');
        } else {
            if (confirm('Add '+newQuantity+' x '+newItem+' to Basket ')) {
                 if (newAP!='none') {
                     newAP=checkAdvanced(newAP);
                 }
                index=document.cookie.indexOf('ACT');
                countbegin=(document.cookie.indexOf('=',index)+1);
                countend=document.cookie.indexOf(';',index);
                if(countend==-1) { countend=document.cookie.length; }
                 fulllist = document.cookie.substring(countbegin,countend);
                 amended = false;
                 newItemList=''; itemlist=0;
                 for (var i=0;i<=fulllist.length;i++) {
                     if (fulllist.substring(i,i+1) == '[') {
                         thisitem=1;
                         itemstart=i+1;
                         fullstart=i+1;
                     } else if (fulllist.substring(i,i+1) == ']') {
                         itemend=i;
                         thequantity=fulllist.substring(itemstart,itemend);
                         itemlist++;
                         if (theItem==newItem ) {
                             amended=true;
                             tempquantity=eval(thequantity)+eval(newQuantity);
                             newItemList=newItemList+'['+theItem+'|'+thePrice+'|'+theTaxable+'|'+theWeight+'|'+newAP+'|'+tempquantity+']';
                         } else {
                             newItemList=newItemList+'['+theItem+'|'+thePrice+'|'+theTaxable+'|'+theWeight+'|'+theAP+'|'+thequantity+']';
                         }
                     } else if (fulllist.substring(i,i+1)=='|') {
                         if (thisitem==1) theItem=fulllist.substring(itemstart,i);
                         if (thisitem== 2) thePrice=fulllist.substring(itemstart,i);
                         if (thisitem== 3) theTaxable=fulllist.substring(itemstart,i);
                         if (thisitem== 4) theWeight=fulllist.substring(itemstart,i);
                         if (thisitem== 5) theAP=fulllist.substring(itemstart,i);
                         thisitem++;itemstart=i+1;
                     }
                 }
                 if (amended==false) {
                     newItemList=newItemList+'['+newItem+'|'+newPrice+'|'+newTaxable+'|'+newWeight+'|'+newAP+'|'+newQuantity+']'; }
                 index = document.cookie.indexOf('ACT');
                 document.cookie='ACT='+newItemList+'; path=/; expires=Friday, 31-Dec-2010 08:00:00 GMT';
            }
        }
	
    }

