// http://www.allisons.org/ll/

function locale2()
 { var len=REMOTE_HOST.length;
   if(len>0 && REMOTE_HOST.lastIndexOf('.')==len-1)
     REMOTE_HOST=REMOTE_HOST.substring(0, len-1);
   if(REMOTE_HOST.lastIndexOf('.')==REMOTE_HOST.length-3)
     return REMOTE_HOST.substring(REMOTE_HOST.length-2, REMOTE_HOST.length);
   else return 'us';
 }//locale2

var v_author = '',    v_title = '',
    v_year = '',      v_isbn = '',   v_isbn13 = '', v_amazon_n = '',
    v_publisher = '', v_edition='',
    v_locale = '';
var v_remote_host = '';  v_remote_host = locale2();

function v_clear()
 {  v_author = '';    v_title = '';
    v_year = '';      v_isbn = '';   v_isbn13 = ''; v_amazon_n = '';
    v_publisher = ''; v_edition = '';
    v_locale = '';
    //NB remote_host is not a property of the item
 }//v_clear

function linkAmaz(str, amzCode, loc)
 { var template,
   usTemplate = '<' + 'a href="http://www.amazon.com/gp/product/XXX?ie=UTF8&tag=fourwheeldrivein&linkCode=as2&camp=1789&creative=9325&creativeASIN=XXX">YYY<' + '/a>',
   ukTemplate = '<'+'a href="http://www.amazon.co.uk/gp/product/XXX?ie=UTF8&tag=fourwheeldriv-21&linkCode=as2&camp=1634&creative=6738&creativeASIN=XXX">YYY<' + '/a>';
   // old ukTemplate = '<'+'A HREF="http://www.amazon.co.uk/gp/product/XXX/?ie=UTF8&tag=fourwheeldriv-21" TARGET="EXTERNAL">YYY<' + '/A>';
   template = usTemplate;
   if( loc == 'uk' ) template = ukTemplate;
   while(true)
    { var p=template.indexOf('XXX');  if(p < 0) break;
      template=template.substring(0,p)+amzCode
              +template.substring(p+3,template.length);
    }
   while(true)
    { var p=template.indexOf('YYY');  if(p < 0) break;
      template=template.substring(0,p)+str
              +template.substring(p+3,template.length);
    }
   return template;
 }//linkAmaz

function trim(str)
 { var j, k;
   for(j=0;  j < str.length; j++) if(str.charAt(j)   != ' ') break;
   for(k=str.length; k >= j; k--) if(str.charAt(k-1) != ' ') break;
   return str.substring(j, k);
 }//trim leading and trailing spaces

function linkItem(str, cmd_str)
 { v_clear();
   v_locale = v_remote_host;
   var cmds = cmd_str.split(';');
   var i;
   for(i=0; i < cmds.length; i++)
    { var c=trim(cmds[i]);   // e.g. isbn=1234567890
      var p=c.indexOf('='), n=c.length;
      if( p > 0 )
        c = 'v_' + c.substring(0,p) + '="' + trim(c.substring(p+1,n)) + '"';
      eval( c );  // !
    }
   if(v_amazon_n == '') v_amazon_n = v_isbn;

   if(v_amazon_n == '') document.writeln( str );
   else document.writeln( linkAmaz(str, v_amazon_n, v_locale) );
 }//linkItem