//v1.0
//Copyright 2006 Adobe Systems, Inc. All rights reserved.
function AC_AddExtension(src, ext)
{
  if (src.indexOf('?') != -1)
    return src.replace(/\?/, ext+'?'); 
  else
    return src + ext;
}

function AC_Generateobj(objAttrs, params, embedAttrs) 
{ 
  var str = '<object ';
  for (var i in objAttrs)
    str += i + '="' + objAttrs[i] + '" ';
  str += '>';
  for (var i in params)
    str += '<param name="' + i + '" value="' + params[i] + '" /> ';
  str += '<embed ';
  for (var i in embedAttrs)
    str += i + '="' + embedAttrs[i] + '" ';
  str += ' ></embed></object>';

  document.write(str);
}

function AC_FL_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".swf", "movie", "clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
     , "application/x-shockwave-flash"
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_SW_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".dcr", "src", "clsid:166B1BCA-3F9C-11CF-8075-444553540000"
     , null
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_GetArgs(args, ext, srcParamName, classid, mimeType){
  var ret = new Object();
  ret.embedAttrs = new Object();
  ret.params = new Object();
  ret.objAttrs = new Object();
  for (var i=0; i < args.length; i=i+2){
    var currArg = args[i].toLowerCase();    

    switch (currArg){	
      case "classid":
        break;
      case "pluginspage":
        ret.embedAttrs[args[i]] = args[i+1];
        break;
      case "src":
      case "movie":	
        args[i+1] = AC_AddExtension(args[i+1], ext);
        ret.embedAttrs["src"] = args[i+1];
        ret.params[srcParamName] = args[i+1];
        break;
      case "onafterupdate":
      case "onbeforeupdate":
      case "onblur":
      case "oncellchange":
      case "onclick":
      case "ondblClick":
      case "ondrag":
      case "ondragend":
      case "ondragenter":
      case "ondragleave":
      case "ondragover":
      case "ondrop":
      case "onfinish":
      case "onfocus":
      case "onhelp":
      case "onmousedown":
      case "onmouseup":
      case "onmouseover":
      case "onmousemove":
      case "onmouseout":
      case "onkeypress":
      case "onkeydown":
      case "onkeyup":
      case "onload":
      case "onlosecapture":
      case "onpropertychange":
      case "onreadystatechange":
      case "onrowsdelete":
      case "onrowenter":
      case "onrowexit":
      case "onrowsinserted":
      case "onstart":
      case "onscroll":
      case "onbeforeeditfocus":
      case "onactivate":
      case "onbeforedeactivate":
      case "ondeactivate":
      case "type":
      case "codebase":
        ret.objAttrs[args[i]] = args[i+1];
        break;
      case "width":
      case "height":
      case "align":
      case "vspace": 
      case "hspace":
      case "class":
      case "title":
      case "accesskey":
      case "name":
      case "id":
      case "tabindex":
        ret.embedAttrs[args[i]] = ret.objAttrs[args[i]] = args[i+1];
        break;
      default:
        ret.embedAttrs[args[i]] = ret.params[args[i]] = args[i+1];
    }
  }
  ret.objAttrs["classid"] = classid;
  if (mimeType) ret.embedAttrs["type"] = mimeType;
  return ret;
}

// Extra script to do Flash checking

if ((navigator.userAgent.indexOf('MSIE') != -1) && (navigator.userAgent.indexOf('Win') != -1)) {
  document.writeln('<script language="VBscript">');
  document.writeln('Function detectActiveXControl(activeXControlName)');
  document.writeln('  on error resume next');
  document.writeln('  detectActiveXControl = False');
  document.writeln('  detectActiveXControl = IsObject(CreateObject(activeXControlName))');
  document.writeln('End Function');
  document.writeln('</scr' + 'ipt>');
}

