var Pic = new Array();    // picture file name
var PicW = new Array();   // picture width
var PicH = new Array();   // picture height
var PicC = new Array();   // picture comment

var preLoad = new Array();

Pic[0] = 'photos/20120809_bintan/IMG_0191.JPG';
PicW[0] = 640;
PicH[0] = 480;
PicC[0] = '  ';
preLoad[0] = new Image();
Pic[1] = 'photos/20120809_bintan/IMG_0192.JPG';
PicW[1] = 640;
PicH[1] = 480;
PicC[1] = '  ';
preLoad[1] = new Image();
Pic[2] = 'photos/20120809_bintan/IMG_0193.JPG';
PicW[2] = 640;
PicH[2] = 480;
PicC[2] = '  ';
preLoad[2] = new Image();
Pic[3] = 'photos/20120809_bintan/IMG_0194.JPG';
PicW[3] = 640;
PicH[3] = 480;
PicC[3] = '  ';
preLoad[3] = new Image();
Pic[4] = 'photos/20120809_bintan/IMG_0195.JPG';
PicW[4] = 480;
PicH[4] = 640;
PicC[4] = '  ';
preLoad[4] = new Image();
Pic[5] = 'photos/20120809_bintan/IMG_0196.JPG';
PicW[5] = 480;
PicH[5] = 640;
PicC[5] = '  ';
preLoad[5] = new Image();
Pic[6] = 'photos/20120809_bintan/IMG_0197.JPG';
PicW[6] = 640;
PicH[6] = 480;
PicC[6] = '  ';
preLoad[6] = new Image();
Pic[7] = 'photos/20120809_bintan/IMG_0198.JPG';
PicW[7] = 640;
PicH[7] = 480;
PicC[7] = '  ';
preLoad[7] = new Image();
Pic[8] = 'photos/20120809_bintan/IMG_0199.JPG';
PicW[8] = 480;
PicH[8] = 640;
PicC[8] = '  ';
preLoad[8] = new Image();
Pic[9] = 'photos/20120809_bintan/IMG_0200.JPG';
PicW[9] = 640;
PicH[9] = 480;
PicC[9] = '  ';
preLoad[9] = new Image();
Pic[10] = 'photos/20120809_bintan/IMG_0201.JPG';
PicW[10] = 640;
PicH[10] = 480;
PicC[10] = '  ';
preLoad[10] = new Image();
Pic[11] = 'photos/20120809_bintan/IMG_0203.JPG';
PicW[11] = 640;
PicH[11] = 480;
PicC[11] = '  ';
preLoad[11] = new Image();
Pic[12] = 'photos/20120809_bintan/IMG_0204.JPG';
PicW[12] = 640;
PicH[12] = 480;
PicC[12] = '  ';
preLoad[12] = new Image();
Pic[13] = 'photos/20120809_bintan/IMG_0205.JPG';
PicW[13] = 640;
PicH[13] = 480;
PicC[13] = '  ';
preLoad[13] = new Image();
Pic[14] = 'photos/20120809_bintan/IMG_0206.JPG';
PicW[14] = 640;
PicH[14] = 480;
PicC[14] = '  ';
preLoad[14] = new Image();
Pic[15] = 'photos/20120809_bintan/IMG_0207.JPG';
PicW[15] = 640;
PicH[15] = 480;
PicC[15] = '  ';
preLoad[15] = new Image();
Pic[16] = 'photos/20120809_bintan/IMG_0208.JPG';
PicW[16] = 480;
PicH[16] = 640;
PicC[16] = '  ';
preLoad[16] = new Image();
Pic[17] = 'photos/20120809_bintan/IMG_0209.JPG';
PicW[17] = 480;
PicH[17] = 640;
PicC[17] = '  ';
preLoad[17] = new Image();
Pic[18] = 'photos/20120809_bintan/IMG_0210.JPG';
PicW[18] = 640;
PicH[18] = 480;
PicC[18] = '  ';
preLoad[18] = new Image();
Pic[19] = 'photos/20120809_bintan/IMG_0211.JPG';
PicW[19] = 640;
PicH[19] = 480;
PicC[19] = '  ';
preLoad[19] = new Image();
Pic[20] = 'photos/20120809_bintan/IMG_0212.JPG';
PicW[20] = 480;
PicH[20] = 640;
PicC[20] = '  ';
preLoad[20] = new Image();
Pic[21] = 'photos/20120809_bintan/IMG_0213.JPG';
PicW[21] = 480;
PicH[21] = 640;
PicC[21] = '  ';
preLoad[21] = new Image();
Pic[22] = 'photos/20120809_bintan/IMG_0214.JPG';
PicW[22] = 480;
PicH[22] = 640;
PicC[22] = '  ';
preLoad[22] = new Image();
Pic[23] = 'photos/20120809_bintan/IMG_0216.JPG';
PicW[23] = 480;
PicH[23] = 640;
PicC[23] = '  ';
preLoad[23] = new Image();
Pic[24] = 'photos/20120809_bintan/IMG_0217.JPG';
PicW[24] = 480;
PicH[24] = 640;
PicC[24] = '  ';
preLoad[24] = new Image();
Pic[25] = 'photos/20120809_bintan/IMG_0218.JPG';
PicW[25] = 640;
PicH[25] = 480;
PicC[25] = '  ';
preLoad[25] = new Image();
Pic[26] = 'photos/20120809_bintan/IMG_0219.JPG';
PicW[26] = 640;
PicH[26] = 480;
PicC[26] = '  ';
preLoad[26] = new Image();
Pic[27] = 'photos/20120809_bintan/IMG_0220.JPG';
PicW[27] = 640;
PicH[27] = 480;
PicC[27] = '  ';
preLoad[27] = new Image();
Pic[28] = 'photos/20120809_bintan/IMG_0221.JPG';
PicW[28] = 480;
PicH[28] = 640;
PicC[28] = '  ';
preLoad[28] = new Image();
Pic[29] = 'photos/20120809_bintan/IMG_0222.JPG';
PicW[29] = 480;
PicH[29] = 640;
PicC[29] = '  ';
preLoad[29] = new Image();
Pic[30] = 'photos/20120809_bintan/IMG_0223.JPG';
PicW[30] = 480;
PicH[30] = 640;
PicC[30] = '  ';
preLoad[30] = new Image();
Pic[31] = 'photos/20120809_bintan/IMG_0224.JPG';
PicW[31] = 480;
PicH[31] = 640;
PicC[31] = '  ';
preLoad[31] = new Image();
Pic[32] = 'photos/20120809_bintan/IMG_0225.JPG';
PicW[32] = 640;
PicH[32] = 480;
PicC[32] = '  ';
preLoad[32] = new Image();
Pic[33] = 'photos/20120809_bintan/IMG_0226.JPG';
PicW[33] = 640;
PicH[33] = 480;
PicC[33] = '  ';
preLoad[33] = new Image();
Pic[34] = 'photos/20120809_bintan/IMG_0227.JPG';
PicW[34] = 640;
PicH[34] = 480;
PicC[34] = '  ';
preLoad[34] = new Image();
Pic[35] = 'photos/20120809_bintan/IMG_0228.JPG';
PicW[35] = 640;
PicH[35] = 480;
PicC[35] = '  ';
preLoad[35] = new Image();
Pic[36] = 'photos/20120809_bintan/IMG_0229.JPG';
PicW[36] = 640;
PicH[36] = 480;
PicC[36] = '  ';
preLoad[36] = new Image();
Pic[37] = 'photos/20120809_bintan/IMG_0230.JPG';
PicW[37] = 640;
PicH[37] = 480;
PicC[37] = '  ';
preLoad[37] = new Image();
Pic[38] = 'photos/20120809_bintan/IMG_0231.JPG';
PicW[38] = 640;
PicH[38] = 480;
PicC[38] = '  ';
preLoad[38] = new Image();
Pic[39] = 'photos/20120809_bintan/IMG_0232.JPG';
PicW[39] = 640;
PicH[39] = 480;
PicC[39] = '  ';
preLoad[39] = new Image();
Pic[40] = 'photos/20120809_bintan/IMG_0233.JPG';
PicW[40] = 640;
PicH[40] = 480;
PicC[40] = '  ';
preLoad[40] = new Image();
Pic[41] = 'photos/20120809_bintan/IMG_0234.JPG';
PicW[41] = 640;
PicH[41] = 480;
PicC[41] = '  ';
preLoad[41] = new Image();
Pic[42] = 'photos/20120809_bintan/IMG_0235.JPG';
PicW[42] = 640;
PicH[42] = 480;
PicC[42] = '  ';
preLoad[42] = new Image();
Pic[43] = 'photos/20120809_bintan/IMG_0236.JPG';
PicW[43] = 480;
PicH[43] = 640;
PicC[43] = '  ';
preLoad[43] = new Image();
Pic[44] = 'photos/20120809_bintan/IMG_0237.JPG';
PicW[44] = 640;
PicH[44] = 480;
PicC[44] = '  ';
preLoad[44] = new Image();
Pic[45] = 'photos/20120809_bintan/IMG_0238.JPG';
PicW[45] = 640;
PicH[45] = 480;
PicC[45] = '  ';
preLoad[45] = new Image();
Pic[46] = 'photos/20120809_bintan/IMG_0239.JPG';
PicW[46] = 640;
PicH[46] = 480;
PicC[46] = '  ';
preLoad[46] = new Image();
Pic[47] = 'photos/20120809_bintan/IMG_0240.JPG';
PicW[47] = 640;
PicH[47] = 480;
PicC[47] = '  ';
preLoad[47] = new Image();
Pic[48] = 'photos/20120809_bintan/IMG_0241.JPG';
PicW[48] = 640;
PicH[48] = 480;
PicC[48] = '  ';
preLoad[48] = new Image();
Pic[49] = 'photos/20120809_bintan/IMG_0242.JPG';
PicW[49] = 640;
PicH[49] = 480;
PicC[49] = '  ';
preLoad[49] = new Image();
Pic[50] = 'photos/20120809_bintan/IMG_0243.JPG';
PicW[50] = 640;
PicH[50] = 480;
PicC[50] = '  ';
preLoad[50] = new Image();
Pic[51] = 'photos/20120809_bintan/IMG_0244.JPG';
PicW[51] = 640;
PicH[51] = 480;
PicC[51] = '  ';
preLoad[51] = new Image();
Pic[52] = 'photos/20120809_bintan/IMG_0245.JPG';
PicW[52] = 640;
PicH[52] = 480;
PicC[52] = '  ';
preLoad[52] = new Image();
Pic[53] = 'photos/20120809_bintan/IMG_0246.JPG';
PicW[53] = 640;
PicH[53] = 480;
PicC[53] = '  ';
preLoad[53] = new Image();
Pic[54] = 'photos/20120809_bintan/IMG_0247.JPG';
PicW[54] = 480;
PicH[54] = 640;
PicC[54] = '  ';
preLoad[54] = new Image();
Pic[55] = 'photos/20120809_bintan/IMG_0248.JPG';
PicW[55] = 480;
PicH[55] = 640;
PicC[55] = '  ';
preLoad[55] = new Image();
Pic[56] = 'photos/20120809_bintan/IMG_0249.JPG';
PicW[56] = 480;
PicH[56] = 640;
PicC[56] = '  ';
preLoad[56] = new Image();
Pic[57] = 'photos/20120809_bintan/IMG_0250.JPG';
PicW[57] = 640;
PicH[57] = 480;
PicC[57] = '  ';
preLoad[57] = new Image();
Pic[58] = 'photos/20120809_bintan/IMG_0251.JPG';
PicW[58] = 640;
PicH[58] = 480;
PicC[58] = '  ';
preLoad[58] = new Image();
Pic[59] = 'photos/20120809_bintan/IMG_0252.JPG';
PicW[59] = 640;
PicH[59] = 480;
PicC[59] = '  ';
preLoad[59] = new Image();
Pic[60] = 'photos/20120809_bintan/IMG_0253.JPG';
PicW[60] = 640;
PicH[60] = 480;
PicC[60] = '  ';
preLoad[60] = new Image();
Pic[61] = 'photos/20120809_bintan/IMG_0254.JPG';
PicW[61] = 480;
PicH[61] = 640;
PicC[61] = '  ';
preLoad[61] = new Image();
Pic[62] = 'photos/20120809_bintan/IMG_0255.JPG';
PicW[62] = 480;
PicH[62] = 640;
PicC[62] = '  ';
preLoad[62] = new Image();
Pic[63] = 'photos/20120809_bintan/IMG_0256.JPG';
PicW[63] = 480;
PicH[63] = 640;
PicC[63] = '  ';
preLoad[63] = new Image();
Pic[64] = 'photos/20120809_bintan/IMG_0257.JPG';
PicW[64] = 480;
PicH[64] = 640;
PicC[64] = '  ';
preLoad[64] = new Image();
Pic[65] = 'photos/20120809_bintan/IMG_0258.JPG';
PicW[65] = 480;
PicH[65] = 640;
PicC[65] = '  ';
preLoad[65] = new Image();
Pic[66] = 'photos/20120809_bintan/IMG_0259.JPG';
PicW[66] = 480;
PicH[66] = 640;
PicC[66] = '  ';
preLoad[66] = new Image();
Pic[67] = 'photos/20120809_bintan/IMG_0260.JPG';
PicW[67] = 480;
PicH[67] = 640;
PicC[67] = '  ';
preLoad[67] = new Image();
Pic[68] = 'photos/20120809_bintan/IMG_0261.JPG';
PicW[68] = 480;
PicH[68] = 640;
PicC[68] = '  ';
preLoad[68] = new Image();
Pic[69] = 'photos/20120809_bintan/IMG_0262.JPG';
PicW[69] = 480;
PicH[69] = 640;
PicC[69] = '  ';
preLoad[69] = new Image();
Pic[70] = 'photos/20120809_bintan/IMG_0263.JPG';
PicW[70] = 480;
PicH[70] = 640;
PicC[70] = '  ';
preLoad[70] = new Image();
Pic[71] = 'photos/20120809_bintan/IMG_0264.JPG';
PicW[71] = 480;
PicH[71] = 640;
PicC[71] = '  ';
preLoad[71] = new Image();
Pic[72] = 'photos/20120809_bintan/IMG_0265.JPG';
PicW[72] = 640;
PicH[72] = 480;
PicC[72] = '  ';
preLoad[72] = new Image();
Pic[73] = 'photos/20120809_bintan/IMG_0266.JPG';
PicW[73] = 640;
PicH[73] = 480;
PicC[73] = '  ';
preLoad[73] = new Image();
Pic[74] = 'photos/20120809_bintan/IMG_0267.JPG';
PicW[74] = 640;
PicH[74] = 480;
PicC[74] = '  ';
preLoad[74] = new Image();
Pic[75] = 'photos/20120809_bintan/IMG_0268.JPG';
PicW[75] = 640;
PicH[75] = 480;
PicC[75] = '  ';
preLoad[75] = new Image();
Pic[76] = 'photos/20120809_bintan/IMG_0270.JPG';
PicW[76] = 480;
PicH[76] = 640;
PicC[76] = '  ';
preLoad[76] = new Image();
Pic[77] = 'photos/20120809_bintan/IMG_0274.JPG';
PicW[77] = 640;
PicH[77] = 480;
PicC[77] = '  ';
preLoad[77] = new Image();
Pic[78] = 'photos/20120809_bintan/IMG_0275.JPG';
PicW[78] = 640;
PicH[78] = 480;
PicC[78] = '  ';
preLoad[78] = new Image();
Pic[79] = 'photos/20120809_bintan/IMG_0276.JPG';
PicW[79] = 640;
PicH[79] = 480;
PicC[79] = '  ';
preLoad[79] = new Image();
Pic[80] = 'photos/20120809_bintan/IMG_0277.JPG';
PicW[80] = 640;
PicH[80] = 480;
PicC[80] = '  ';
preLoad[80] = new Image();
Pic[81] = 'photos/20120809_bintan/IMG_0278.JPG';
PicW[81] = 640;
PicH[81] = 480;
PicC[81] = '  ';
preLoad[81] = new Image();
Pic[82] = 'photos/20120809_bintan/IMG_0279.JPG';
PicW[82] = 640;
PicH[82] = 480;
PicC[82] = '  ';
preLoad[82] = new Image();


