IMPAL

//0
//browserspezifische Definitionen
 MRbN=(na=navigator.appName.split(' '))[na.length-1];
 MRbV=navigator.appVersion.split(' ')[0]; //z.B. Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
 (MRbA=navigator.userAgent.match(/(Opera) (\d{1,2})/))?(MRbN=MRbA[1])+(MRbV=MRbA[2]):'';
 MRbn=MRbN.split('')[0];
 MRbv=MRbV.split('')[0];
 MRbi=MRbn+MRbv;
 MRdE=(MRbn=='E')?1:0;
 MRdN=(MRbn=='N')?1:0;
 MRdN4=(MRbi=='N4')?1:0;
 MRdF=navigator.userAgent.match(/Firefox/)?1:0;
 MRdO=navigator.userAgent.match(/OP/i)?1:0;
 MRdC=navigator.userAgent.match(/Chrome/)?1:0;
 MRdEd=navigator.userAgent.match(/Edge/)?1:0;
 gBI=function(){alert(['navigator:','appName:'+navigator.appName,,'appVersion:'+navigator.appVersion,,'userAgent:'+navigator.userAgent,,'Browserspezifische Systemvariablen und deren Werte:','MRbN '+MRbN,'MRbV '+MRbV,'MRbA '+MRbA,'MRbn '+MRbn,'MRbi'+MRbi,,'MRdE:'+MRdE,'MRdEd:'+MRdEd,'MRdN:'+MRdN,'MRdF:'+MRdF,'MRdO:'+MRdO,'MRdC:'+MRdC,,'av '+navigator.appVersion,'cn '+navigator.appCodeName,'pf '+navigator.platform,'la '+navigator.language].join('\n'))};

