// JScript File
    function InStr(strSearch, charSearchFor)
    /*
    InStr(strSearch, charSearchFor) : Returns the first location a substring (SearchForStr)
                               was found in the string str.  (If the character is not
                               found, -1 is returned.)
                               
    Requires use of:
        Mid function
        Len function
    */
    {
        for (i=0; i < Len(strSearch); i++)
        {
            if (charSearchFor == Mid(strSearch, i, Len(charSearchFor)))
            {
		        return i;
            }
        }
        return -1;
    }
    
        function Mid(str, start, len)
        /***
                IN: str - the string we are LEFTing
                    start - our string's starting position (0 based!!)
                    len - how many characters from start we want to get

                RETVAL: The substring from start to start+len
        ***/
        {
                // Make sure start and len are within proper bounds
                if (start < 0 || len < 0) return "";

                var iEnd, iLen = String(str).length;
                if (start + len > iLen)
                        iEnd = iLen;
                else
                        iEnd = start + len;

                return String(str).substring(start,iEnd);
        }


        function Len(str)
        /***
                IN: str - the string whose length we are interested in

                RETVAL: The number of characters in the string
        ***/
        {  return String(str).length;  }