// alert("111 preLoadPic ix = "+0+":::"+preLoad[0].name);

// Set slideShowSpeed (milliseconds)
var slideShowSpeed = 5000

// Agent sniffer shamelessly 'stolen' from the excellent X library from cross-browser.com
var xOp7=false,xOp5or6=false,xIE4Up=false,xNN4=false,xUA=navigator.userAgent.toLowerCase();
if(window.opera){
  xOp7=(xUA.indexOf('opera 7')!=-1 || xUA.indexOf('opera/7')!=-1);
  if (!xOp7) xOp5or6=(xUA.indexOf('opera 5')!=-1 || xUA.indexOf('opera/5')!=-1 || xUA.indexOf('opera 6')!=-1 || xUA.indexOf('opera/6')!=-1);
}
else if(document.layers) xNN4=true;
else {xIE4Up=document.all && xUA.indexOf('msie')!=-1 && parseInt(navigator.appVersion)>=4;}

// Duration of crossfade (seconds)
var crossFadeDuration = 1

// Specify the image files

var t = -1;
var pos = 0;
var posNext = 0;
var status_slideshow = 0;
var count_entry = 0;

var html;

function preLoadPic(index)
{
    if (index >= 0 && index < Pic.length)
    {
        if (preLoad[index].src == "")
        {
            preLoad[index].src = "albums/"+Pic[index];
            // alert("preLoadPic ix = "+index);
            // alert("preLoadPic");
        }
    }
    else
    {
        Alert("Error : invalid index.");
    }
}