//grundsätzliche Definitionen
 rT='return(true)';rF='return(false)';
 Frf=function(){return''};px='PX';nB=String.fromCharCode(160);
 parseAlpha=function(v){return(v.replace(/[^a-z%]*/gi,''))};
 eval("gsw=function(){return "+(MRdN?"self.innerWidth;":"document.body.clientWidth;")+"};");
 eval("gsh=function(){return "+(MRdN?"self.innerHeight;":"document.body.clientHeight;")+"};");
 //HF-Bibliothek
 HF={
  S:{
   a:'position:absolute',
   pa:'position:absolute',
   pf:'position:fixed',
   l:'left:',
   t:'top:',
   w:'width:',
   h:'height:',
   rt:'right:',
   bm:'bottom:',
   cp:'clip:',
   b:'border:',
   bl:'border-left:',
   bt:'border-top:',
   br:'border-right:',
   bb:'border-bottom:',
   r:'border-radius:',
   i:'border-image:',
   m:'margin:',
   ml:'margin-left:',
   mt:'margin-top:',
   mr:'margin-right:',
   mb:'margin-bottom:',
   p:'padding:',
   pl:'padding-left:',
   pt:'padding-top:',
   pr:'padding-right:',
   pb:'padding-bottom:',
   bg:'background:',
   bc:'background-color:',
   bi:'background-image:',
   ba:'background-attachement:',
   bp:'background-position:',
   bs:'background-size:',
   bw:'background-repeat:',
   bs:'box-shadow:',
   f:'font:',
   ff:'font-family:',
   fs:'font-size:',
   fy:'font-style:',
   fv:'font-variant:',
   fw:'font-weight:',
   fc:'color:',
   ta:'text-align:',
   ti:'text-indent:',
   ws:'white-space:',
   tv:'vertical-align:',
   td:'text-decoration:',
   ts:'text-shadow:',
   to:'text-overflow:',
   ls:'letter-spacing:',
   lh:'line-height:',
   ww:'word-wrap:',
   ya:'page-break-after:',
   yb:'page-break-before:',
   rs:'resize:',
   to:'transform-origin:',
   tr:'transform:',
   d:'display:',
   c:'cursor:',
   v:'visibility:',
   vh:'visibility:hidden',
   vv:'visibility:visible',
   o:'overflow:',
   oh:'overflow:hidden',
   ov:'overflow:visible',
   op:'opacity:',
   zi:'z-index:'
  },
  _S:{},
  Tags:'A_2Aa1ofobayshtitgtyhfrervhlysconmAB2ABBRa1AC2ACRONYMa1AD2ADDRESSa1ZA2APPLETidtlsyyc!dwd!fanatarcbhtnmzsvscdzjAR1AREAat!fa1ofobayshtitghfcoxhAU2AUDIOa1B_2Ba1BA1BASEtghfZB1BASEFONTid!dsz!ffczfBD2BDOdr!fidlatlsyycBI2BIGa1BQ2BLOCKQUOTEa1ceBY0BODYa1oeox!dakbglktxvkbcBR1BRidtlsyycol!dcrBN2BUTTONa1ofobaytityxdnmvaCT2CAPTIONa1anZC2CENTERa1CI2CITEa1CD2CODEa1CL1COLa1anvnyayospwdCG3COLGROUPa1anvnyayospwdDD3DDa1DQ2DELa1cedtDF2DFNa1ZD2DIRa1!dxcD_2DIVa1!danDL2DLa1!dxcDT3DTa1E_2EMBEDidsrhdlpauwdhtnmEM2EMa1FT2FIELDSETa1ZF2FONTiddrlatlsyyc!dszfczfF_2FORMao!fa1aceymtomortgFR1FRAMEidtlsyycldfbscmhmwnmsrxzFS2FRAMESETidtlsyyccloeoxrwH12H1a1!danH22H2a1!danH32H3a1!danH42H4a1!danH52H5a1!danH62H6a1!danHD0HEADdrlapfHR1HRidocodkdkpkumdmmmomamutlsyyc!danwdszzeH_0HTMLdrla!dveIT2Ia1FI2IFRAMEidtlsyycanhtwdldfbscmhmwnmsr!danI_1IMGatsr!fa1htwdxildum!danbdzsvsIX1INPUTa1apxkmlofobogosxrayattityxdnmszsrumvaph!danIQ2INSa1cedtZI1ISINDEXiddrlatlsyyc!dzrKB2KBDa1LL2LABELa1ofobaylfLG2LEGENDa1ayanLI3LIa1!dtyvaLK1LINKa1tgtyhfrervhlysmiMA2MAPnm!fa1ZM2MENUa1!dxcMT1METAct!fdrlahqnmmsysNF2NOFRAMESa1NJ2NOSCRIPTa1OJ2OBJECTa1tityyicydaxasbhtwdnmumarcb!danbdzsvsOL2OLa1!dtyxcstOG2OPTGROUPll!fa1xdON3OPTIONa1xdllxsvaosP_2Pa1!danPM1PARAMnm!fidtyvavtPR2PREa1!dwdQ_2Qa1ceZS2Sa1SE2SAMPa1SC2SCRIPTty!fysxfsr!dlgXS2SELECTa1ofobogtixdxmnmszSM2SMALLa1S_2SPANa1ES2ESa1CS2CSa1ZT2STRIKEa1SG2STRONGa1SY2STYLEty!fdrlatlmiSB2SUBa1SP2SUPa1T_2TABLEa1frbdcpcsrusuwd!danbcTB2TBODYa1anvnyayoTD2TDa1anabaxcnhdrnspvnyayo!dhtwdbc!dzwXY2TEXTAREAcl!fa1ofobogosolxraytixdnmrwphYF3TFOOTa1anvnyayoTH3THa1anabaxcnhdrnspvnyayo!dhtwdbc!dzwYH3THEADa1anvnyayoTL2TITLEdrlaTR2TRa1anvnyayo!dbcTT2TTa1ZU2Ua1UL2ULa1!dtyxcVA2VARa1VI2VIDEOa1'.replace(/a1/g,'iddrlaocodkdkpkumdmmmomamucmowtlsyyc'),
  Atts:'idIDdrDIRlaLANGocONCLICKodONDBLCLICKkdONKEYDOWNkpONKEYPRESSkuONKEYUPmdONMOUSEDOWNmmONMOUSEMOVEmoONMOUSEOVERmaONMOUSEOUTmuONMOUSEUPcmONCONTEXTMENUolONSCROLLtlTITLEsySTYLEycCLASSanALIGNatALTshSHAPEtiTABINDEXtgTARGETtyTYPEhfHREFreRELrvREVhlHREFLANGysCHARSETcoCOORDSfrFRAMEbdBORDERcpCELLPADDINGcsCELLSPACINGruRULESsuSUMMARYabABBRaxAXIScnCOLSPANhdHEADERSrnROWSPANspSCOPEzwNOWRAPvnVALIGNyaCHARyoCHAROFFsnSPANceCITEclCOLSctCONTENTdtDATETIMExfDEFERxdDISABLEDhtHEIGHTwdWIDTHhqHTTP-EQUIVxiISMAPllLABELldLONGDESCfbFRAMEBORDERscSCROLLINGmhMARGINHEIGHTmwMARGINWIDTHmiMEDIAnmNAMExzNORESIZEoeONLOADoxONUNLOADpfPROFILEphPLACEHOLDERrwROWSmsSCHEMExsSELECTEDszSIZEsrSRCspSTEPlrLOWSRCumUSEMAPvaVALUEvtVALUETYPEakALINKbgBACKGROUNDlkLINKtxTEXTvkVLINKbcBGCOLORcrCLEARxcCOMPACTlgLANGUAGEzeNOSHADEzrPROMPTstSTARTveVERSIONzsHSPACEvsVSPACEcdCODEzjOBJECTfcCOLORzfFACExcAUTOCOMPLETEacACCEPT-CHARSETeyENCTYPEmtMETHODomONSUBMITorONRESETaoACTIONapACCEPTxkCHECKEDmxMAXmnMINmlMAXLENGTHofONFOCUSobONBLURogONCHANGEosONSELECToiONINPUTowONWHEELxrREADONLYlfFORxmMULTIPLExhNOHREFayACCESSKEYarARCHIVEcbCODEBASEyiCLASSIDcyCODETYPEdaDATAxaDECLAREsbSTANDBYapAUTOPLAYauAUTOSTARTctCONTROLShdHIDDENlpLOOP',
  A:{},B:{},
  tags:{},_tags:{},
  mX:[],mY:[],
  ic:0,
  NO:[],
  GO:[],
  SO:[],
  FO:[],
  KEY:0,
  Keys:[],
  KeyDo:Frf,
  //Mvs:[],//{d:{m:{c:0}}},
  write:'',
  uc:0,
  Imgs:{},
  Urls:{},
  L3:document.referrer||location.href,
  ImgLL:[
   'I0=0.gif',

'bgiBreitensee1=bgi.breitensee1.jpg',
   'bgiGarten1=bgi.garten1.jpg',

'cmsL16=learc.16.gif',//alt
   'cmsL16o=learc.16o.gif',//alt

'cmsI16=ImPal.Logo.png',
   'cmsI16o=ImPal.Logo.sw.png',
   
   'cmsX=cms.x.gif',

'cmshr=cms.hr0.gif',
   'cmshrm0=cms.hrm0.gif',
   'cmshrm2=cms.hrm2.gif',
   'cmsvr=cms.vr0.gif',
   'cmsvrm1=cms.vrm1.gif',
   'cmsvrm3=cms.vrm3.gif',
   'cmsHR=cms.hr1.gif',//alt
   'cmsVR=cms.vr1.gif',//alt
   'cmsVrH=cms.VrH.gif',//alt
   'cmscsr=cms.csr.gif',//alt

'cms00=cms.color.000.gif',//evtl. GW
   'cms01=cms.color.B00.gif',
   'cms02=cms.color.FB0.gif',
   'cms03=cms.color.EE0.gif',
   'cms04=cms.color.0B0.gif',
   'cms05=cms.color.0BB.gif',
   'cms06=cms.color.00B.gif',
   'cms07=cms.color.B0B.gif',

'cms228=cms.Arc228.gif',//hnv
   'cmsMilli=cms.millimeterpapier.png',

'cms21=cms.Server.grau.gif',
   'cms210=cms.Server.gruen.gif',
   'cms211=cms.Server.rot.gif',
   'cms212=cms.Server.gelb.gif',

'cms23=cms.Drucker.gif',
   'cms27=cms.Email.gif',

'cms31=cms.ws.new.1.gif',
   'cms311=cms.NeueDatei.gif',
   'cms32=cms.FileOpen.16.png',
   'cms320=cms.Ordner.gif',
   'cms3201=cms.OrdnerSicher.gif',
   'cms321=cms.NeuerOrdner.gif',
   'cms322=cms.Elternverzeichnis.gif',
   'cms34=cms.Save.16.png',
   'cms341=cms.SaveAs.16.png',
   'cms39=cms.ws.close.1.gif',

'cms41=cms.cut.1.gif',
   'cms42=cms.copy.1.gif',
   'cms43=cms.insert.1.gif',
   'cms44=cms.delete.1.gif',

'cms512=cms.ws.colors.1.gif',

'cms61=cms.Puzzle.gif',
   'cms62=cms.Kuchen.gif',

'cms71=cms.zoomin.1.gif',
   'cms70=cms.zoomout.1.gif',
   'cms72=cms.zoom.1.gif',
   'cms800=cms.Transparenz.gif',
   'cms8001=cms.BackMark.gif',
   'cms802=cms.Deckungsgrad.gif',
   'cms803=cms.HelKon.1.gif',
   'cms81=cms.Auswahl.gif',
   'cms811=cms.Anker.gif',
   'cms82=cms.Pinsel.gif',
   'cms83=cms.Farbeimer.gif',
   'cms84=cms.Linie.gif',
   'cms840=cms.Kreis.gif',
   'cms8401=cms.KreisKlein.gif',
   'cms842=cms.Linie.gif',
   //'cms8421=cms.LinieGrob.gif',
   //'cms8422=cms.LinieGestrichelt.gif',
   'cms8423=cms.LinieGepunktet.gif',
   'cms844=cms.Quadrat.gif',
   'cms8441=cms.QuadratKlein.gif',
   'cms8456=cms.Hexagon.gif',
   'cms846=cms.Stern.gif',
   'cms845=cms.Polygon.gif',
   'cms8450=cms.Lasso.gif',
   'cms86=cms.Pipette.gif',
   'cms87=cms.Spraydose.gif',
   'cms88=cms.Stempel.gif',
   'cms881=cms.StempelLesen.gif',
   'cms890=cms.ZRotation.gif',
   'cms891=cms.XRotation.gif',
   'cms892=cms.YRotation.gif',
   'cms894=cms.Rotation90Links.gif',
   'cms896=cms.Rotation90Rechts.gif',
   'cms895=cms.Rotation180.gif',
   'cms898=cms.SpiegelnHorizontal.gif',
   'cms899=cms.SpiegelnVertikal.gif',
   'cms90=cms.r90.gif',
   'cms91=cms.r180.gif',
   'cms92=cms.r270.gif',
   'cms99=cms.Text.gif',

'cms9911=cms.BB.F.gif',
   'cms9912=cms.BB.B.gif',
   'cms9921=cms.BB.k.gif',
   'cms9922=cms.BB.i.gif',
   'cms993=cms.BB.U.gif',
   'cms9940=cms.BB.alignLeft.gif',
   'cms9941=cms.BB.alignCenter.gif',
   'cms9942=cms.BB.alignRight.gif',
   'cms9943=cms.BB.alignTop.gif',
   'cms9944=cms.BB.alignMiddle.gif',
   'cms9945=cms.BB.alignBottom.gif',
   'cms999=cms.BB.A.gif',
   
   'cmsMenue=cms.Menue.gif',//CMS

'cmsColorSwap=cms.ColorSwap.gif',//BB

'cmsTno=cms.tag.no.gif',//MR
   'cmsTgr=cms.tag.red.gif',
   'cmsTgg=cms.tag.green.gif',
   'cmsTgb=cms.tag.blue.gif',
   'cmsTxl=cms.tag.textl.gif',
   'cmsTxm=cms.tag.textm.gif',
   'cmsTxr=cms.tag.textr.gif',

'cmsBmove=cms.P.drag.gif',//alt
   'cmsColors=cms.ws.colors.16.gif',//alt
   'cmsFileOpen=cms.FileOpen.16.png',//alt
   'cmsShowImage=cms.ShowImage.png',//BB FTP

'ColOb=cms.ColOb.Colors.png',//MR
   'ColObCF=cms.crossfade.png',//MR BV HV

'ArrowLeft=cms.arrowLeft.gif',//WebPuzzles
   'ArrowRight=cms.arrowRight.gif',
   'ArrowLeftEnd=cms.arrowLeftEnd.gif',
   'ArrowRightEnd=cms.arrowRightEnd.gif',

'MRPZv00=pz.v00.b.gif',//MRPZ
   'MRPZv01=pz.v01.b.gif',
   'MRPZv10=pz.v10.b.gif',
   'MRPZv11=pz.v11.b.gif',
   'MRPZv20=pz.v20.b.gif',
   'MRPZv21=pz.v21.b.gif',
   'MRPZv30=pz.v30.b.gif',
   'MRPZv31=pz.v31.b.gif',
   'pzMove=cms.ws.move.1.gif',//alt
// 'MRPZmix=cms.pz.mix.gif',//alt
   'MRPZMix=cms.pz.Mix.gif',//alt
   'MRPZStart=cms.pz.Start.gif',//alt
   'MRPZStop=cms.pz.Stop.gif',//alt
   'MRPZHelp=cms.pz.Help.gif',//alt
   'MRPZ1x2=cms.10x20.png',//BB MRPZ
   'MRPZSiz=cms.pz.size.png',//alt
   'MRPZCut=cms.pz.cut.png',//pCut

'cmsHaus=cms.haus.png',//pPlatform

'bbArc=bb.Arc.gif',//GH Dr.Rud.
   'bbLogo=bb.Logo.gif',//GH Dr.Rud.
   ''//!
  ].join(','),
  ImgLC:''
 }// HF

