//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
// Slider Programme     By: M. Abid  05-07-2001            +
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

function instr(iStartingFrom,lrgstring,smstring,bolNotCaseSensitive) {
	//returns a number indicating the spot where smstring appears in lrgstring.
    //behaves exactly like vb's instr function
    //this is how to use
    /*
	var sString;
	var sSearch;
	var iStartingFrom;
	var vbTextCompare;
	vbTextCompare=true;
	sString='hello World this is a simple string. ';
	sSearch='hello';
	iStartingFrom=1;

	alert(instr(iStartingFrom,sString,sSearch,vbTextCompare)) ;
    */

	lrgstring=lrgstring.substring(iStartingFrom-1,lrgstring.length)
	//alert('after the cut' + lrgstring)
	if ( bolNotCaseSensitive ) {
		lrgstring=lrgstring.toLowerCase();
		smstring=smstring.toLowerCase();
	}
    // this function has a bug, when the searched word is found at the beginning of the large word , it returns 0!..
    //following fix is just for that !...
   	if ( smstring == lrgstring.substring(0,smstring.length) ) {
   	   //set foundat to 1 and return immediately since smstring is found at the beginning of the lrgstring already !...
   	   foundat=1;
   	   return foundat;
   	}
	strlen1 = smstring.length
	strlen2 = lrgstring.length
	foundat = 0
	for (i=0;i<=strlen2;i++) {
		comp=lrgstring.substring(i-1,strlen2)
		comp = comp.substring(0,strlen1)
		if (comp == smstring) {
			foundat = i
			break
		}
	}


	if ( iStartingFrom != 1 ) {
	    return foundat-(iStartingFrom-1);
	}
	else{
		return foundat;
	}
}


var bolisPC;
if ( instr(1,navigator.appVersion,'Macintosh','') > 0 )
{
	bolisPC=false;
}
else
{
	bolisPC=true;
}

if ( navigator.appName == 'Microsoft Internet Explorer' && bolisPC ) 
{
	document.write ("<center><TABLE bgcolor=FFF4CC cellSpacing=0 cellPadding=0 width=" + iScrollingTableWidth + " border=0>")
	document.write ("<TR>")
	document.write ("<TD vAlign=\"top\" bgcolor='" + iScrollingTableBackgroundColor + "' halign='center'><img src=\"abid.gif\" height='" + iScrollingTableHeight + "' width='" + iScrollingTableWidth + "' border=\"0\" name=\"placeholder\"></center></TD>")
	document.write ("</TR>")
	document.write ("</TABLE></center>")
	init();
}
else
{
	//document.write ("<img src=\"Mabid.gif\" height=\"20\">")
	document.write ("<p>")
}