function startSlideShow()
{
    if (Pic.length == 0)
    {
        // No picture to start slide show.
        Alert("Error : Pic.length is less than or equal to 0.");
    }
    else if (t == -1)
    {
        // Only when the slide show has not been started,
        // then start it.

        posNext = pos;

        if ((posNext+1) < Pic.length)
        {
            // Can increment var pos. Thus increment.
            posNext++;
        }
        else if ((posNext +1) >= Pic.length)
        {
            // Cannot increment var pos. Thus restart from beginning.
            posNext = 0;
        }

        status_slideshow = 1;
        count_entry = 0;

        playSlideShow();

        window.status='Starting Slide Show ... '+window.status;
    }
}

function playSlideShow()
{
    if (Pic.length <= 0)
    {
        endSlideShow();
        Alert("Error : Pic.length is less than or equal to 0.");
        return;
    }

    if (preLoad[posNext].src == "")
    {
        endSlideShow();
        Alert("Error : preLoad[posNext].src is empty");
        return;
    }

    if (! preLoad[posNext].complete)
    {
        // The next picture is not completely loaded.

        if (count_entry == 3)
        {
            // Already attempted 3 times. Abort.

            endSlideShow();
            window.status='Slide show halted. Connection speed is too slow.';
            Alert("Error : Connection speed is too slow for slide show.");
        }
        else
        {
            window.status='Loading Picture '+(posNext+1)+' of '+Pic.length+', '+Pic[posNext];

            if (count_entry > 0)
            {
                window.status = window.status + ', '+count_entry;
            }

            if (t == -1)
            {
                t = window.setInterval('playSlideShow();', 3000);
                // alert("timer started");
            }
        }
        count_entry++;
    }
    else
    {
        // The next picture has been completely loaded.
        // Show the next picture
        pos = posNext;
        count_entry = 0;
        changeSlide();
        window.status='Showing Picture '+(pos+1)+' of '+Pic.length;

        if (status_slideshow != 0 && (posNext+1) < Pic.length)
        {
            // Slide show is being played.
            // Preload the next picture.
            posNext++;
            preLoadPic(posNext);

            if (t == -1)
            {
                // Although it is now in the slide show mode, but
                // the timer has not been started. Thus, start it.
                t = window.setInterval('playSlideShow();', 3000);
            }
        }
        else
        {
            // Slide show is not being played OR slide show has ended.
            if (status_slideshow != 0)
            {
                window.status=window.status+', '+'Slide Show Ended.';
            }
            endSlideShow();
        }

        if (status_slideshow == 0)
        {
            // Not in slide show mode.
            // Also preload the next and the prev photo
            if ((pos+1) < Pic.length) preLoadPic(pos+1);
            if (pos > 0) preLoadPic(pos-1);
        }
    }
}