//gibt CSS3 Eigenschaft im JavaScript-Format zurück
 HF.StoJ=function(pr){
  var S,s
  S=HF.S[pr].slice(0,-1)
  while((s=S.indexOf('-'))>-1){S=S.slice(0,s)+S[s+1].toUpperCase()+S.slice(s+2)}
  return(S)
 };

// ##### HF.Source( objekt [,formatiert] ) ##### Gibt rekursiv Objekt-Quellcode als String zurück
 HF.Source=function(o,m){pR='';pC=0;pR=m?HF.Source.part.mL(o):HF.Source.part.sL(o);return(pR)};
 HF.Source.part={
  mL:function(o){ // Ausgabe mehrzeilig mit Einrückung formatiert
   pC++
    R='';
    for(var i in o){(R+=HF.repl(' ',pC)+(parseInt(i)==i?i:'"'+i+'"')+":"+(typeof(o[i])=='object'?HF.Source.part.mL(o[i]):(typeof(o[i])=='string'?'"'+o[i]+'"':o[i]))+",\n")}
    R=R.replace(/,\n$/,'');
    pR+=R;
   pC--;
   return("{\n"+R+"\n"+HF.repl(' ',pC)+"}")
  },
  sL:function(o){ // Ausgabe in einer Zeile
   R=''
   for(var i in o){(R+=(parseInt(i)==i?i:'"'+i+'"')+":"+(typeof(o[i])=='object'?HF.Source.part.sL(o[i]):(typeof(o[i])=='string'?'"'+o[i]+'"':o[i]))+",")}
   R=R.replace(/,$/,'');pR+=R;return("{"+R+"}")
  }
 };
 HF.Source.Names=function(o){R=[];for(var i in o){R.push(i)};return(R)}; // gibt Array mit den Namen der Teil-Objekte einer Objektebene zurück

//HF._S aus HF.S erzeugen
 for(var i in HF.S){HF._S[HF.S[i]]=i};HF._S['position:']='pa';

//HF.s aus HF.S erzeugen
 SF={//Sonderfälle
  pa:"a.pa?'position:absolute;':''",
  a:"a.a?'position:absolute;':''",
  pf:"a.pf?'position:fixed;':''",
  bi:"a.bi?'background-image:url('+a.bi.replace(/^url\$?([^\$]*)\\)?/,'$1')+');':''",
  v:"a.v?'visibility:'+(a.v>0?'visible':'hidden')+';':''",
  vh:"a.vh?'visibility:hidden;':''",
  vv:"a.vv?'visibility:visible;':''",
  o:"a.o?'overflow:'+(a.o>0?'visible':'hidden')+';':''",
  oh:"a.oh?'overflow:hidden;':''",
  ov:"a.ov?'overflow:visible;':''"
 }
 A=[];for(var i in HF.S){A.push(SF[i]||"a."+i+"?'"+HF.S[i]+"'+a."+i+"+';':''")};
 eval("HF.s=function(a){return["+A.join(',')+"].join('')}");SF='';

