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=()=>{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=()=>{return''};px='PX';nBsP=String.fromCharCode(160);
 parseAlpha=(v)=>{return(v.replace(/[^a-z%]*/gi,''))};
 eval("gsw=()=>{return "+(MRdN?"self.innerWidth;":"document.body.clientWidth;")+"};");
 eval("gsh=()=>{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:',
   bz:'border-collapse:',
   r:'border-radius:',
   i:'border-image:',
   in:'inset:',
   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:',
   bx:'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:',
   cc:'caret-color:',
   v:'visibility:',
   vh:'visibility:hidden',
   vv:'visibility:visible',
   o:'overflow:',
   ox:'overflow-x:',
   oy:'overflow-y:',
   ol:'outline:',
   hx:'overflow-x:hidden',
   hy:'overflow-y:hidden',
   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_2DIVa1ID2IDIVa1DL2DLa1!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_2SPANa1ES2ESa1CS2CSa1DS2DSa1ZT2STRIKEa1SG2STRONGa1SY2STYLEty!fdrlatlmiSB2SUBa1SP2SUPa1T_2TABLEa1frbdcpcsrusuwd!danbcTB2TBODYa1anvnyayoTD2TDa1anabaxcnhdrnspvnyayo!dhtwdbc!dzwXY2TEXTAREAcl!fa1ofobogosolxraytixdnmrwphYF3TFOOTa1anvnyayoTH3THa1anabaxcnhdrnspvnyayo!dhtwdbc!dzwYH3THEADa1anvnyayoTL2TITLEdrlaTR2TRa1anvnyayo!dbcTT2TTa1ZU2Ua1UL2ULa1!dtyxcVA2VARa1VI2VIDEOa1'.replace(/a1/g,'iddrlaocodkdkpkumdmmmomamucmowtlsyyc'),
  Atts:'idIDdrDIRlaLANGocONCLICKodONDBLCLICKkdONKEYDOWNkpONKEYPRESSkuONKEYUPmdONMOUSEDOWNmmONMOUSEMOVEmoONMOUSEOVERmaONMOUSEOUTmuONMOUSEUPcmONCONTEXTMENUosONSCROLLtlTITLEsySTYLEycCLASSanALIGNatALTshSHAPEtiTABINDEXtgTARGETtyTYPEhfHREFreRELrvREVhlHREFLANGysCHARSETcoCOORDSfrFRAMEbdBORDERcpCELLPADDINGcsCELLSPACINGruRULESsuSUMMARYabABBRaxAXIScnCOLSPANhdHEADERSrnROWSPANspSCOPEzwNOWRAPvnVALIGNyaCHARyoCHAROFFsnSPANceCITEclCOLSctCONTENTdtDATETIMExfDEFERxdDISABLEDhtHEIGHTwdWIDTHhqHTTP-EQUIVxiISMAPllLABELldLONGDESCfbFRAMEBORDERscSCROLLINGmhMARGINHEIGHTmwMARGINWIDTHmiMEDIAnmNAMExzNORESIZEozONRESIZEoeONLOADoxONUNLOADpfPROFILEphPLACEHOLDERrwROWSmsSCHEMExsSELECTEDszSIZEsrSRCspSTEPlrLOWSRCumUSEMAPvaVALUEvtVALUETYPEakALINKbgBACKGROUNDlkLINKtxTEXTvkVLINKbcBGCOLORcrCLEARxcCOMPACTlgLANGUAGEzeNOSHADEzrPROMPTstSTARTveVERSIONzsHSPACEvsVSPACEcdCODEzjOBJECTfcCOLORzfFACExcAUTOCOMPLETEacACCEPT-CHARSETeyENCTYPEmtMETHODomONSUBMITorONRESETaoACTIONapACCEPTxkCHECKEDmxMAXmnMINmlMAXLENGTHofONFOCUSobONBLURogONCHANGEotONSELECToiONINPUTowONWHEELxrREADONLYlfFORxmMULTIPLExhNOHREFayACCESSKEYarARCHIVEcbCODEBASEceCONTENTEDITABLEyiCLASSIDcyCODETYPEdaDATAxaDECLAREsbSTANDBYapAUTOPLAYauAUTOSTARTopONPLAYctCONTROLShdHIDDENlpLOOP',
  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,
  Lgo:1,
  Imgs:{},
  Urls:{},
  L3:document.referrer||location.href,
  IXmu:"v=value;h=outerHTML;outerHTML=h;GO(id).value=v",
  ImgLL:[
   'I0=0.gif',

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

'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',
   'cms9949=cms.BB.lineBreak.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',

'cmsResize=cms.resize.gif',//CE+HB
   'cmsVResize=cms.vresize.gif',//FL+HB
   'cmsHResize=cms.hresize.gif',//FL+HB
   '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=(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)
 };

//erstellt String wie "1965-04-19 00:20:00" aus Timestamp 
 HF.Timestamp=(ts)=>{
  ts=new Date(ts||Date.now())
  return(ts.getFullYear()+'-'+('0'+(ts.getMonth()+1)).slice(-2)+'-'+('0'+ts.getDate()).slice(-2)+' '+('0'+ts.getHours()).slice(-2)+':'+('0'+ts.getMinutes()).slice(-2)+':'+('0'+ts.getSeconds()).slice(-2))
 };
 
 // ##### HF.Source( objekt [,formatiert] ) ##### Gibt rekursiv Objekt-Quellcode als String zurück
 HF.Source=(o,m)=>{pR='',pC=0;pR=m?HF.Source.part.mL(o):HF.Source.part.sL(o);return(pR)};
 HF.Source.part={
  mL:(o)=>{ // Ausgabe mehrzeilig mit Einrückung formatiert
   pC++
    var 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:(o)=>{ // Ausgabe in einer Zeile
   var 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=(o)=>{var 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=(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=(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('')):'')+
    (a.split(',')[0]?' 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=(t)=>{return t};
 makeAtObj=(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=(a)=>{return('<$3'+makeAtStr(a)+'>')};"+
  "_$3=(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=(t,a)=>{return(eval('_'+t+'(a)'))};//nur eine Zeile z.B.: HTMLtoQx1('TABLE','width="30" border="1"')
 HTMLtoQx=(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=(n)=>{return(n.match(/\.(jpe?g?)?(png)?(gif)?(bmp)?$/i))};
 HF.isJPG=(n)=>{return(n.match(/\.jpe?g?$/i))};
 HF.isPNG=(n)=>{return(n.match(/\.png$/i))};
 HF.isGIF=(n)=>{return(n.match(/\.gif$/i))};
 HF.isBMP=(n)=>{return(n.match(/\.bmp$/i))};
 HF.isAudio=(n)=>{return(n.match(/\.mpe?g?3$/i))};
 HF.isVideo=(n)=>{return(n.match(/\.mpe?g?4$/i))};
 HF.isDoc=(n)=>{return(n.match(/\.(html?)$/i))};
 HF.isTxt=(n)=>{return((n=n.match(/\.(txt)?(css)?(csv)?(js)?$/i))&&n[0].slice(1).toLowerCase())};
 //gültiges Bild oder Symbol zurückgeben
 HF.getImgOrSym=(n)=>{return(HF.isImg(n)?n+'?a='+Date.now():I0)};

//String c wird n-mal zurückgegeben
 HF.repl=(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=(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=(v,m)=>{return((''+v).split('').reverse().join('').replace(eval('/('+m+')/g'),'$1.').replace(/\.$/,'').split('').reverse().join(''))};

HF.Rnd=(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=(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=(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=(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=(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=(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=(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=(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=(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=(e)=>{HF.Whl(e.wheelDelta/120)}:'';//Chrome

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

//gibt Datensatz-Objekt aus Array zurück
 HF.mOfA=mOfA=(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=(o)=>{nmA=[];vaA=[];for(var f in o){nmA.push(f);vaA.push(o[f])};return([nmA,vaA])}
 //verschmelzt zwei Objekte
 HF.merge=(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=(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=(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=(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=(o)=>{//für Dezimalwerte (ersetzt , durch .)
  o.value=o.value.replace(/,/g,'.')
  return(o.value)
 };
 HF.checkInputAlphaNum=(o)=>{//sperrt " und ersetzt ' durch echtes Hochkomma
  o.value=o.value.replace(/'/g,String.fromCharCode(8217)).replace(/"/g,'')
  return(o.value)
 };
 HF.checkInputALPHANum=(o)=>{//für PLZ, IBAN, BIC, etc.
  o.value=o.value.toUpperCase().replace(/[^A-Z0-9 *]/g,'')
  return(o.value)
 };
 HF.checkInputNumPlus=(o)=>{//für internat. Teil von Telefonnummern
  o.value=o.value.replace(/[^0-9 \+*]/g,'')
  return(o.value)
 };
 HF.checkInputNum=(o)=>{//für Telefonnummern
  o.value=o.value.replace(/[^0-9 \-*]/g,'')
  return(o.value)
 };
 HF.checkInputEmail=(o)=>{//für Email-Adressen
  o.value=o.value.replace(/[^a-zA-Z0-9\-\.@*]/g,'')
  return(o.value)
 };
 HF.checkInputDENY=(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=(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=(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=(sr)=>{GO('AUDIO').innerHTML=sr?AU({sr:sr,ap:1})+eAU:''};

// Info-String (wie bei HF.usrStatus)
 HF.getInfoArray=(S)=>{return(S.match(/([a-z]{2})([^a-z]*)?/g))}; //gibt Array mit Einträgen zurück
 HF.getInfo=(S,s)=>{return((S=S.match(eval('/.*('+s+'[^a-z]*).*/')))?S[1]:'')}; // fragt bestimmten Eintrag ab
 HF.setInfo=(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=(v,s)=>{
  var d=parseInt('1'+HF.repl('0',s))
  return(Math.round(v*d)/d)
 };

//TF// ##### Trigonometrische Funktionen ##### Martin Rebhan 2002
 TF={
  rad:(x,y)=>{return(Math.sqrt((x*x)+(y*y)))},
  grad:(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:(teiler)=>{v=(180/teiler);return Math.floor(((180/teiler)+TF.grad(x,y))/360*teiler)},
  arcx:(g,r)=>{with(Math){return r*sin(g*PI/180)}},
  arcy:(g,r)=>{with(Math){return g==90?0:-r*cos(g*PI/180)}},
  arcc:(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=(w,h)=>{return(I_({sr:I0,wd:w||nul,ht:h||nul}))};

write=(cont,targ,o)=>{(o=parent.document.getElementById(targ))&&(o.innerHTML=cont)};
 SO=(n,o)=>{return((o=document.getElementById(n))&&o.style||'')};
 GO=(n)=>{return(document.getElementById(n)||'')};
 nO=()=>{
  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=(nm)=>{return(HF.NO[nm]||(HF.NO[nm]=nO()))};
 gF=(id,fn)=>{HF.a1=id;HF.a2=fn;return(fn&&fn.match(/impalWork/)?'':frames['FI'+id]&&frames['FI'+id].document.forms[0].elements[fn].value)};
 gFo=(id,fn)=>{HF.a1=id;HF.a2=fn;var f;return((f=frames['FI'+id])&&f.document&&(f=f.document.forms)&&f[0]&&f[0].elements[fn].value||'')}//Qeullcode-Formular einlesen
 gFh=(a)=>{//http... Datei einlesen
  HF.sy={
   l:(FM.nxl||0)+'PX',t:(FM.nxt||70)+'PX',w:gsw()+px,h:gsh()-66+px,fs:'1EM',z:1,AnsKLv:1,noAni:1,drt:1,sPc:0,Format:'Usy'
  }
  return(FI({nm:'LEX'+a,sr:a,wd:'100%',ht:'100%',sy:{pa:1,b:'0PX',m:'0PX',p:'0PX',zi:1}}))
 }

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

GO('LE').onmousedown=(e)=>{e&&e.which==2&&e.preventDefault()}//Maus-Taste 2
 GO('LA').onmousedown=(e)=>{e&&e.which==2&&e.preventDefault()}//Maus-Taste 2

Key=key=0;DO=false;Z=500;xK=yK=0;
 mo={on:'',ow:'',ol:'',dn:'',dw:'',dl:'',un:'',uw:'',ul:'',m:''};
 HF.Keys[8]={preventDefault:1}//ü?
 HF.keyIn=(e)=>{with(e.target){return((tagName=='INPUT'||tagName=='TEXTAREA')&&(!id||id!='EDITFORM'))}}
 
 keyhandler=(e)=>{
  e=e||window.event
  Key=e.which||e.keyCode;
  if(K=HF.Keys[Key]){
   !HF.keyIn(e)&&K['on'+e.type]&&console.log(K)
   !HF.keyIn(e)&&K['on'+e.type]&&eval(K['on'+e.type])
   if(Key==8){!HF.keyIn(e)&&e.preventDefault()}else{K.preventDefault&&e.preventDefault&&e.preventDefault()}
  }
  HF.Key=Key;
  HF.KeyDo();
  return Key
 };
 document.onkeydown=keyhandler;
 document.onkeyup=keyhandler;
 
 document.ONMOUSEMOVE=document.onmousemove=(e,noXY)=>{  // globale Maus-Kontroll-Prozedur
  MRdE?(HF.scroff=e?1:0):'';
  e?'':e={pageX:window.event.clientX,pageY:window.event.clientY};
  HF.mK='';
  if(!noXY){
   HF.mX=[mx=((HF.mpX=e.pageX)+(scrofs=HF.scroff?parseInt(HF.goMDI.style.left):0)-parseInt(document.body.style.left||0)),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)-parseInt(document.body.style.top||0)),scrofs,HF.ppy||0,HF.mpY||0];HF.ppy=0;
  };//console.log('ONMOUSEMOVE: mx=',mx)
  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=''):'';
  }
  HF.FOF&&HF.FOF(e)
  for(var i in HF.FO){HF.FO[i](e)}

return false;
 };

show=(n,p)=>{SO(n).visibility='visible';p?SO(n).position='':''};
 shoW=(o,p)=>{o.visibility='visible';p?o.position='':''};
 shOW=(o,l,t)=>{with(o){visibility='visible';l?left=l+px:'';t?top=t+px:''}};
 hide=(n,p)=>{SO(n).visibility='hidden';p?SO(n).position='absolute':''};
 hidE=(o,p)=>{o.visibility='hidden';p?o.position='absolute':''};
 shif=(obj,sh,p)=>{sh?show(obj):hide(obj);p?(SO(obj).position=sh?'':'absolute'):''};
 shiF=(obj,sh,p)=>{sh?shoW(obj):hidE(obj);p?(obj.position=sh?'':'absolute'):''};
 swap=(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=(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:()=>{SO(gO('DBOX')).zIndex=(Z++);SO('DBOX').zIndex=(Z++)},
    f:()=>{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=()=>{
    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=(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.isCM()&&CMS.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 WP
 //write(FI({nm:'FIWP',sr:'HTML.htm',wd:'0PX',ht:'0PX',xsy:{a:1,v:-1,o:-1}})+eFI,gO('CFI'+'WP'));

Array2CSV=(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=(doc)=>{//doc=document, das Drag/Drop erhalten soll
  if(location.href.match(/kindergarten/)){return}
  doc.addEventListener('drop',(e)=>{
   if(!e.dataTransfer||!e.dataTransfer.files||!e.dataTransfer.files.length){return}
   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',(e)=>{e.preventDefault()},false);
 };
 makeDropable(document);

// object.watch * By Eli Grey http://eligrey.com
 if(!Object.prototype.watch){
  Object.defineProperty(Object.prototype,"watch",{
   enumerable:false,
   configurable:true,
   writable:false,
   value:function(prop,handler){
    var
    oldval=this[prop],
    newval=oldval
    getter=function(){return newval}
    setter=function(val){oldval=newval;return newval=handler.call(this,prop,oldval,val)}
    if(delete this[prop]){Object.defineProperty(this,prop,{get:getter,set:setter,enumerable:true,configurable:true})}
   }
  })
 };
 // object.unwatch
 if(!Object.prototype.unwatch){
  Object.defineProperty(Object.prototype,"unwatch",{
   enumerable:false,
   configurable:true,
   writable:false,
   value:function(prop){var val=this[prop];delete this[prop];this[prop]=val}
  })
 };

//.txt-Dateien auslesen
 getFileContent=(vn,fn)=>{GO(gO('FileCont')).innerHTML=FI({nm:'FrC',sr:fn,oe:vn+"=retFileContent()",sy:{d:'NONE'}})+eFI};//Variablenname für Rückgabe / Dateiname
 retFileContent=()=>{return(frames.FrC.document.body.innerHTML.replace(/<.*>/g,'').split(/\n/))};

getEleKoords=(o)=>{//Koordinaten eines Elements ermitteln
  var L,T,W,H
  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=(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=()=>{Alert.off();return(HF.dG?true:false)};
 GO('LAM').innerHTML=
  T_('pal0PXt0PXw100%h100%fs1EM')+TR()+TD({an:'CENTER',vn:'MIDDLE'})+
   T_({sy:{p:'2EM',bc:HF.Color.C.C,bs:'0PX 0PX 0PX 7777PX #3006',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=()=>{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=(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=()=>{return(HF.dG?true:false)};
 GO('LAM').innerHTML=
  T_('pal0PXt0PXw100%h100%fs1EM')+TR()+TD({an:'CENTER',vn:'MIDDLE'})+
   T_({sy:{p:'2EM',bc:HF.Color.C.C,bs:'0PX 0PX 0PX 7777PX #0306',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=(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.version='23.6.1';
HF.Licen='Martin Rebhan';
L=location.href.split('#');
!L[0].match(/^https:\/\/impal.org/)?location.href='https://impal.org/'+(L[1]||''):'';
HF.DevMode=L[0].match(/admin/)?1:'';
HF.imgPLL='https://impal.org/img/';
HF.imgPLC='img/';
HF.ImgLL+=''
HF.ImgLC='bgi10=0.gif,bgi00=0.gif,';
HF.Color={
 //c:{c:'#000000',H:'#B9B67F',D:'#53512D',C:'#ABA875',P:'#7D7A43'},
 c:{c:'#000000',H:'#E0E0E0',D:'#808080',C:'#C0C0C0',P:'#7D7A43'},
 C:{h:'#33AA33',c:'#000000',H:'',D1:'#000000',H1:'',D2:'#FFFFFF',H2:'#FFFFFF',C:'#A0A000',d:''},
 XCA:['#DCE200','#DCE200','#DCE200','#DCE200','#DCE200','#DCE200','#DCE200'],
 //CA:['#9FB200','#9FB200','#9FB200','#9FB200','#9FB200','#9FB200','#9FB200']
 CA:['#BBBB00','#00CC00','#BBBB00','#BBBB00','#BBBB00','#BBBB00','#BBBB00']
};
HF.zst=0.4;HF.vst=500;
HF.MDIl1=270;HF.MDIl0=145;HF.MDIt1=20;HF.MDIt0=130;HF.MDIw='297MM';HF.MDIh='210MM';HF.MDIp1n='';
HF.MDIani=1;HF.MDIz=0.16;HF.MDIZ=0.65;HF.MDIr='0.3EM';

HF.AnsKLc='#DEDEFE';HF.AnsKLC='#0000DD';HF.dragMDI=0;HF.MDIsingle=0;
HF.URL='';

//MR_Menu (hier nicht benutzt)
HF.MR_M={x:HF.Admin?11:11,y:250,w:134,h:500,gg:1,ggc:['333399','555599'],h1:28,f1:12,c0:'#F7F722',c1:'#FABA12',bg0:'10',bg1:'01',Slang:['s'],p:2,d:3};

//Shop (noch alt)
HF.VKP='7.50';//Versandkostenpauschale
HF.StatusFilter="1,1,1,1,1,1,1,1";

HF.MRPZCMSf=0;
HF.qd=0;//Q-Divs

HF.ae=/.*\.(html?)?(css)?(csv)?(js)?(txt)?(mpe?g?[34]?)?(png)?(gif)?(jpe?g?)?(bmp)?$/i;
HF.aeT=".htm .html .css .csv .js .txt .mp3 .mpe3 .mpeg3 .mp4 .mpe4 .mpeg4 .png .gif .jpe .jpg .jpeg";

HF.sav1='P__ImPal';HF.sav2='Home';HF.withSQL=1;