/*REM 10209 1122 1122  jspc\jam1.js (email&Guestbook ops too!)   10:22:24
  This contains all the scripts for emailing and guestbooking
*/

foldr="jspc";

bzdom3="";bzdom2="";bzdom1="";
bzdot=".";bzdate=new Date(); bzdsize="dcomic25"; bzun="undefined";
bzyr=bzdate.getFullYear();bztest=location.pathname;
j=bztest.indexOf(":"); k=bztest.length;
if (j>=3||k<=1) { bzchr="/"; path="http://www.jamrent.com/";
                  pathben="http://ben.ciriacks.com/"; }
     else { bzchr="\\" ; path="../"; pathben="../ben/"; }

document.write("<LINK REL=StyleSheet HREF='jamrent.css' TYPE='text/css' MEDIA=screen>"
+ "<SCRIPT language='JavaScript' SRC='popadmin.js'></SCRIPT>"
+ "<BASE TARGET=_top>");

/*  <SCRIPT LANGUAGE="JavaScript">emaill('Admin','CoAlumni','c','g','','')</SCRIPT>
 emailIMG  'Wade','Brylow','com','e')  <IMG SRC=i/eml08926.gif>
 guestbook 'Admin','CoAlumni','c','g') guestbook entry
 literal   'Bentley','VP-22','com','l')
 name      'MJor767','aol','com','n','send email',' web site query')
 signor    'Bentley','VP-22','net','s'   guestbook - viewer to viewer query
 personal  'Pat','Ciriacks','com','e','subj','Pat and Kelly'
 rental    'Webmaster','Jamrent','c','r'  "queries"
  Could use document.write(location.pathname + " " + txt + ... versus d2 but
  that may just confuse the sender when displayed in the Subject line of
  their email client.
document.write(v1+"{v1 "+d2+"{d2 "+d1+"{d1 "+typ+"{typ "+txt+"{txt "+subj+"{subj "); return true;
*/
function emaill(v1,d2,d1,typ,txt,subj) {
var fill="";
var ta="<A ID=dcomic16cy HREF='";
var t1="ma";var t2="ilt";var tc="o:";var te="@";
var td=".c";var t6="om?s";var t7="ubject="
var wsq=" web site query"
if (typeof d2==bzun||d2==""){d2="ja"+"mrent"}
if (typeof typ==bzun){typ="s"}
if (typeof subj==bzun||subj==""){dom2=bzdom2} else {dom2=""}
if (d1=="n") { td=".n"; t6="et?s"; } else if (d1=="o") { td=".o"; t6="rg?s"; }
if (typ=="e"||typ=="r"||txt=="image"||txt=="img") {
   fill="<IMG BORDER=0 ALT='E-Mail " + subj + "' WIDTH=89 HEIGHT=26 SRC="
        + "i/eml08926.gif>" + subj
   if (typeof subj!=bzun&&subj!=""){ j=subj.length;
       if (txt=="subj"&&j>1) { txt=subj + wsq  } }
   }
 else if (typ=="g") { txt="guestbook entry" }
 else if (typ=="l") { fill=v1 + te + d2 + bzdot + d1; txt=wsq }
 else if (typ=="n") { fill=txt; txt=subj }
 else if (typ=="s") { td=bzdot+d1; t6="?s"; fill="email this guestbook participant";
          txt="JSPC-2 guestbook - viewer to viewer query" }
document.write(ta + t1 + t2 + tc + v1 + te + d2 + td + t6 + t7);
if (typ=="n"||typ=="s") { d2=dom2 }
if (typ=="r") { d2="Domain name"; txt="rental or purchase inquiry" }
document.write(d2 + " " + txt + "' TARGET=_parent>" + fill + "</A>");
}

/*  <SCRIPT language='JavaScript'>guestmenu('2')</SCRIPT>  */
function guestmenu(currpage) {
var page  = "TWO";
var pagen = "1";
switch(currpage) {
case "1": {page ="ONE"  ; pagen="2"; pagep="2"; break}
case "2": {page ="TWO"  ; pagen="1"; pagep="1"; break}
case "3": {page ="THREE"; pagen="4"; pagep="2"; break}
case "4": {page ="FOUR" ; pagen="5"; pagep="3"; break}
case "5": {page ="FIVE" ; pagen="1"; pagep="4"; break}
default : {page ="TWO"  ; pagen="1"; pagep="1"; break}
}
document.write("<CENTER ID=mendu2><NOBR><A HREF=#bottom>bottom</A>"
+ " &nbsp; &nbsp; <A HREF=guestbk.htm#names>names</A>"
+ " &nbsp; &nbsp; <A ID=dcomic25b>Page " + page + "</A>"
+ " &nbsp; &nbsp; <A HREF=guestbk" + pagep + ".htm>prior</A>"
+ "<B ID=verdan15t>{PAGE}</B><A HREF=guestbk" + pagen + ".htm>next</A>"
+ " &nbsp; &nbsp; <A HREF='javascript:window.print()'>print</A>"
+ " &nbsp; &nbsp; <A HREF=javascript:PoFile('admin.htm','76','64') TARGET=_self"
+ ">sign-email</A> &nbsp; &nbsp; <A HREF=#top>top</A></NOBR></CENTER>");
}

/*  <SCRIPT language='JavaScript'>guesthead('2')</SCRIPT>  */
function guesthead(currpage) {
document.write("<SCRIPT language='JavaScript'>guestmenu('" + currpage
+ "')</SCRIPT><P><TABLE BORDER=0 CELLSPACING=2 CELLPADDING=2>"
+ "<TR><TD VALIGN=top><TABLE WIDTH=240 BORDER=0 CELLSPACING=0 CELLPADDING=0>"
+ "<TR><TD>Date & time received</TD></TR><TR><TD>Name</TD></TR>");
}

/*  <SCRIPT LANGUAGE="JavaScript">welcome('<BR>Alumni entry portal')</SCRIPT>  */
function welcome(txt) {
document.write("<P><TABLE WIDTH=90% BORDER=0 CELLSPACING=0 CELLPADDING=0><TR>"
+ "<TD VALIGN=top><IMG BORDER=0 WIDTH=233 HEIGHT=145 SRC=jspc2.gif"
+ " ALT='Hanza, JSPC-2 &#38; Torii Station Okinawa'></A></TD><TD>"
+ "<B ID=dcomic30m>Welcome to the<BR>Futenma, Hanza, JSPC-2<BR>and Torii"
+ " Station " + txt + "</B> &nbsp; <A ID=notbr3 HREF=guestbk.htm>(guestbook)"
+ "</A></TD></TR></TABLE><BR clear=all>");
}