//Hilfsobjekte und Hilfsfunktionen für HTML-Funktionen erzeugen
 eval(HF.Atts.replace(/([a-z]{2})([A-Z-]*)/g,"HF.A.$1='$2'.toLowerCase();HF.B[HF.A.$1]='$1';"))
 HF.A['dv']='defaultValue';HF.B[HF.A.dv]='dv';//Sonderfall
 makeAtStr=function(a){//erzeugt Attributstring aus QX oder Kurzstring
  if(a){
   if(typeof(a)=='string'){
    return((a.split(',')[1]?eval([a.split(',')[1].replace(/([a-z]{2})([^;]*);/g,"(' '+HF.A.$1+'=\"$2\"')+"),"('')"].join('')):'')+
    (' style="'+(eval([a.split(',')[0].replace(/([a-z]{1,2})(-?#?[A-Z\.0-9-\%\/ #]*)/g,"(HF.S.$1+'$2;')+"),"('')"].join('')))+'"'));
   }else{if(a.sy&&typeof(a.sy)=='object'){a.sy=HF.s(a.sy)};x1R=[];for(var ai in a){HF.A[ai]&&a[ai]?x1R[x1R.length]=' '+HF.A[ai]+'="'+a[ai]+'"':''};return(x1R.join(''))};
  }else{return ''};
 }; aD='';TC=function(t){return t};
 makeAtObj=function(a){//erzeugt Attributobjekt aus String
  if(a){
   var A=[];qm='"';
   eval(a.replace(/([^=]*)(=")([^"]*)(")/gi,
    "x1='$1'.replace(/^ */gi,'');"+
    'x2="$3".replace(/^[=]/gi,"");'+
    "x1.length>0?A[A.length]=(HF.B[x1])+':'+(qm+x2+qm):'';"
   ));
   eval('A={'+A.join(',')+'}');
   if(A.sy){
    var s={};//Styleobjekt erzeugen
    eval(A.sy.replace(/([A-Za-z\-\.\/_,]*):{1}([^;]*);?/gi,"s[HF._S['$1:']]='$2';"));
    s.bi?s.bi=s.bi.replace(/^url$?([^$]*)\)?/,'$1'):'';//Sonderfälle behandeln
    s.pa?s.pa=s.pa.match(/absolute/i)?1:0:'';
    s.v?s.v=s.v.match(/hidden/i)?-1:1:'';
    s.o?s.o=s.o.match(/hidden/i)?-1:1:'';
    A.sy='""'+HF.Source(s)+'""';
   }
   return(HF.Source(A).replace(/"{3}/g,''))
  }else{return ''};
 };
 //HTML-Funktionen und deren Umkehrfunktionen erzeugen
 eval(HF.Tags.replace(/([A-Z_1-6]{2})(\d{1})([A-Z1-6]*)([a-z1!]*)/g,
  "$1=function(a){return('<$3'+makeAtStr(a)+'>')};"+
  "_$3=function(a){return('$1('+makeAtObj(a)+')')};"+
  "HF.tags.$3=$2;"+
  "HF._tags.$3='$1';"+
  "E='e$1'.replace(/_/,'')+'=';$2!=1?eval(E+'\"</$3>\"'):'';"
 ));
 //erzeugt Qx aus HTML (die finale Umkehrfunktion)
 HTMLtoQx1=function(t,a){return(eval('_'+t+'(a)'))};//nur eine Zeile z.B.: HTMLtoQx1('TABLE','width="30" border="1"')
 HTMLtoQx=function(H,s,o){//mehrzeilig  H=HTML [ s=strukturierte Ausgabe (Einrückung um s Stellen) [ o=Offset auf Einrückung ]]
  if(H){
   var R='',N=H.split('<'),p=0,S;
   for(var i in N){
    if(S=N[i].match(/(\/?)(\w*) ?(.*)>(.*)?/)){
     S[2]=S[2].toUpperCase()
     R+=(
      S[1]?HF.repl(' ',(p-=s)+o)+'e'+HF._tags[S[2]].replace(/_/,''):
      S[2]&&(t=HF.tags[S[2]])!=null?HF.repl(' ',p+o)+HTMLtoQx1(S[2],S[3],p+=t>1?s:0):''
     )+',\n'+(S[4]?HF.repl(' ',p+o)+'TC("'+S[4].replace(/"/g,'\\"')+'"),\n':'')
    }else{i==0&&N[0].length?R+=HF.repl(' ',p+o)+'TC("'+N[0].replace(/"/g,'\\"')+'"),\n':''}
   }
   return(R)
  }
 };

// weitere Hilfsfunktionen

//Dateityp-Erkennung
 HF.isImg=function(n){return(n.match(/\.(jpe?g?)?(png)?(gif)?(bmp)?$/i))};
 HF.isJPG=function(n){return(n.match(/\.jpe?g?$/i))};
 HF.isPNG=function(n){return(n.match(/\.png$/i))};
 HF.isGIF=function(n){return(n.match(/\.gif$/i))};
 HF.isBMP=function(n){return(n.match(/\.bmp$/i))};
 HF.isAudio=function(n){return(n.match(/\.mpe?g?3$/i))};
 HF.isVideo=function(n){return(n.match(/\.mpe?g?4$/i))};
 HF.isDoc=function(n){return(n.match(/\.(html?)$/i))};
 HF.isTxt=function(n){return(n.match(/\.(txt)?(css)?(csv)?(js)?$/i))};

//String c wird n-mal zurückgegeben
 HF.repl=function(c,n){var a=[];a[n-1]='.';return(a.join('.').replace(/./g,c))};

//zur kaufmännisch formatierten Rückgabe von Beträgen (z. B.: HF.betr('123.7389614') ergibt '123.74')
 HF.betr=function(v){//Syntax: v=Betrag
  var v=(''+(parseFloat(v)||'')).replace(/,/,'.');
  var d='.';//Komma ist Standardtrennzeichen
  eval((
   ''+Math.round(parseFloat(v*100))/100).replace(/([^.]*)(\.)?(.)?(.)?$/,
   "var V=['$1','$2'||'.','$3'||'0','$4'||'0'].join('').replace(/\\./,d)"
  ));
  return(V)
 }

//zur Formatierung von großen Zahlen (z.B.: HF.Format('1234567890','...') ergibt '1.234.567.890')
 HF.format=function(v,m){return((''+v).split('').reverse().join('').replace(eval('/('+m+')/g'),'$1.').replace(/\.$/,'').split('').reverse().join(''))};

HF.Rnd=function(a){//gibt String mit a Zufallszeichen zurück
  var p='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz'.split('');
  var r='';
  for(var i=0;i<a;i++){r+=p[parseInt(Math.random()*62)]};return(r)
 };

//Konvertierung CSS/JS
 HF.js2css=function(c){
  var i,C=c.split(/([a-z]*)([A-Z]*)([a-z]*)/)
  for(i=2;C[i];i+=4){C[i]?C[i]='-'+C[i].toLowerCase():''}
  return(C.join(''))
 }
 HF.css2js=function(c){
  var i,C=c.split(/([a-z]*)(-.)([a-z]*)/)
  for(i=2;C[i];i+=4){C[i]?C[i]=C[i][1].toUpperCase():''}
  return(C.join(''))
 }

HF.waitForImagesComplete=function(img,ele){//zeigt WAIT-Cursor auf element bis alle Images in images geladen sind
  HF.wficImages=images=eval(img);
  HF.wficElement=element=eval(ele);
  element.style.cursor='wait';
  for(i=0;I=images[i];i++){if(!I.complete){break};element.style.cursor=''}
  if(element.style.cursor=='wait'){setTimeout("HF.waitForImagesComplete('"+img+"','"+ele+"')",2500)}
 };

HF.SQLwait=function(tn,fc,pt){// führt fc aus, sobald SQL-Tabelle tn existiert (pt=polling time)
  (f=frames['FISQL'+tn])&&f.document&&f.document.forms&&f.document.forms[0]&&f.document.forms[0].elements&&(lex=f.document.forms[0].elements[0])?eval(fc):setTimeout('HF.SQLwait("'+tn+'","'+fc+'",'+pt+')',pt)
 };

HF.wait=function(ex,fc,pt){eval(ex)?eval(fc):setTimeout('HF.wait("'+ex+'","'+fc+'",'+pt+')',pt)};// führt fc aus, sobald HTML-Element id existiert (pt=polling time)

HF.watchJob=function(bed,exe,max,ms){
  ms=ms||500;//Default 500 ms RelayTime
  if(max&&eval(bed)){eval(exe)}else{setTimeout("HF.watchJob('"+bed+"','"+exe+"',"+(max-1)+","+ms+")",ms)}
 };

HF.watchJob=function (bed,exe,max,ms){
 ms=ms||500;//Default 500 ms RelayTime
 b=typeof(bed)=='function'?1:0;
 e=typeof(exe)=='function'?1:0;
 if(max&&(b?bed():eval(bed))){e?exe():eval(exe)}
 else{setTimeout("HF.watchJob( "+(b?"bed":"'"+bed+"'")+","+(e?"exe":"'"+exe+"'")+","+(max-1)+","+ms+")",ms)}
};

HF.maxZoom=function(z){// Zoom auf nächstmöglichen Wert abstufen
 for(i=0;v=MDI.ZOOM.A[i];i++){
  if(v<z){m=v;continue}
  if(v==z){return(v)}
  if(v>z){return(m)}
 }
};

//Mausrad
HF.whl=function(e){
 var v=0;
 e?'':e=window.event;
 if(e.detail){v=-(e.detail/3)}//Firefox
 else if(e.wheelDelta){v=e.wheelDelta/120};//Opera
 v?HF.Whl(v):'';
 //e.preventDefault?e.preventDefault():'';//veraltet!
 e.defaultPrevented=true;
 e.returnValue=false;
};
HF.Whl=Frf;
window.addEventListener?
window.addEventListener('DOMMouseScroll',HF.whl,false):
window.onmousewheel=document.onmousewheel=HF.whl;
MRdC?document.onmousewheel=function(e){HF.Whl(e.wheelDelta/120)}:'';//Chrome

//zählt die Elemente eines Objekts
 HF.cntEl=function(o){cnt=0;for(var i in o){cnt++};return(cnt)};

//gibt Datensatz-Objekt aus Array zurück
 HF.mOfA=mOfA=function(nmA,vaA){i=0;o={};for(var f in nmA){o[nmA[f]]=vaA[i];i++};return(o)}
 //gibt Arrays aus Objekt zurück
 HF.mAfO=function(o){nmA=[];vaA=[];for(var f in o){nmA.push(f);vaA.push(o[f])};return([nmA,vaA])}
 //verschmelzt zwei Objekte
 HF.merge=function(a,b){for(var i in b){a[i]=b[i]};return(a)}
 //entfernt unerlaubte Zeichen mit (RegExp HF.DENY) aus String (string s)
 HF.deny=function(s){d=s.match(HF.DENY);return(d?s.replace(HF.DENY,''):s)}

//zum Ausrichten der Kopfzeilenfelder einer Tabelle
 // o = Zeiger auf gerenderte Tabelle zum Lesen
 // t = Zeiger auf Parent-Element der Zielfelder
 HF.getsetColPos=function(o,t,z){
  o=o.firstChild.firstChild // auf erste Zeile
  z?o=o.nextSibling:''; // ggf. auf zweite Zeile
  W=o.scrollWidth // gesamte Breite auslesen (PX)
  E=[] // Ergebnise speichern
  P=0 // Positionszeiger
  o=o.firstChild // auf erstes Quell-Feld
  f=W/t.scrollWidth // Verhältnis für Korrekturfaktor
  t=t.firstChild // auf erstes Ziel-Feld
  do{
    E.push([P+'%',(w=o.scrollWidth/W*100*f)+'%',f])
    with(t.style){position='absolute';left=P+'%';width=w+'%'};
    P+=w
  }while((o=o.nextSibling)&&(t=t.nextSibling))
  return(E)
 };
 HF.getsetColPos2=function(o,t){//dto für überbreite Tabelle (Zahlungen)
  o=o.firstChild.firstChild // auf erste Zeile
  P=0 // Positionszeiger
  o=o.firstChild // auf erstes Quell-Feld
  t=t.firstChild // auf erstes Ziel-Feld
  do{
    with(t.style){position='absolute';left=P+'PX';width=(w=o.scrollWidth)+'PX'};
    P+=w
  }while((o=o.nextSibling)&&(t=t.nextSibling))
 };

HF.checkInputDecimal=function(o){//für Dezimalwerte (ersetzt , durch .)
  o.value=o.value.replace(/,/g,'.')
  return(o.value)
 };
 HF.checkInputAlphaNum=function(o){//sperrt " und ersetzt ' durch echtes Hochkomma
  o.value=o.value.replace(/'/g,String.fromCharCode(8217)).replace(/"/g,'')
  return(o.value)
 };
 HF.checkInputALPHANum=function(o){//für PLZ, IBAN, BIC, etc.
  o.value=o.value.toUpperCase().replace(/[^A-Z0-9 *]/g,'')
  return(o.value)
 };
 HF.checkInputNumPlus=function(o){//für internat. Teil von Telefonnummern
  o.value=o.value.replace(/[^0-9 \+*]/g,'')
  return(o.value)
 };
 HF.checkInputNum=function(o){//für Telefonnummern
  o.value=o.value.replace(/[^0-9 \-*]/g,'')
  return(o.value)
 };
 HF.checkInputEmail=function(o){//für Email-Adressen
  o.value=o.value.replace(/[^a-zA-Z0-9\-\.@*]/g,'')
  return(o.value)
 };
 HF.checkInputDENY=function(o){//entfernt Zeichen laut (RegExp HF.DENY) aus value
  o.value!=(d=HF.deny(o.value))?o.value=d:''
  return(o.value)
 };

//verfolgt gleichzeitig 3 HTML-Elemente für Datum:
 HF.checkInputDate=function(T,M,J){//für Datum (T,M,J sind die HTML-Elemente für Tag,Monat,Jahr)
  if(T.value&&M.value&&J.value){
   d=new Date(J.value,M.value-1,T.value)//zur evtl. Berichtigung Datum bilden
   T.value=('00'+d.getDate()).slice(-2)//Tag value berichtigen
   M.value=('00'+(d.getMonth()+1)).slice(-2)//Monat value berichtigen
   J.value=''+d.getFullYear()//Jahr value berichtigen
   return(('0000'+J.value).slice(-4)+'-'+M.value+'-'+T.value)//Rückgabe ist Datum-String (z.B.:"2016-11-09")
  }else{return('')}
 };

HF.gHTMLnum=function(s,a,p,d){//gibt Options-HTML mit Nummernbereich zurück (start,-?anzahl,preselected?,füll-digits?) z.B.: (1,31,0,'00') oder (2016,-100,2016,'0000')
  D=[]
  for(i=s;i<s+Math.abs(a);i++){v=d?(d+i).slice(-(d.length)):i;D.push(ON({va:v,xs:p&&p==i?1:0})+v+eON)}
  return(a<0?D.reverse().join(''):D.join(''))//bei negativer Anzahl wird absteigend sortiert
 }

HF.Audio=function(sr){GO('AUDIO').innerHTML=sr?AU({sr:sr,ap:1})+eAU:''};

// Info-String (wie bei HF.usrStatus)
 HF.getInfoArray=function(S){return(S.match(/([a-z]{2})([^a-z]*)?/g))}; //gibt Array mit Einträgen zurück
 HF.getInfo=function(S,s){return((S=S.match(eval('/.*('+s+'[^a-z]*).*/')))?S[1]:'')}; // fragt bestimmten Eintrag ab
 HF.setInfo=function(S,s){return(S.replace(eval('/(.*)('+s.slice(0,2)+'[^a-z]*)(.*)/'),'$1'+(s)+'$3')) }; // ändert den Inhalt eines Eintrages

//Math.Round   Erweiterung für Math.round rundet auf s Stellen nach dem Komma
 Math.Round=function(v,s){
  var d=parseInt('1'+HF.repl('0',s))
  return(Math.round(v*d)/d)
 };

//TF// ##### Trigonometrische Funktionen ##### Martin Rebhan 2002
 TF={
  rad:function(x,y){return(Math.sqrt((x*x)+(y*y)))},
  grad:function(x,y){with(Math){if(x>=0){return(y>=0)?(90+atan(y/x)/PI*180):(-atan(x/y)/PI*180)}else{return(y>=0)?(180-atan(x/y)/PI*180):(270+atan(y/x)/PI*180)}}},
  arcv:function(teiler){v=(180/teiler);return Math.floor(((180/teiler)+this.grad(x,y))/360*teiler)},
  arcx:function(g,r){with(Math){return r*sin(g*PI/180)}},
  arcy:function(g,r){with(Math){return g==90?0:-r*cos(g*PI/180)}},
  arcc:function(g,r){with(Math){return{x:r*sin(b=g*PI/180),y:g==90?0:-r*cos(b)}}}
 };

/*##### Trigonometrische Funktionen für php #####
 function rad($x,$y){return(sqrt($x*$x+$y*$y));};
 function grad($x,$y){$PI=3.141592653589;if($x>=0){return($y>=0)?(90+atan($y/$x)/$PI*180):(-atan($x/$y)/$PI*180);}else{return($y>=0)?(180-atan($x/$y)/$PI*180):(270+atan($y/$x)/$PI*180);}};
 function arcx($g,$r){$PI=3.141592653589;return $r*sin($g*$PI/180);};
 function arcy($g,$r){$PI=3.141592653589;return $g==90?0:-$r*cos($g*$PI/180);};*/

//S4
 HF.imgPLL=HF.imgPLL||(HF.L3.match(/https:/)?'https://impal.org/img/':'img/');
 HF.imgPLC=HF.imgPLC||'img/';
 HF.imgPre=/([A-Z_a-z0-9]*)=([A-Z_a-z.\/0-9]*),?/g;
 eval(HF.ImgLL.replace(HF.imgPre,"(HF.Imgs.$1=new Image()).src='"+(HF.imgPLL)+"$2"+(location.href.match(/#imgrefresh/i)?'?a='+Date.now():'')+"';"));
 eval(HF.ImgLC.replace(HF.imgPre,"(HF.Imgs.$1=new Image()).src='"+(HF.imgPLC)+"$2';"));
 HF.ImgLS?eval(HF.ImgLS.replace(HF.imgPre,"(HF.Imgs.$1=new Image()).src='KiGa/img/$2';")):'';
 HF.Slang?document.getElementById('LMAIN').style.backgroundImage="url("+HF.Imgs.bgi00.src+")":'';
 N0=I_({sr:I0=HF.Imgs.I0.src});N100=I_({sr:I0,wd:'100%',ht:'100%'});//IT=function(w,h){return(I_({sr:I0,wd:w||nul,ht:h||nul}))};

write=function(cont,targ,o){(o=parent.document.getElementById(targ))&&(o.innerHTML=cont)};
 SO=function(n,o){return((o=document.getElementById(n))&&o.style||'')};
 GO=function(n){return(document.getElementById(n)||'')};
 nO=function(){
  HF.icZ=(HF.icz=HF.ic/10)?HF.icz:'';HF.ic%10?'':write('123456789'.replace(/(.)/g,D_('pal0PXt0PX,idLE'+HF.icZ+'$1;')+eD)+D_('pal0PXt0PX,idLE'+(HF.icZ+1)+'0;')+eD,('LE'+HF.ic++));
  return('LE'+HF.ic++)
 }
 gO=function(nm){return(HF.NO[nm]||(HF.NO[nm]=nO()))};
 gF=function(id,fn){return(frames['FI'+id].document.forms[0].elements[fn].value)};

SO('LMAIN').fontSize=MRdE?'16PX':'12PT';  // ##############  !!!!!  BASE-FONT   !!!!!   ###########

Key=key=0;DO=false;Z=500;xK=yK=0;
 mo={on:'',ow:'',ol:'',dn:'',dw:'',dl:'',un:'',uw:'',ul:'',m:''};

keyhandler=function(e){
  Key=e?e.which:window.event.keyCode;
  if(K=HF.Keys[Key]){
   !HF.kD&&K['on'+e.type]?eval(K['on'+e.type]):'';
   K.preventDefault&&e.preventDefault?e.preventDefault():'';
  }
  HF.Key=Key;
  if(e.type=='keydown'){HF.KeyDn=Key;HF.KeyUp='';HF.KEY|=(Key==16?1:0)|(Key==17?2:0)|(Key==18?4:0)}
  if(e.type=='keyup'){HF.KeyUp=Key;HF.KeyDn='';HF.KEY=0}
  HF.KeyDo();
  return Key
 };
 document.onkeydown=keyhandler;
 document.onkeyup=keyhandler;
 
 document.ONMOUSEMOVE=document.onmousemove=function(e){  // globale Maus-Kontroll-Prozedur
  MRdE?(HF.scroff=e?1:0):'';
  e?'':e={pageX:window.event.clientX,pageY:window.event.clientY};
  HF.mK='';
  if(!HF.noXY){
   HF.mX=[mx=(HF.mpX=e.pageX)+(scrofs=HF.scroff?parseInt(HF.goMDI.style.left):0)/*+(document.body.scrollLeft)*/,scrofs,HF.ppx||0,HF.mpX||0];HF.ppx=0;
   HF.mY=[my=(HF.mpY=e.pageY)+(scrofs=HF.scroff?parseInt(HF.goMDI.style.top):0)/*+(document.body.scrollTop)*/,scrofs,HF.ppy||0,HF.mpY||0];HF.ppy=0;
  }
  if(DO.sy){
   DO.f0?(DO.f0(e))+(DO.f0=''):'';
   z=DO.drz&&DO.drz>1?DO.drz:1;   
   wx=parseInt((mx-DO.dx)/z)*z;
   wy=parseInt((my-DO.dy)/z)*z;
   DO.dr&&DO.dr&1?DO.sy.left=(DO.drxm?(wx<DO.drxm[0]?DO.drxm[0]:wx>(xm1=DO.dr&4?DO.m.x+DO.dw-DO.drxm[2]:DO.drxm[1])?xm1:wx):wx)+px:'';
   DO.dr&&DO.dr&2?DO.sy.top= (DO.drym?(wy<DO.drym[0]?DO.drym[0]:wy>(ym1=DO.dr&8?DO.m.y+DO.dh-DO.drym[2]:DO.drym[1])?ym1:wy):wy)+px:'';
   DO.c&&DO.dr&1?DO.c.left=-(((DO.cW-DO.cw)*((parseInt(DO.sy.left)-DO.drxm[0])/(DO.drxm[1]-DO.drxm[0])))<<0)+px:'';
   DO.c&&DO.dr&2?DO.c.top=- (((DO.cH-DO.ch)*((parseInt(DO.sy.top)-DO.drym[0])/(DO.drym[1]-DO.drym[0])))<<0)+px:'';

if(DO.dr>3){
    nw=Math.ceil((DO.dw+(DO.dr&1?DO.m.x-(wx=wx<0?0:wx):wx-DO.m.x))/z)*z;
    nh=Math.ceil((DO.dh+(DO.dr&2?DO.m.y-(wy=wy<0?0:wy):wy-DO.m.y))/z)*z;
    DO.dr&&DO.dr&4&&DO.dw?DO.sy.width= (DO.drxm?(nw<DO.drxm[2]?DO.drxm[2]:nw>(xm3=DO.dr&1?nw+wx:DO.drxm[3])?xm3:nw):nw)+px:'';
    DO.dr&&DO.dr&8&&DO.dh?DO.sy.height=(DO.drym?(nh<DO.drym[2]?DO.drym[2]:nh>(ym3=DO.dr&2?nh+wy:DO.drym[3])?ym3:nh):nh)+px:'';
   }
   DO.f?DO.f(e):'';DO.f1?(DO.f1(e))+(DO.f1=''):'';
  }
  if(HF.FOF){HF.FOF(e)}
  for(var i in HF.FO){HF.FO[i](e)}

return false;
 };

show=function(n,p){SO(n).visibility='visible';p?SO(n).position='':''};
 shoW=function(o,p){o.visibility='visible';p?o.position='':''};
 shOW=function(o,l,t){with(o){visibility='visible';l?left=l+px:'';t?top=t+px:''}};
 hide=function(n,p){SO(n).visibility='hidden';p?SO(n).position='absolute':''};
 hidE=function(o,p){o.visibility='hidden';p?o.position='absolute':''};
 shif=function(obj,sh,p){sh?show(obj):hide(obj);p?(SO(obj).position=sh?'':'absolute'):''};
 shiF=function(obj,sh,p){sh?shoW(obj):hidE(obj);p?(obj.position=sh?'':'absolute'):''};
 swap=function(os,oh,p){hide(oh);show(os);if(p){SO(oh).position='absolute';SO(os).position=''}};
 swaP=swap;

// ##### DBOX erzeugen #####
 write(
  D_('pal0PXt0PXw6PXh6PXoh,idDBOX;')+
   D_('pal0PXt0PXw100%h3PX')+I_({sr:HF.Imgs.cmshr.src,wd:'100%',ht:3,sy:{a:1}})+eD+
   D_('pal3PXt0PXw3PXh100%,idDBOXv;')+I_({sr:HF.Imgs.cmsvr.src,wd:3,ht:'100%'})+eD+
   D_('pal0PXt3PXw100%h3PX,idDBOXh;')+I_({sr:HF.Imgs.cmshr.src,wd:'100%',ht:3,sy:{a:1}})+eD+
   D_('pal0PXt0PXw3PXh100%')+I_({sr:HF.Imgs.cmsvr.src,wd:3,ht:'100%'})+eD+
  eD,gO('DBOX')
 );SO('DBOX').left=-(9<<9)+px;

drag=draG=function(o,ro){
  if(ro){o.id=ro.id;o.sy=ro.style}else{o.id=o.id||o.o;o.sy=SO(o.id);o.o=GO(o.id);o.dr=o.dr||3;o.m={x:0,y:0}}
  p=o.o;
  do{p=p.parentNode}while(!p.style.position)//ermitteln der effektiven parent node
  o.p=p;//und speichern
  o.mem={l:0,t:0,w:0,h:0}
  with(o.sy){//alle '%'-Werte in 'PX' umrechnen
   if(parseAlpha(left)=='%'){o.mem.l='%';left=(parseFloat(left)*p.scrollWidth/100)+px}
   if(parseAlpha(top)=='%'){o.mem.t='%';top=(parseFloat(top)*p.scrollHeight/100)+px}
   if(parseAlpha(width)=='%'){o.mem.w='%';width=(parseFloat(width)*p.scrollWidth/100)+px}
   if(parseAlpha(height)=='%'){o.mem.h='%';height=(parseFloat(height)*p.scrollHeight/100)+px}
   //* 3.785 / 100
   if(parseAlpha(left)=='MM'){o.mem.l='MM';left=(parseFloat(left)*3.785/100)+px}
  }
    
  //Start-Parameter festlegen
  o.dx=mx-parseInt(o.sy.left);o.m?o.m.x=o.xS?o.xS:mx-o.dx:'';
  o.dy=my-parseInt(o.sy.top);o.m?o.m.y=o.yS?o.yS:my-o.dy:'';
  o.dw=parseInt(o.sy.width);
  o.dh=parseInt(o.sy.height);
  o.time=Date.now()
  DO=o//fertiges o an globales DO übergeben
  if(o.dBox){
   HF.tDO=DO;
   DO={
    id:'DBOX',sy:SO('DBOX'),m:{x:parseInt(DO.sy.left),y:parseInt(DO.sy.top)},
    dr:o.dr||3,dx:o.dx,dy:o.dy,dw:o.dw,dh:o.dh,mem:o.mem,p:o.p,
    f1:function(){SO(gO('DBOX')).zIndex=(Z++);SO('DBOX').zIndex=(Z++)},
    f:function(){SO('DBOXv').left=(parseInt(DO.sy.width)-3)+px;SO('DBOXh').top=(parseInt(DO.sy.height)-3)+px}
   };
   with(DO.sy){left=HF.tDO.sy.left;top=HF.tDO.sy.top;width=HF.tDO.sy.width;height=HF.tDO.sy.height;zIndex=(Z++)};
   DO.f();
   document.onmouseup=function(){
    with(droP().sy){HF.tDO.sy.left=left;HF.tDO.sy.top=top;HF.tDO.sy.width=width;HF.tDO.sy.height=height};
    droP[o.dn]?droP[o.dn](o.dr):'';
    SO('DBOX').left=-(9<<9)+px;document.onmouseup=Frf;
   };
  };
 };

drop=droP=function(o){
  if(!DO){return}
  DO.time=HF.dTime=Date.now()-DO.time;
  if(DO.mem){
   with(DO.sy){//ggf. 'PX'-Werte wieder in '%' umrechnen
    if(DO.mem.l=='%'){left=(parseFloat(left)/DO.p.scrollWidth*100)+'%'}
    if(DO.mem.t=='%'){top=(parseFloat(top)/DO.p.scrollHeight*100)+'%'}
    if(DO.mem.w=='%'){width=(parseFloat(width)/DO.p.scrollWidth*100)+'%'}
    if(DO.mem.h=='%'){height=(parseFloat(height)/DO.p.scrollHeight*100)+'%'}
    if(DO.mem.l=='MM'){left=(parseFloat(left)/3.785*100)+'MM'}
   }
  }
  if(DO.drop){DO.drop()}
  ret=DO;DO=false;return ret;
 };

document.onselect=Frf;
 document.ondragstart=Frf;

write(//Ebenen für Menüsystem/Alert/Confirm/Prompt einrichten
  D_('pal0PXt50PXw'+(gsw()-70)+'PXh'+gsh()+'PXvh,idLS;moCMS.Menu.outMP(1);md#md;').replace(/#md/,"with(parent){CMS.Menu.sc(1)};"+rF)+eD+
  D_('pal0PXt0PXw'+gsw()+'PXh20PXvhwsPREcDEFAULT,idLAMB;maCMS.Menu.outMB();')+eD+
  D_('pal0PXt0PXwsPREcDEFAULT,idLACM;')+eD+
  D_('pal0PXt0PXw0PXh0PX,idLAM;')+eD+
  D_('pal0PXt0PXvhffARIALfs9PTwsPRE,idLARD;')+eD
  ,'LA'
 )

cmsMen=Frf;

//IFrame für PWA
 //write(FI({nm:'FIPWA',sr:'HTML.htm',wd:'0PX',ht:'0PX',xsy:{a:1,v:-1,o:-1}})+eFI,gO('CFI'+'PWA'));

Array2CSV=function(R){//CSV-Array wieder hochladefähig machen
  var R,t,z,s
  for(t=0;R[t];t++){
   for(z=0;R[t][z];z++){
    for(s=0;R[t][z][s]||R[t][z][s]=='';s++){
     R[t][z][s]="'"+R[t][z][s]+"'"//alle Felder mit ' versehen
    }
    R[t][z]=R[t][z].join(',')//alle Felder mit , trennen
   }
   R[t]=R[t].join('\n')//alle Zeilen mit \n trennen
  }
  return(R.join('\n\n'))//alle Tabellen mit \n\n trennen
 }

//Dropfähigkeit einrichten
 makeDropable=function(doc){//doc=document, das Drag/Drop erhalten soll
  doc.addEventListener('drop',function(e){
   e.preventDefault()
   if(BB.Flag){
    if(BB.FileListProtectPuzzles()||HF.DropUploadFlag){return}
    HF.DropUploadFlag=1//Drop auf document
    BB[HF.newUploadFlag?'NewUploadCheck':'FileListUploadCheck']({files:e.dataTransfer.files})
   }else{Confirm('Sie müssen eingeloggt sein, um Dateien hochzuladen.',{OK:""},1)}
  },false);
  doc.addEventListener('dragover',function(e){e.preventDefault()},false);
 };
 makeDropable(document);

getEleKoords=function(o){//Koordinaten eines Elements ermitteln
  W=o.offsetWidth
  H=o.offsetHeight
  L=T=0
  while(o.tagName!='BODY'){L+=o.offsetLeft;T+=o.offsetTop;o=o.offsetParent}
  return({L:L,T:T,W:W,H:H})
 };

// Alternative Alert-Anzeige (mit schrittweiser Ausblendung)
// Autor:Martin Rebhan LEARC / IMPAL
// Systax:Alert(string Text[,number zusätzliche Wartezeit in Sekunden])
// Beispiel:Alert('Hallo!',5)
Alert=function(a,z){
 z=Math.abs(z||0)*1000;
 with(SO('LAM')){width=gsw()+px;height=gsh()+px;opacity=1;zIndex=(Z++)}
 Alert.TMs=[]
 GO('LAM').onmouseup=function(){Alert.off();return(HF.dG?true:false)};
 GO('LAM').innerHTML=
  D_('pal0PXt0PXw100%h100%bc#000op0.4')+eD+
  T_('pal0PXt0PXw100%h100%fs1EM')+TR()+TD({an:'CENTER',vn:'MIDDLE'})+
   T_({sy:{p:'2EM',bc:HF.Color.C.C,bs:'0PX 0PX 10PX #000',b:'2PX #F00 SOLID'}})+
    TR()+TD()+TC(a)+
   eT+
  eT;
  show('LAM')
  for(i=10;i>=1;i--){Alert.TMs[i]=setTimeout("SO('LAM').opacity="+(i/10),z+7000-i*50)}
  Alert.TMs[0]=setTimeout("Alert.off()",z+7000-i*50)
  return''  
};
Alert.off=function(){for(var i in Alert.TMs){clearTimeout(Alert.TMs[i])};with(GO('LAM')){innerHTML=onmousedown=onmouseup=''};with(SO('LAM')){width=height='0PX'}}

//if(location.href.match(/^https:\/\/impal.org/)){
// Alert(T_()+TR()+TD('taCENTERtvMIDDLE')+'Willkommen bei ImPal.org<br><br>Die Module werden geladen'+eT)
//}

// Alternative Confirm/Prompt-Anzeige (mit schrittweiser Ausblendung)
// Autor:Martin Rebhan LEARC / IMPAL
// Systax:Confirm(string Text,object Buttons[,boolean flag_kein_AbbruchButton])
// Beispiel:Confirm('Wählen Sie!',{Ja:"Func1()",Nein:"Func2(a,b,c)",Test:"Func3()",...},1)
Confirm=function(a,b,f,n,p,e){
 B=[];P=[];
 for(var i in p){P.push(TR()+TD(',anRIGHT;')+i+': '+TD()+IX({nm:'CoPr',mo:"HF.dG=1",ma:"HF.dG=0",va:p[i]}))}
 p?B.push(IX({ty:'BUTTON',mu:"var i,P=document.getElementsByName('CoPr'),V=[];for(i=0;P[i];i++){V[i]=P[i].value};"+e+"(V);Confirm.off("+(n||0)+");",va:"OK"})):'';
 for(var i in b){B.push(IX({ty:'BUTTON',mu:"setTimeout('"+b[i]+"',250);Confirm.off("+(n||0)+")",va:i}))}
 f?'':B.push(IX({ty:'BUTTON',mu:"Confirm.off("+(n||0)+");",va:"abbrechen"}));
 with(SO('LAM')){width=gsw()+px;height=gsh()+px;opacity=1;zIndex=(Z++)}
 GO('LAM').onmousedown=function(){return(HF.dG?true:false)};
 GO('LAM').innerHTML=
  D_('pal0PXt0PXw100%h100%bc#000op0.4')+eD+
  T_('pal0PXt0PXw100%h100%fs1EM')+TR()+TD({an:'CENTER',vn:'MIDDLE'})+
   T_({sy:{p:'2EM',bc:HF.Color.C.C,bs:'0PX 0PX 10PX #000',b:'2PX #F00 SOLID'}})+
    TR()+TD('pb1EM,cn2;anCENTER;')+TC(a)+
    (p?TR()+TD('wsPRE,anCENTER;')+P.join('  '):'')+
    TR()+TD('pt1EMwsPRE,cn2;anCENTER;')+B.join('  ')+
   eT+
  eT;
  show('LAM')
  return''  
};
Confirm.off=function(n){
 if(!n){
  for(i=10;i>=1;i--){setTimeout("SO('LAM').opacity="+(i/10),700-i*50)}
  setTimeout("GO('LAM').innerHTML='';with(SO('LAM')){width='0PX';height='0PX'}",700-i*50)
 }else{GO('LAM').innerHTML='';with(SO('LAM')){width='0PX';height='0PX'}}
}

CMS={};BB=FTP='';

HF.Licen='Gastwirtschaft Hauckensepper';
HF.L3.match(/#admin/)?HF.Admin=1:'';
HF.imgPLL='https://impal.org/img/';
HF.ImgLC='bgi00=img/pattern.jpg,bgi01=B01.jpg,bgi10=img/pattern.25.jpg,bgi11=img/pattern.50.jpg,bgi12=0.gif';
HF.ImgLS='';
HF.Color={
 //Bn:['#000011','#00003C','#0000AA','#0000D1','#00006D'],//blau
 Bn:['#001100','#003C00','#B9B67F','#00D100','#006D00'],
 //c:{c:'#000000',H:'#CECFCE',D:'#696A69',C:'#A0A0A0',P:'#959595'},
 c:{c:'#000000',H:'#B9B67F',D:'#53512D',C:'#ABA875',P:'#7D7A43'},
//{C:'#7D7A43',D1:'#7D7A43',D2:'#53512D',H2:'#B9B67F',bi:'B11.jpg'}ABA875
 C:{h:'#E0E0E0',c:'#000000',H:'',D1:'#000000',H1:'',D2:'',H2:'',C:'#A0A000',d:''},
 XCA:['#000091','#BA8A12','#A0A000','#00A000','#00A0A0','#6060A0','#A00000'],
 //CA:['#A0A000','#00A8A0','#BA8A12','#BA8A12','#BA8A12','#BA8A12','#BA8A12']
 CA:['#BA8A12','#BA8A12','#BA8A12','#BA8A12','#BA8A12','#BA8A12']
};
HF.URL='';

//HF.mALOl=180;HF.mALOt=30;HF.mALOw=gsw()-HF.mALOl-20;HF.mALOh=gsh()-HF.mALOt-10;HF.mALObgi='bgi11';
//HF.mALOr=20;HF.mALOu=20;HF.mALOhh=90;HF.mALObc='#FFFFFF';HF.mALObi='beispiel.hintergrund.jpg';HF.mALObgR=1;HF.mALOsrR=0;
//if(location.href.match(/puzzle/)){HF.mALOlPuzzle=-1;HF.mALOtPuzzle=-1;HF.mALOwPuzzle=gsw()-HF.mALOlPuzzle;HF.mALOhPuzzle=gsh()-HF.mALOtPuzzle;}
//if(location.href.match(/puzzle/i)){/*HF.mALOpl=11;HF.mALOpr=11;HF.mALOpb=26;*/HF.mALObgf=1;}

(HF.mALOrefresh=function(){
 //w8=gsw()>>3;HF.mALOl=w8+156;HF.mALOt=90;HF.mALOw=w8*6-156;HF.mALOh=gsh()-HF.mALOt-10;HF.mALOp=2;HF.mALObgi='bgi11';//#53512D
 HF.mALOt=20;HF.mALOw=802;HF.mALOl=(gsw()-HF.mALOw)>>1;HF.mALOh=gsh()-HF.mALOt;HF.mALOp=2;HF.mALObgi='bgi11';//#53512D
 HF.mALOr=20;HF.mALOu=20;HF.mALOhh=0;HF.mALOhhPuzzle=0;HF.mALObc='#FFFFFF';HF.mALObgR=1;HF.mALOsrR=0;
 HF.MR_M={x:HF.mALOl-156,y:100,fy:100,w:156,h:500,gg:0,ggc:['333399','555599'],h1:28,f1:12,c0:'#FFFFFF',c1:'#008000',bg0:'21',bg1:'20',nf:1,Slang:['s'],p:2,d:0};
 HF.RgX=180;HF.RgY=170;HF.RgW=gsw()-180-10;HF.RgH=gsh()-170-10;HF.RgHH=80;HF.RgC='r.';
})();

HF.scrBGc='#B9B67F';HF.scrBGce='#7D7A43';

HF.cntUnbenannt=0;

HF.sav1='HS';

LEAFlyer1=['Seite1','Seite2','Seite3','Seite4','Seite5','Seite6','Seite7','Seite8'];
LEAFlyer1.open=function(){
 for(iLc=0;iLc<LEAFlyer1.length;iLc++){
  (f=frames.FIFlyer1)&&f.document&&f.document.forms&&f.document.forms[0]&&f.document.forms[0].getHours&&(lex=f.document.forms[0].elements[LEAFlyer1[iLc]])&&lex.value?unpack():'';
 };LEAFlyer1='';
};
write(
 D_('pal0t3w800h67bc#CCCCCC,idDFFlyer1;')+
  FI({nm:'FIFlyer1',sr:'/db/servermrt.neu.php?o=Flyer1&t=Flyer1&ad=1',wd:'100%',ht:'100%'})+eFI+
 eD,gO('CFI'+'Flyer1')
);

//testerei=function(){
LEASysExt=['PWA','KeysDef'];
LEASysExt.open=function(){
 for(iLc=0;iLc<LEASysExt.length;iLc++){
  (f=frames.FISysExt)&&f.document&&f.document.forms&&f.document.forms[0]&&f.document.forms[0].getHours&&(lex=f.document.forms[0].elements[LEASysExt[iLc]])&&lex.value?unpack():alert(9);
 };LEASysExt='';
};
write(
 D_('pal0t0w800h1bc#CCCCCC,idDFSysExt;')+
  FI({nm:'FISysExt',sr:'/db/servermrt.neu.php?o=SysExt&t=SysExt&ad=1',wd:'100%',ht:'100%'})+eFI+
 eD,gO('CFI'+'SysExt')
);