{\rtf1\ansi\ansicpg1252\deff0\deflang2057{\fonttbl{\f0\fswiss\fcharset0 Arial;}}
{\*\generator Msftedit 5.41.21.2509;}\viewkind4\uc1\pard\f0\fs20 rolls = new Array(); numRolls=0;\par
\par
function PPFindObj(n, d) \{\par
  var p,i,x;\par
  if( !d ) d=document; \par
  if((p=n.indexOf("?"))>0&&parent.frames.length) \{ d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p); \}\par
  if( !(x=d[n])&&d.all ) x=d.all[n]; \par
  for( i=0;!x&&i<d.forms.length;i++ ) x=d.forms[i][n];\par
  for( i=0;!x&&d.layers&&i<d.layers.length;i++ ) x=PPFindObj(n,d.layers[i].document); \par
  return x;\par
\}\par
\par
function PPImgFind(name) \{\par
  if (document.images)\par
    for(var i=0;i<numRolls;i++)\par
      if( name == rolls[i].name ) return rolls[i];\par
  return null;\par
\}\par
\par
function PPImgAction( action, name, roll ) \{\par
  if( !roll ) roll = PPImgFind(name); var obj = PPFindObj(name); if (roll && obj)\par
  \{\par
    if( action == 'over' ) obj.src = roll.down ? roll.imgDownOver.src : roll.imgOver.src;\par
    else if( action == 'out' ) \{ obj.src = roll.down ? (roll.radio ? roll.imgDown.src : roll.imgNormal.src) : roll.imgNormal.src; if(!roll.radio) roll.down = false; \}\par
    else if( action == 'down') \{\par
      roll.down = true; PPImgAction('over',name,roll);\par
      if( roll.radio ) \{\par
        for( var i=0;i<numRolls;i++ )\par
          if( rolls[i].radio && rolls[i].name != name ) \{ rolls[i].down=false; PPImgAction('out',rolls[i].name,rolls[i]);\}\}\par
      \}\par
      else if(action =='up') \{ if(!roll.radio) \{roll.down = false; PPImgAction('over',name,roll);\}\}\par
\}\}\par
\par
function PPImg( name,normal,over,down,downover,initDown,radio ) \{\par
  this.name = name;\par
  this.imgNormal = new Image(); this.imgNormal.src  = normal; \par
  this.imgOver = new Image(); this.imgOver.src  = over; \par
  this.imgDown = new Image(); this.imgDown.src  = down; \par
  this.imgDownOver = new Image(); this.imgDownOver.src = downover; \par
  this.down = initDown; this.over = false; this.radio = radio;\par
\}\par
\par
function PPImgInit( name,normal,over,down,downover,initDown,radio ) \{ if (document.images) rolls[numRolls++] = new PPImg(name,normal,over,down,downover,initDown,radio); \}\par
}
 