function endSlideShow()
{
    if (t != -1)
    {
        window.clearInterval(t);
        t = -1;
    }
    // window.status='';
    status_slideshow = 0;
}

function changeSlide()
{
    if (xIE4Up)
    {
        if (document.all)
        {
            //document.images.SlideShow.style.filter= "blendTrans(duration=crossFadeDuration)"
            document.all.SlideShow.style.filter="blendTrans(duration=1)";
            document.all.SlideShow.filters.blendTrans.Apply();
        }
    }

    writeInnerHTML();

    if (xIE4Up)
    {
        if (document.all)
        {
            document.all.SlideShow.filters.blendTrans.Play();
        }
    }

    displayComment();

    return true;
}

function writeInnerHTML()
{
    html = "";
    html += "<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\">\n";
    html += "<tr>\n";
    html += "<td align=\"center\" valign=\"middle\" width=\"640\" height=\"640\">\n";
    html += "<img src=\""+preLoad[pos].src+"\"";
    html += " height="+PicH[pos];
    html += " weight="+PicW[pos];
    html += " border=\"0\" hspace=\"0\" vspace=\"0\"";
    html += " />\n";
    html += "</td>\n";
    html += "</tr>\n";
    html += "</table>\n";
    document.getElementById("SlideShow").innerHTML = html;

    // alert(html);
}

