Picture Gallery version 1.0

Picture Gallery version 1.0
© 1998 Shinobi Soft

This is postcardware. All I ask of You if You download this script
is that You send me a postcard, just to say Hi! and tell me in which
part of the world You live. The address:

Tobbe Hvornum
Vallgatan 18
S-371 30 Karlskrona
Sweden

If You use the script, please send an e-mail as well with Your URL.

<HTML><br />
<HEAD><br />
<TITLE><br />
Picture Gallery version 1.0<br />
</TITLE><br />
<SCRIPT LANGUAGE="JavaScript"><br />
<!--<br />

// Picture Gallery version 1.0 by Shinobi Soft. Copyright 1998<br />
// www.dragonfire.net/~wcu/soft/<br />

var counter = 1<br />
var bild_total = 4<br />

function Array(n) {<br />
   this.length = n;<br />
   for (var a = 1; a <= n; a++) { <br />
     this[a] = "tumme"+a+".gif"<br />
   }<br />
     return this<br />
}<br />

infotext=new Array(bild_total)<br />
infotext[1] ="Alpine view 1"<br />
infotext[2] ="Alpine view 2"<br />
infotext[3] ="Alpine view 3"<br />
infotext[4] ="Alpine view 4"<br />
infobredd=new Array(bild_total)<br />
infobredd[1] ="350"<br />
infobredd[2] ="450"<br />
infobredd[3] ="278"<br />
infobredd[4] ="375"<br />
infohojd=new Array(bild_total)<br />
infohojd[1] ="337"<br />
infohojd[2] ="297"<br />
infohojd[3] ="375"<br />
infohojd[4] ="263"<br />
infobyte=new Array(bild_total)<br />
infobyte[1] ="346"<br />
infobyte[2] ="392"<br />
infobyte[3] ="306"<br />
infobyte[4] ="289"<br />

function statMedd(){<br />
	window.status=' Open the image in full size ';<br />
}<br />
function statTom(){<br />
	window.status=' ';<br />
}<br />
function startBild(){<br />
	document.write("<A HREF='javascript:visaStor()' onMouseOver='statMedd(); return true' onMouseOut='statTom(); return true'><IMG SRC='tumme"+counter+".gif' BORDER='0' NAME='tumbild'></A>");<br />
}<br />

function Tillbaka(browse){<br />
  counter += -1<br />
  if (counter == 0) {<br />
    counter = bild_total<br />
  }<br />
  document.images[0].src = "tumme"+counter+".gif"<br />
  browse.bildtext.value = infotext[counter]<br />
  browse.bredd.value = infobredd[counter]<br />
  browse.hojd.value = infohojd[counter]<br />
  browse.bytes.value = infobyte[counter]<br />
}<br />

function Fram(browse){<br />
  counter += 1<br />
  if (counter == (bild_total+1)) {<br />
    counter = 1<br />
  }<br />
  document.images[0].src = "tumme"+counter+".gif"<br />
  browse.bildtext.value = infotext[counter]<br />
  browse.bredd.value = infobredd[counter]<br />
  browse.hojd.value = infohojd[counter]<br />
  browse.bytes.value = infobyte[counter]<br />
}<br />

