var sepchar="@";var BMtotal=400;var ShowCount=0;var expDays=1500;var exp=new Date();exp.setTime(exp.getTime()+(expDays*24*60*60*1000));function ListBookmarks()
{var NumBookmarks=GetCookie('PT_NumBookmarks');var i;var Bookmark;if(NumBookmarks==null)
{NumBookmarks=0;}
ShowCount=0;SwapColour=0;for(i=1;i<=NumBookmarks;i++)
{Bookmark=GetCookie('PT_Bookmark'+i);if(Bookmark!=null)
{PrintBookmark(Bookmark,i);}}}
function DeleteBookmark(Count)
{DeleteCookie('PT_Bookmark'+Count);window.location=window.location;}
function PrintBookmark(Bookmark,Count)
{var color="";var pairs=Bookmark.split(sepchar);pairs[0]=unescape(pairs[0]);pairs[1]=unescape(pairs[1]);var BMtitle=pairs[0];var BMaddress=pairs[1];SwapColour=1- SwapColour;if(SwapColour==1){color="bgcolor='#f8e5a9'"};ShowCount++;document.write("<tr "+ color+">");document.write("<td width=90% align=left><a href='"+BMaddress+"&memo=memo'>"+BMtitle+"</a>");document.write("<td width=10% align=center>"+"<a href='javascript:DeleteBookmark("+ Count+")'>Delete</a>");}
function AddBookmark(BMtitle,BMaddress)
{var NumBookmarks=GetCookie('PT_NumBookmarks');var i;var ToDoItem;var Bookmark;var OldestBookmark=0;var CountBookmarks=0;if(NumBookmarks==null)
{NumBookmarks=0;}
for(i=1;i<=NumBookmarks;i++)
{Bookmark=GetCookie('PT_Bookmark'+i);if(Bookmark!=null)
{CountBookmarks++;if(OldestBookmark==0)
{OldestBookmark=i;}}
if(Bookmark==BMtitle+sepchar+BMaddress)
{alert("This page has already been added to your Memo Page:\n "+BMtitle);return;}}
if(CountBookmarks>BMtotal)
{DeleteBookmark(OldestBookmark);}
NumBookmarks++;SetCookie('PT_Bookmark'+NumBookmarks,BMtitle+sepchar+BMaddress,exp);SetCookie('PT_NumBookmarks',NumBookmarks,exp);alert("This page has been added to your personal links on your Memo Page - access it through the \'Memo\' link, but NOTE you can only view it on THIS computer, and only if cookies are enabled and not deleted when computer closes down.\n\nPage description:\n"+BMtitle);}
function getCookieVal(offset){var endstr=document.cookie.indexOf(";",offset);if(endstr==-1)
endstr=document.cookie.length;return unescape(document.cookie.substring(offset,endstr));}
function GetCookie(name){var arg=name+"=";var alen=arg.length;var clen=document.cookie.length;var i=0;while(i<clen){var j=i+ alen;if(document.cookie.substring(i,j)==arg)
return getCookieVal(j);i=document.cookie.indexOf(" ",i)+ 1;if(i==0)break;}
return null;}
function SetCookie(name,value){var argv=SetCookie.arguments;var argc=SetCookie.arguments.length;var expires=(argc>2)?argv[2]:null;var path=(argc>3)?argv[3]:null;var domain=(argc>4)?argv[4]:null;var secure=(argc>5)?argv[5]:false;document.cookie=name+"="+ escape(value)+
((expires==null)?"":("; expires="+ expires.toGMTString()))+
((path==null)?"":("; path="+ path))+
((domain==null)?"":("; domain="+ domain))+
((secure==true)?"; secure":"");}
function DeleteCookie(name){var exp=new Date();exp.setTime(exp.getTime()- 1);var cval=GetCookie(name);document.cookie=name+"="+ cval+"; expires="+ exp.toGMTString();}