function getFlashVersion(){
  var installedVersion = 0;
  if ((navigator.userAgent.indexOf('MSIE') != -1) && (navigator.userAgent.indexOf('Win') != -1)) {
    for (var i=3; i<10; i++){
      if(detectActiveXControl("ShockwaveFlash.ShockwaveFlash."+i) == true) installedVersion = i;
    }
  } else {
    if (navigator.plugins["Shockwave Flash"]) {
      var pluginDesc = navigator.plugins["Shockwave Flash"].description;
      installedVersion = parseInt( pluginDesc.charAt( pluginDesc.indexOf(".")-1 ) );
    }
    if(navigator.userAgent.indexOf("WebTV") != -1) installedVersion = 3; 
  }
  return installedVersion;
}

// MM Function for constructing name/value param and embed tags

function AC_RunFlContentX()
{
  // First, look for a "movie" and "src" params, and if either exists, add a ".swf" to the end
  // if it doesn't already have one (this function will only run swf files)
  AC_AddExtension(arguments, "movie", ".swf");
  AC_AddExtension(arguments, "src", ".swf");
  // Build the codebase value. If user passed in a version for the codebase, add the version
  // to the base codebase url. Otherwise, use the default version.
  var codebase = AC_GetCodebase
                 (  "https://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version="
                  , "7,0,0,0", arguments
                 );
  AC_GenerateObj
  (  "AC_RunFlContentX()", true, "clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
   , codebase
   , "https://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"
   , "application/x-shockwave-flash", arguments
  );   
}
//-------------------------------------------------------------------------
// Vertical Scrolling News Ticker
// XHTML Compat
// Version 2.0
// Copyright 2006 DevDude.com
//-------------------------------------------------------------------------
	//scroller width
var swidth=250;
//scroller height
var sheight=100;
//background color 
var sbcolor="#FFFFFF";
//scroller's speed
var sspeed=2;
var msg='';
//Your messages go below:
msg=	'<ul>'+
    '<li>27-09-2007</li>'+
		'<li><a href="news.horner.school.english.php">Booking 2008 - Bookings now being accepted for 2008.</a></li>'+
    '</ul>'+
		'<ul>'+
    '<li>16-01-2007</li>'+
		'<li><a href="news.php?ID=63">New Apartment Accommodation - UCD</a></li>'+
    '</ul>'+
		'<ul>'+
    '<li>15-01-2007</li>'+
		'<li><a href="news.php?ID=62">New Course - Standard Plus TOEFL</a></li>'+
    '</ul>'+
		'<ul>'+
    '<li>18-01-2007</li>'+
		'<li><a href="news.php?ID=61">Christmas Party 2006</a></li>'+
    '</ul>'+
		'<ul>'+
    '<li>12-01-2007</li>'+
		'<li><a href="news.php?ID=21">St. Patricks Festival - March 2007</a></li>'+
    '</ul>';
//End of your messages
var resumesspeed=sspeed
function start() {
	if (document.all) iemarquee(ticker);
	else if (document.getElementById)
		ns6marquee(document.getElementById('ticker'));
}

function iemarquee(whichdiv){
	iediv=eval(whichdiv)
	sheight += 50;
	iediv.style.pixelTop=sheight
	iediv.innerHTML=msg 
	sizeup=iediv.offsetHeight
	ieslide()
}

function ieslide(){
	if (iediv.style.pixelTop>=sizeup*(-1)){
		iediv.style.pixelTop-=sspeed
		setTimeout("ieslide()",100)
	}
	else{
		iediv.style.pixelTop=sheight
		ieslide()
	}
}

function ns6marquee(whichdiv){
	ns6div=eval(whichdiv)
	sheight += 50;
	ns6div.style.top=sheight + "px";
	ns6div.innerHTML=msg
	sizeup=ns6div.offsetHeight
	ns6slide()
}

function ns6slide(){
	if (parseInt(ns6div.style.top)>=sizeup*(-1)){
		theTop = parseInt(ns6div.style.top)-sspeed
		ns6div.style.top = theTop + "px";
		setTimeout("ns6slide()",100)
	}
	else {
		ns6div.style.top = sheight + "px";
		ns6slide()
	}
}