// Scripts for the Steven Scott web site
// Copyright (c)2003 ReGo. All rights reserved.
// Must be included after stevenscott.js

function PlayShowWeinberger() {
	currentIdx = -1;
	nextIdx = 0;
	showIsPaused = false;

	SSSetupScriptWeinberger();
	SSPlaceWeinberger();
	WriteControl();

	PlayShowWeinberger2();
}

function PlayShowWeinberger2() {
	currentIdx = nextIdx++;
	if(nextIdx == scriptWeinberger.scenes.length)
		nextIdx = scriptWeinberger.loopAtEnd;
	if(currentIdx >= scriptWeinberger.scenes.length || currentIdx < 0)
		currentIdx = 0;
	if(nextIdx >= 0) {
		playTimer = setTimeout('PlayShowWeinberger2()', scriptWeinberger.scenes[currentIdx].totalTime);
	}

	PlayScene(scriptWeinberger.scenes[currentIdx]);
}


function SSSetupScriptWeinberger() {
	scriptWeinberger = new SSScript('scriptWeinberger', -1);	// -1=stop after last scene, 0, 1, ... = Scene index

	var sceneWeinberger0s = new SSScene();
	sceneWeinberger0s.AddAction(new SSAction('hidessinfo6', '', 0, 0, 'gfx/txt_blanka.jpg', 0, 'gfx/txt_blankb.jpg', 0));
	sceneWeinberger0s.AddAction(new SSAction('hideLh', '', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('hideRh', '', 0, 0));

	sceneWeinberger0s.AddAction(new SSAction('A1', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('A2', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('A3', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('A4', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('B1', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('B2', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('B3', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('B4', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('C1', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('C23', 'gfx/weinberger_text.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('C4', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('D1', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('D2', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('D3', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('D4', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('E1', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('E2', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('E3', 'gfx/blank.jpg', 0, 0));
	sceneWeinberger0s.AddAction(new SSAction('E4', 'gfx/blank.jpg', 15, 0));
	scriptWeinberger.AddScene(sceneWeinberger0s);


	var sceneWeinbergerA = new SSScene();
	sceneWeinbergerA.AddAction(new SSAction('Lh', 'gfx/weinberger001.jpg', 0, 0));
	sceneWeinbergerA.AddAction(new SSAction('Rh', 'gfx/weinberger002.jpg', 3, 0));
	scriptWeinberger.AddScene(sceneWeinbergerA);

	var sceneWeinbergerB = new SSScene();
	sceneWeinbergerB.AddAction(new SSAction('Lh', 'gfx/weinberger001.jpg', 0, 0));
	sceneWeinbergerB.AddAction(new SSAction('Rh', 'gfx/weinberger002.jpg', 0, 0));

	sceneWeinbergerB.AddAction(new SSAction('Lh', 'gfx/weinberger004.jpg', 0, 1));
	sceneWeinbergerB.AddAction(new SSAction('Rh', 'gfx/weinberger001.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinbergerB);

	var sceneWeinbergerC = new SSScene();
	sceneWeinbergerC.AddAction(new SSAction('Lh', 'gfx/weinberger004.jpg', 0, 0));
	sceneWeinbergerC.AddAction(new SSAction('Rh', 'gfx/weinberger001.jpg', 0, 0));

	sceneWeinbergerC.AddAction(new SSAction('Lh', 'gfx/weinberger003.jpg', 0, 1));
	sceneWeinbergerC.AddAction(new SSAction('Rh', 'gfx/weinberger004.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinbergerC);

	var sceneWeinbergerD = new SSScene();
	sceneWeinbergerD.AddAction(new SSAction('hideEr', '', 0, 0));
	sceneWeinbergerD.AddAction(new SSAction('hideABCD', '', 0, 0));
	sceneWeinbergerD.AddAction(new SSAction('Lh', 'gfx/weinberger003.jpg', 0, 0));
	sceneWeinbergerD.AddAction(new SSAction('Rh', 'gfx/weinberger004.jpg', 0, 0));

	sceneWeinbergerD.AddAction(new SSAction('Lh', 'gfx/weinberger002.jpg', 0, 1));
	sceneWeinbergerD.AddAction(new SSAction('Rh', 'gfx/weinberger003.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinbergerD);


	var sceneWeinbergerJ = new SSScene();
	sceneWeinbergerJ.AddAction(new SSAction('hideLh', '', 0, 0));
	sceneWeinbergerJ.AddAction(new SSAction('hideRh', '', 0, 0));

	sceneWeinbergerJ.AddAction(new SSAction('Er', 'gfx/weinberger_logo3.jpg', 0, 0));
	sceneWeinbergerJ.AddAction(new SSAction('ABCD', 'gfx/weinberger01.jpg', 3, 0));
	scriptWeinberger.AddScene(sceneWeinbergerJ);

	var sceneWeinbergerK = new SSScene();
	sceneWeinbergerK.AddAction(new SSAction('Er', 'gfx/weinberger_logo3.jpg', 0, 0));
	sceneWeinbergerK.AddAction(new SSAction('ABCD', 'gfx/weinberger01.jpg', 0, 0));
	sceneWeinbergerK.AddAction(new SSAction('ABCD', 'gfx/weinberger02.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinbergerK);

	var sceneWeinbergerL = new SSScene();
	sceneWeinbergerL.AddAction(new SSAction('Er', 'gfx/weinberger_logo3.jpg', 0, 0));
	sceneWeinbergerL.AddAction(new SSAction('ABCD', 'gfx/weinberger02.jpg', 0, 0));
	sceneWeinbergerL.AddAction(new SSAction('ABCD', 'gfx/weinberger03.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinbergerL);

	var sceneWeinbergerM = new SSScene();
	sceneWeinbergerM.AddAction(new SSAction('Er', 'gfx/weinberger_logo3.jpg', 0, 0));
	sceneWeinbergerM.AddAction(new SSAction('ABCD', 'gfx/weinberger03.jpg', 0, 0));
	sceneWeinbergerM.AddAction(new SSAction('ABCD', 'gfx/weinberger04.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinbergerM);


	var sceneWeinberger1 = new SSScene();
	sceneWeinberger1.AddAction(new SSAction('Er', 'gfx/weinberger_logo3.jpg', 0, 0));
	sceneWeinberger1.AddAction(new SSAction('ABCD', 'gfx/weinberger04.jpg', 0, 0));

	sceneWeinberger1.AddAction(new SSAction('Er', 'gfx/weinberger_logo2.jpg', 0, 1));
	sceneWeinberger1.AddAction(new SSAction('ABCD', 'gfx/weinberger1.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinberger1);

	var sceneWeinberger2 = new SSScene();
	sceneWeinberger2.AddAction(new SSAction('Er', 'gfx/weinberger_logo2.jpg', 0, 0));
	sceneWeinberger2.AddAction(new SSAction('ABCD', 'gfx/weinberger1.jpg', 0, 0));
	sceneWeinberger2.AddAction(new SSAction('ABCD', 'gfx/weinberger2.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinberger2);

	var sceneWeinberger3 = new SSScene();
	sceneWeinberger3.AddAction(new SSAction('Er', 'gfx/weinberger_logo2.jpg', 0, 0));
	sceneWeinberger3.AddAction(new SSAction('ABCD', 'gfx/weinberger2.jpg', 0, 0));
	sceneWeinberger3.AddAction(new SSAction('ABCD', 'gfx/weinberger3.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinberger3);

	var sceneWeinberger4 = new SSScene();
	sceneWeinberger4.AddAction(new SSAction('Er', 'gfx/weinberger_logo2.jpg', 0, 0));
	sceneWeinberger4.AddAction(new SSAction('ABCD', 'gfx/weinberger3.jpg', 0, 0));
	sceneWeinberger4.AddAction(new SSAction('ABCD', 'gfx/weinberger4.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinberger4);

	var sceneWeinberger5 = new SSScene();
	sceneWeinberger5.AddAction(new SSAction('Er', 'gfx/weinberger_logo2.jpg', 0, 0));
	sceneWeinberger5.AddAction(new SSAction('ABCD', 'gfx/weinberger4.jpg', 0, 0));
	sceneWeinberger5.AddAction(new SSAction('ABCD', 'gfx/weinberger5.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinberger5);

	var sceneWeinberger6 = new SSScene();
	sceneWeinberger6.AddAction(new SSAction('Er', 'gfx/weinberger_logo2.jpg', 0, 0));
	sceneWeinberger6.AddAction(new SSAction('ABCD', 'gfx/weinberger5.jpg', 0, 0));
	sceneWeinberger6.AddAction(new SSAction('ABCD', 'gfx/weinberger6.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinberger6);

	var sceneWeinberger7 = new SSScene();
	sceneWeinberger7.AddAction(new SSAction('Er', 'gfx/weinberger_logo2.jpg', 0, 0));
	sceneWeinberger7.AddAction(new SSAction('ABCD', 'gfx/weinberger6.jpg', 0, 0));
	sceneWeinberger7.AddAction(new SSAction('ABCD', 'gfx/weinberger7.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinberger7);

	var sceneWeinberger8 = new SSScene();
	sceneWeinberger8.AddAction(new SSAction('Er', 'gfx/weinberger_logo2.jpg', 0, 0));
	sceneWeinberger8.AddAction(new SSAction('ABCD', 'gfx/weinberger7.jpg', 0, 0));
	sceneWeinberger8.AddAction(new SSAction('ABCD', 'gfx/weinberger8.jpg', 21, 1));
	scriptWeinberger.AddScene(sceneWeinberger8);


	var sceneInfo6 = new SSScene();
	sceneInfo6.AddAction(new SSAction('hideABCD', '', 0, 0));
	sceneInfo6.AddAction(new SSAction('hideEr', '', 0, 0));
	sceneInfo6.AddAction(new SSAction('ssinfo6', '', 20, 0, 'gfx/txt_blanka.jpg', 0, 'gfx/txt_blankb.jpg', 0));
	scriptWeinberger.AddScene(sceneInfo6);


	if(scriptHide)
		delete scriptHide;
	if(sceneHide)
		delete sceneHide;

	scriptHide = new SSScript('scriptHide', -1);
	sceneHide = new SSScene();
	sceneHide.AddAction(new SSAction('hidessinfo6', '', 0, 0));
	sceneHide.AddAction(new SSAction('hideABCD', '', 0, 0));
	sceneHide.AddAction(new SSAction('hideLh', '', 0, 0));
	sceneHide.AddAction(new SSAction('hideRh', '', 0, 0));
	sceneHide.AddAction(new SSAction('hideEr', '', 0, 0));
	scriptHide.AddScene(sceneHide);

	currentLength = scriptWeinberger.scenes.length;
}


function SSPlaceWeinberger() {

	var x=0, y=0;
	var i, j, h, w, lyr, name, name2;

	w = gridCols*gridWidth;
	h = Math.floor((gridRows*gridHeight) / 3);

	// Half-width cols
	theHHalfG[0] = new lib_obj('gLh');
	theHHalfG[0].moveIt(gridOffsetX, gridOffsetY);
	theHHalfG[0].css.width = gridHHalfW;
	theHHalfG[0].css.height = gridFullH;
	theHHalf[0] = new lib_obj('Lh');
	theHHalf[0].moveIt(gridOffsetX+gridLine, gridOffsetY+gridLine);
	theHHalf[0].css.width = gridHHalfW-2*gridLine;
	theHHalf[0].css.height = gridFullH-2*gridLine;

	theHHalfG[1] = new lib_obj('gRh');
	theHHalfG[1].moveIt(gridOffsetX+gridHHalfW - gridLine, gridOffsetY);
	theHHalfG[1].css.width = gridHHalfW;
	theHHalfG[1].css.height = gridFullH;
	theHHalf[1] = new lib_obj('Rh');
	theHHalf[1].moveIt(gridOffsetX+gridHHalfW, gridOffsetY+gridLine);
	theHHalf[1].css.width = gridHHalfW-2*gridLine;
	theHHalf[1].css.height = gridFullH-2*gridLine;

	for(i=0 ; i<gridRows ; i++) {
		y = gridOffsetY + i*gridHeight - i*gridLine;
		for(j=0 ; j<gridCols ; j++) {
			name = rowNames[i] + colNames[j];
			name2 = 'g' + name;
			x = gridOffsetX + j*gridWidth - j*gridLine;

			lyr = new lib_obj(name2);
			lyr.css.width = gridWidth;
			lyr.css.height = gridHeight;
			lyr.moveIt(x, y);
			lyr.showIt();

			theGrid[i][j] = new lib_obj(name);
			theGrid[i][j].css.width = pictureWidth;
			theGrid[i][j].css.height = pictureHeight;
			theGrid[i][j].moveIt(x+gridLine, y+gridLine);
			theGrid[i][j].showIt();

			if(i == 1 && j == 1) {
				theC23G = new lib_obj('gC23');
				theC23G.css.width = 2*gridWidth-gridLine;
				theC23G.css.height = 3*gridHeight-2*gridLine;
				theC23G.moveIt(x, y);

				theC23 = new lib_obj('C23');
				theC23.css.width = 2*pictureWidth+gridLine;
				theC23.css.height = 3*pictureHeight+2*gridLine;
				theC23.moveIt(x+gridLine, y+gridLine);
			}
		}

		// Place row
		name = rowNames[i] + 'r';
		name2 = 'g' + name;

		theRowsG[i] = new lib_obj(name2);
		theRowsG[i].css.width = gridFullW;
		theRowsG[i].css.height = gridHeight;
		theRowsG[i].moveIt(gridOffsetX, y);

		theRows[i] = new lib_obj(name);
		theRows[i].moveIt(gridOffsetX+gridLine, y+gridLine);
		theRows[i].css.width = gridFullW-2*gridLine;
		theRows[i].css.height = pictureHeight;
	}


	// The upper 4/5th part
	theABCDG = new lib_obj('gABCD');
	theABCDG.moveIt(gridOffsetX, gridOffsetY);
	theABCDG.css.width = gridFullW;
	theABCDG.css.height = gridFullH-gridHeight+gridLine;

	theABCD = new lib_obj('ABCD');
	theABCD.moveIt(gridOffsetX+gridLine, gridOffsetY+gridLine);
	theABCD.css.width = gridFullW-2*gridLine;
	theABCD.css.height = gridFullH-3*gridLine-pictureHeight;

	// Place the text layers
	y = gridOffsetY + gridRows*gridHeight - gridRows + 5;
	theBottomText = new lib_obj('bottom');
	theBottomText.moveIt(gridOffsetX, y);
	theBottomText.showIt();

	y = Math.floor((gridOffsetY - textHeight)/2);
	theTopText1 = new lib_obj('text1');
	theTopText1.css.width = textPartW;
	theTopText1.css.height = textHeight;
	theTopText1.moveIt(gridOffsetX, y);
	theTopText1.showIt();
	theTopText2 = new lib_obj('text2');
	theTopText2.css.height = textHeight;
	theTopText2.moveIt(gridOffsetX + textPartW, y);
	theTopText2.showIt();

	theTopText = new lib_obj('top');
	theTopText.moveIt(gridOffsetX, 0);

	theInfo6 = new lib_obj('ssinfo6');
	theInfo6.moveIt(gridOffsetX, gridOffsetY);
	theInfo6.css.width = gridFullW;
	theInfo6.css.height = gridFullH;

}