' function getCookie (name) { var dcookie = document.cookie; var cname = name + "="; var clen = dcookie.length; var cbegin = 0; while (cbegin < clen) { var vbegin = cbegin + cname.length; if (dcookie.substring(cbegin, vbegin) == cname) { var vend = dcookie.indexOf (";", vbegin); if (vend == -1) vend = clen; return unescape(dcookie.substring(vbegin, vend)); } cbegin = dcookie.indexOf(" ", cbegin) + 1; if (cbegin == 0) break; } return null; } function setCookie (name, value, expires) { if (!expires) expires = new Date(); document.cookie = name + "=" + escape (value) + "; expires=" + expires.toGMTString() + "; path=/"; } function delCookie (name) { var expireNow = new Date(); document.cookie = name + "=" + "; expires=Thu, 01-Jan-70 00:00:01 GMT" + "; path=/"; } var shiparray = new parent.createArray(10); function getCookieArray(name){ var i = 0; while (getCookie(name + i) != null) { shiparray[i + 1] = getCookie(name + i); i++; shiparray.length = i; } } var expdate = new Date(); expdate.setTime (expdate.getTime() + (24 * 60 * 60 * 1000 * 365)); function setCookieArray(name){ temp_length = setCookieArray.arguments.length - 1; for (var i = 0; i < temp_length; i++) { data = setCookieArray.html + 1] setCookie (name + i, data, expdate); } } function go_with_cookie() { setCookieArray('gifttails', parent.ship_details.f_namea, parent.ship_details.l_namea, parent.ship_details.email, parent.ship_details.ad_onea, parent.ship_details.ad_twoa, parent.ship_details.citya, parent.ship_details.statea, parent.ship_details.countrya, parent.ship_details.zipa); } function get_that_cookie() { var i; getCookieArray('gifttails'); //alert('shiparray.length = '+ shiparray.length); for (i=0;i 0) { for (i =1;i < item_num;i++) {order_total = order_total + item_tot_price(i)} } return order_total; } function remove_nil_items(inputlist) {var i = 0; var j = 1; for (i=1;i 0) var quantities = itemlist[loc].quan else var quantities = 0; return quantities } function display_pic(graphic,price) { parent.frames[0].document.close() // parent.frames[1].document.open() parent.frames[0].document.write(st_astr); parent.frames[0].document.write('

' + price); parent.frames[0].document.write('

Navigation Table'); parent.frames[0].document.write(en_astr); parent.frames[0].document.close() } function createArray(n) //n size of array //init what you want all values initialized to { this.length = n var i = 0 for (i = 1 ; i < n ; i++) this[i] = null; return this } function product(code,price,desc,quan,url) { this.price = 0 this.code = code this.price = price this.desc = desc this.quan = quan this.url = url return this; } var itemlist = new createArray(50); var temp_array = new createArray(50); function initialize_arrays(arraysa) { for (i = 1;i < maxarray;i++) { arraysa[i] = new product('',0,'',0,'') } } function updatemain_order() { parent.frames[1].document.close() // parent.frames[1].document.open() parent.frames[1].location = "order.htm"; parent.frames[1].document.close() } function updatenav_nav() { parent.frames[0].document.close() // parent.frames[0].document.open() parent.frames[0].location = "navigate.htm"; parent.frames[0].document.close() } function check_if_in(code_check) // this works { var i = 1 loc = 0; // line 47 while ((i < item_num) && (itemlist[i].code != code_check)) i = i + 1; if (itemlist[i].code == code_check) loc = i else loc = -1; //alert('loc is ' + loc); return loc; } function additem(codes,prices,descrip,url) { // adds another item to a variable length array // remember to do it via new product() // line 61 loc = check_if_in(codes) // present_item = item_num //last_item = item_num; //alert('item_num = ' + item_num) if (loc != -1){ // update existing item olditem = itemlist[loc].quan //alert(' loc is before oldvalue ' + loc); //alert('olditem is ' + olditem); itemlist[loc] = new product(codes,prices,descrip,olditem + 1,url)} else // new item {olditem = itemlist[item_num].quan itemlist[item_num] = new product(codes,prices,descrip,olditem + 1,url); items_ordered = item_num item_num = item_num + 1 } remove_nil_items(itemlist) } // line 78 function subitem(codes,prices,descrip,url) { loc = check_if_in(codes) if ((loc != -1) && (itemlist[loc].quan > 0)) { // update existing item olditem = itemlist[loc].quan //alert(' loc is before oldvalue ' + loc); //alert('olditem is ' + olditem); itemlist[loc] = new product(codes,prices,descrip,olditem - 1,url)} //updatepage(codes) } initialize_arrays(itemlist) initialize_arrays(temp_array) function check_window() { if (self == mainbody) {document.write('

Scottish Gifts

This is inside a multiple frame window.
Warning : The scripts may not work correctly!!!!,
We are jumping direct to our Main page in 15 seconds.'); self.location = "http://www.mearns.org.uk/scotshop/index.htm"; parent.document.close(); } }