function nextPhoto()
{
    endSlideShow();

    if ((pos+1) < Pic.length)
    {
        posNext = pos + 1;
        playSlideShow();
    }
}

function prevPhoto()
{
    endSlideShow();

    if (pos > 0)
    {
        posNext = pos - 1;
        playSlideShow();
    }
}

function firstPhoto()
{
    endSlideShow();

    posNext = 0;
    playSlideShow();
}

function lastPhoto()
{
    endSlideShow();

    if (Pic.length > 0)
    {
        posNext = Pic.length - 1;
        playSlideShow();
    }
}

function gotoPhoto(num)
{
    endSlideShow();

    if (num > 0 && num <= Pic.length)
    {
        pos = num - 1;

        if (preLoad[pos].src == "" || ! preLoad[pos].complete)
        {
            // The next picture is not completely loaded.
            preLoadPic(pos);
            writeInnerHTML();
            displayComment();
        }
        else
        {
            changeSlide();
        }

        // Also preload the next and the prev photo
        if ((pos+1) < Pic.length) preLoadPic(pos+1);
        if (pos > 0) preLoadPic(pos-1);
    }
}

function displayComment()
{
    html = "<b>Album 63 :  2012 Aug 9 - 12, Bintan</b><br/>";
    html += "<small>Photo "+(pos+1)+" of "+Pic.length+"<br/>";
    html += PicC[pos];
    html += "</small>";

    document.getElementById("TitleAndComments").innerHTML = html;
}

function load()
{
    displayComment();

    // Display the first picture.
    gotoPhoto(1);

    // Preload the last picture.
    if (Pic.length>0) preLoadPic(Pic.length-1);
}