//*** Red Letter Functions
blImage = new Image();
rlImage = new Image();
blImage.src = "/gifs/pf/christword_black.gif";
rlImage.src = "/gifs/pf/christword_red.gif";

function changeRL(showMe) {

	if(arguments[0]) {
		document.getElementById("rlChanger").style.display="";
		document.rlState=1;
	}
// First pass through, or rlState is zero
// image is rendered red, rl class is color black
	if(!document.rlState) {
		document.rlState=1;
		FindRule(document.styleSheets[0],'span.rl').style.color="black";
		document.getElementById("rlChanger").src = rlImage.src;
// First pass through, or rlState is !(zero)
// image is rendered black, rl class is color red
	} else {
		document.rlState=0;
		FindRule(document.styleSheets[0],'span.rl').style.color="red";
		document.getElementById("rlChanger").src = blImage.src;
		document.getElementById("rlChanger").style.display="";
	}
}

function FindRule(ss,selText){
	//***Find the CSS rule by its selector text.
	//***e.g. FindRule(document.styleSheets[0],'a.selected').style.fontWeight='bold';
	if (!ss) return;
	if (ss.cssRulesCache==null) ss.cssRulesCache={};
	var cssRulesCache=ss.cssRulesCache;
	selText=selText.toLowerCase(); //case sensitivity; IE and Mozilla don't agree on case for elements
	if (cssRulesCache[selText]) return cssRulesCache[selText];
	var rules = document.all?ss.rules:ss.cssRules;
	for (var i=0;i<rules.length;i++) if(rules[i].selectorText && rules[i].selectorText.toLowerCase()==selText) return cssRulesCache[selText]=rules[i];
	return null;
}

<!--- Insert the killMe function to go to Main Page for the chapter --->
//*** Back to main page function
function killMe(whereTo) {
    if(window.opener) {
        window.opener.location = whereTo;
        window.opener.focus();
        self.close();
    } else {
        window.location = whereTo;
    }
}

function keepMe(whereTo, v) {
	if(v >=6) whereTo += '#'+v;
    if(window.opener) {
        window.opener.location = whereTo;
        window.opener.focus();
    } else {
        window.location = whereTo;
    }
    return false;
}

function openWindow(url, name) { var w = window.open (url, name, "height=100,width=230"); }

try {
  if(Chapter) { ; }
} catch(e) {var Chapter = 0;}

if(Chapter >= 1) {
  selectDefault(document.Reference.t, verNav);

  var bookNum = findBookNum(Book);
  var currentBook = BookNums[bookNum];
  var priorBook = (bookNum==1?'Rev':BookNums[bookNum - 1]);
  var nextBook = (bookNum==66?'Gen':BookNums[bookNum + 1]);
  var priorChapter = Chapter-1;
  var nextChapter =  Chapter+1;
  var priorChapterBook = currentBook;
  var nextChapterBook  = currentBook;

  if(Chapter==1) {
   priorChapter = Books[priorBook].split(',')[0];
   priorChapterBook = priorBook;
 }

 if(Chapter==parseInt(Books[currentBook].split(',')[0], 10)) {
   nextChapter = '1';
   nextChapterBook = nextBook;
 }

  priorChapter = priorChapter.toString();
  nextChapter = nextChapter.toString();

  document.getElementById("topPBook").href='/tools/printerFriendly.cfm?b='+priorBook+'&c=1&t='+verNav;
  document.getElementById("topPChapter").href='/tools/printerFriendly.cfm?b='+priorChapterBook+'&c='+priorChapter+'&t='+verNav;
 document.getElementById("topNChapter").href='/tools/printerFriendly.cfm?b='+nextChapterBook+'&c='+nextChapter+'&t='+verNav;
 document.getElementById("topNBook").href='/tools/printerFriendly.cfm?b='+nextBook+'&c=1&t='+verNav;

  document.getElementById("bottomPBook").href='/tools/printerFriendly.cfm?b='+priorBook+'&c=1&t='+verNav;
  document.getElementById("bottomPChapter").href='/tools/printerFriendly.cfm?b='+priorChapterBook+'&c='+priorChapter+'&t='+verNav;
  document.getElementById("bottomNChapter").href='/tools/printerFriendly.cfm?b='+nextChapterBook+'&c='+nextChapter+'&t='+verNav;
  document.getElementById("bottomNBook").href='/tools/printerFriendly.cfm?b='+nextBook+'&c=1&t='+verNav;
}