function radaUpp(){<br />
	for(b=1;b<bild_total+1;){<br />
		document.write("<IMG SRC='tumme"+b+".gif' BORDER='0' ALIGN='baseline'> ");<br />
		document.write(infotext[b]+"   ");<br />
		++b;<br />
	}<br />
}<br />
function visaStor(){<br />
	nyRuta=window.open("tomsida.htm","blank","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=no,copyhistory=no,width=550,height=450");<br />
	nyRuta.document.open();<br />
	with(nyRuta.document){<br />
		nyRuta.document.write("<HEAD>");<br />
		nyRuta.document.write("<TITLE>");<br />
		nyRuta.document.write(infotext[counter]);<br />
		nyRuta.document.write("</TITLE>");<br />
		nyRuta.document.write("</HEAD>");<br />
		nyRuta.document.write("<BODY BGCOLOR='FFFFFF' TEXT='000000' onBlur='self.close()'>");<br />
		nyRuta.document.write("<TABLE WIDTH='550'>");<br />
		nyRuta.document.write("<TR><TD VALIGN='top' COLSPAN='2'>");<br />
		nyRuta.document.write("<IMG SRC='stor"+counter+".jpg'> ");<br />
		nyRuta.document.write("</TD></TR>");<br />
		nyRuta.document.write("<TR><TD VALIGN='top' WIDTH='100'>");<br />
		nyRuta.document.write("<FORM>");<br />
		nyRuta.document.write("<INPUT TYPE='button' VALUE='Close' onClick='self.close()'>");<br />
		nyRuta.document.write("</FORM>");<br />
		nyRuta.document.write("</TD><TD VALIGN='top' WIDTH='450'>");<br />
		nyRuta.document.write("<FONT SIZE='-1'>");<br />
		nyRuta.document.write(infotext[counter]);<br />
		nyRuta.document.write("<BR>");<br />
		nyRuta.document.write(infobredd[counter]+" x "+infohojd[counter]);<br />
		nyRuta.document.write("<BR>");<br />
		nyRuta.document.write("File size "+infobyte[counter]+" KB");<br />
		nyRuta.document.write("</FONT>");<br />
		nyRuta.document.write("</TD></TR>");<br />
		nyRuta.document.write("</TABLE>");<br />
		nyRuta.document.write("<BR>");<br />
	}<br />
}<br />
//--><br />
</SCRIPT><br />
</HEAD><br />
<BODY BGCOLOR="FFFFFF" TEXT="000000" LINK="0000FF" VLINK="0000FF"><br />
<CENTER><br />
<FONT SIZE="+1"><br />
Picture Gallery version 1.0<br />
</FONT><br />
<BR><br />
<FONT SIZE="-1"><br />
© 1998 Shinobi Soft<br />
</FONT><br />
<FORM NAME="browse"><br />
<TABLE BORDER="0"><br />
<TR><TD VALIGN="bottom" ALIGN="right"><br />
<SCRIPT LANGUAGE="JavaScript"><br />
<br />
</SCRIPT><br />
</TD><TD COLSPAN="4" VALIGN="bottom"><br />
<TABLE><br />
<TR><TD><br />
<INPUT TYPE="text" NAME="bildtext" SIZE="42" VALUE="Alpine view 1"><br />
<BR><br />
<FONT SIZE="-2"><br />
  Width  <INPUT TYPE="text" NAME="bredd" SIZE="3" VALUE="350"><br />
  Height  <INPUT TYPE="text" NAME="hojd" SIZE="3" VALUE="337"><br />
  File size  <INPUT TYPE="text" NAME="bytes" SIZE="3" VALUE="346"> KB<br />
</TD></TR><br />
</TABLE><br />
</TD></TR><br />
<TR><TD VALIGN="bottom" WIDTH="20%" ALIGN="right"><br />
<BR><br />
<INPUT TYPE="button" VALUE="Previous" onClick="Tillbaka(this.form)"><br />
</TD><TD VALIGN="bottom" WIDTH="20%"><br />
<CENTER><br />
<INPUT TYPE="button" VALUE="    Next    " onClick="Fram(this.form)"><br />
</CENTER><br />
</TD><TD VALIGN="bottom" WIDTH="20%"><br />
<CENTER><br />
<INPUT TYPE="button" VALUE="  Enlarge  " onClick="visaStor()"><br />
<CENTER><br />
</TD><TD VALIGN="bottom" WIDTH="20%"><br />
<INPUT TYPE="button" VALUE="    Guide   " onClick="window.open('guide.htm','guide','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=no,copyhistory=no,width=600,height=450')"<br />
</TD></TR><br />
</TABLE><br />
</FORM><br />
<TABLE WIDTH="450" BORDER="1"><br />
<TR><TD><br />
<CENTER><br />
<TABLE WIDTH="400" BORDER="0"><br />
<TR><TD><br />
<FONT SIZE="-1"><br />
This is postcardware. All I ask of You if You download this script<br />
<BR><br />
is that You send me a postcard, just to say Hi! and tell me in which<br />
<BR><br />
part of the world You live. The address:<br />
<BLOCKQUOTE><BLOCKQUOTE><BLOCKQUOTE><br />
Tobbe Hvornum<br />
<BR><br />
Vallgatan 18<br />
<BR><br />
S-371 30 Karlskrona<br />
<BR><br />
Sweden<br />
</BLOCKQUOTE></BLOCKQUOTE></BLOCKQUOTE><br />
If You use the script, please send an<br />
 <A HREF="mailto:shinobi@hem.passagen.se?subject=This%20is%20my%20URL%20(Picture%20Gallery)" onMouseOver="window.status=' Send an e-mail '; return true" onMouseOut="window.status=' '; return true">e-mail</A><br />
 as well with Your URL.<br />
</FONT><br />
</TD></TR><br />
</TABLE><br />
</CENTER><br />
</TD></TR><br />
</TABLE><br />
<HR><br />
</CENTER><br />
<BR><br />
<FONT SIZE="-1"><br />
<SCRIPT LANGUAGE="JavaScript"><br />
<br />
</SCRIPT><br />
</FONT><br />
</BODY><br />
</HTML><br />