ScreenWidth=800
ScreenHeight=600
MaxWidth=ScreenWidth-40
MaxHeight=ScreenHeight-80
sbSize=16
wPicPage=''
wPicPath='images/'

wObj=''
wX=100
wY=100
wR=0
wScroll=0
wSb=0
wMH=0
myWin=0
myImage=0
imgText=''

function closeWin() {
  if (myWin.closed==false) {myWin.close();myWin=0}
}

function textwin2() {
  if (myWin.closed==false) {setTimeout('textwin2()',100);return}
  myWin = window.open(wObj,'txtwin','toolbar=0,location=0,directories=0,status='+wSb+',menubar=0,scrollbars='+wScroll+',resizable='+wR+',width='+wX+',height='+wY+',left='+(ScreenWidth-10-wX)/2+',top='+(ScreenHeight-30-wY)/2)
}

function textwin(p,x,y,r,scroll,sb) {
  if ((wObj==p) && (myWin.closed==false)) {myWin.focus();return}
  wObj=p;wX=x;wY=y;wR=r;wScroll=scroll;wSb=sb
  if (myWin==0) {myWin = window.open(wObj,'txtwin','toolbar=0,location=0,directories=0,status='+wSb+',menubar=0,scrollbars='+wScroll+',resizable='+wR+',width='+wX+',height='+wY+',left='+(ScreenWidth-10-wX)/2+',top='+(ScreenHeight-30-wY)/2);return}
  if (myWin.closed==false) myWin.close()
  textwin2()
}

function wShow() {
 if (myImage.height==0) {setTimeout('wShow()',100);return}
 wX=myImage.width
 wY=myImage.height+wMH
 if ((wX>MaxWidth) && (wY>MaxHeight)) {wX=MaxWidth+sbSize;wY=MaxHeight+sbSize;wSb=1} else
 if ((wX<=MaxWidth) && (wY>MaxHeight)) {wX+=sbSize;wY=MaxHeight;wSb=1} else
 if ((wX>MaxWidth) && (wY<=MaxHeight)) {wX=MaxWidth;wY+=sbSize;sb=1} else wSb=0
 myWin=window.open(wPicPage,'picwin','toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars='+wSb+',resizable=1,width='+wX+',height='+wY+',left='+(ScreenWidth-10-wX)/2+',top='+(ScreenHeight-30-wY)/2)
}

function picwin2() {
 if (myWin.closed==false) {setTimeout('picwin2()',100);return}
 myImage=new Image()
 myImage.src=wObj
 wShow()
}

function picwin(pic,text) {
 pic=wPicPath+pic
 if ((wObj==pic) && (myWin.closed==false)) {myWin.focus();return}
 if (text!=null) {
   wPicPage='kepf.htm'
   imgText=text
   wMH=24
 } else {
   wPicPage='kep.htm'
   imgText=''
   wMH=0
 }
 wObj=pic
 if (myWin==0) {myImage=new Image();myImage.src=wObj;wShow();return}
 if (myWin.closed==false) myWin.close()
 picwin2()
}