function objEingang(szKanal)
{this.szKanal=szKanal
this.szName="Name"+szKanal
this.szBeschreibung="Beschreibung "+szKanal
this.szEinheit=""
this.szKorrektur=""
if(szKanal.indexOf("AIN")!=-1)
this.szKonvertierung=konv[szKanal.charAt(3)]
else
this.szKonvertierung=""
this.szAlarmstufen="AlarmAus"
this.szAlarmtext=""
this.szGrenzwertmax=""
this.szGrenzwertmin=""
this.bSichtbar="false"
this.getEingang=getEingang
this.getEingangdef=getEingangdef
this.getEingangkonv=getEingangkonv
this.setEingang=setEingang
this.setVisible=setVisible
this.isVisible=isVisible
}


function getEingang()
{var szEingang=""
szEingang=this.szName+"=input("+this.szKanal+","+this.szKorrektur+","+this.szAlarmstufen+","
szEingang+=this.szGrenzwertmax+","+this.szGrenzwertmin+","+escape(this.szAlarmtext)+","
szEingang+=escape(this.szBeschreibung)+","+this.szEinheit+","+this.szKonvertierung+","
szEingang+=this.bSichtbar+");"
return szEingang
}   

function getEingangdef()
{
var szEingang="" 
szEingang="#define "+this.szName+" "+ this.szKanal+"\n";
return szEingang
}   

function getEingangkonv()
{
var szEingang="" 
var konv_art=( this.szKonvertierung=="PT1000")*0+( this.szKonvertierung=="10V")*1+( this.szKonvertierung=="Taster")*2 
szEingang="wrsps,"+this.szKanal+".konv="+ konv_art+"\n";
return szEingang
}   


function setEingang(szEingang)
{var nIndex=szEingang.indexOf('=')
this.szName=szEingang.substring(0,nIndex)
if ( this.szName.indexOf(';')!=-1)   {this.szName= szEingang.substring(1,nIndex) }
nIndex=szEingang.indexOf('(')
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szKanal=szEingang.substring(0,nIndex)
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szKorrektur=szEingang.substring(0,nIndex)
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szAlarmstufen=szEingang.substring(0,nIndex)
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szGrenzwertmax=szEingang.substring(0,nIndex)
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szGrenzwertmin=szEingang.substring(0,nIndex)
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szAlarmtext=unescape(szEingang.substring(0,nIndex))
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szBeschreibung=unescape(szEingang.substring(0,nIndex))
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szEinheit=szEingang.substring(0,nIndex)
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(',')
this.szKonvertierung=szEingang.substring(0,nIndex)
szEingang=szEingang.substring(nIndex+1,szEingang.length)
nIndex=szEingang.indexOf(')')
this.bSichtbar=szEingang.substring(0,nIndex)
szEingang=szEingang.substring(nIndex+1,szEingang.length)
}
function isVisible()
{if(this.bSichtbar=="true")
return(true)
return(false)
}
function setVisible(bVisible)
{if(bVisible)
this.bSichtbar="true"
else
this.bSichtbar="false"}

function objEingaenge(szText)
{var nLoop
this.analog=new Array(8)
this.digital=new Array(12)
this.zaehler=new Array(12)
this.getEingaenge=getEingaenge     
this.isEingaengeNameOk=isEingaengeNameOk
for(nLoop=0;nLoop<this.analog.length;nLoop++)
{this.analog[ nLoop]=new objEingang("AIN"+(nLoop+1))}
for(nLoop=0;nLoop<this.digital.length;nLoop++)
{this.digital[ nLoop]=new objEingang("DIN"+(nLoop+1))}
 for(nLoop=0;nLoop<this.zaehler.length;nLoop++)
 {this.zaehler[ nLoop]=new objEingang("CNT"+(nLoop+1))}

if ((szText.indexOf("no include-file")==-1)&&(szText.length>0))
{ var nIndex,nIndex1,nIndex2
var bFound
var szLine=""
var szKanal=""
var nStartPos=0
var nEndPos=0
szLine=""
if((nEndPos=szText.indexOf(";"))>0)
{szLine=szText.substring(nStartPos,nEndPos)
nStartPos=nEndPos+1
}
while(szLine.length>0)
{szKanal=""
nIndex1=szLine.indexOf('(')
if(nIndex1>=0)
{nIndex2=szLine.indexOf(',')
if(nIndex2>=0)
{szKanal=szLine.substring(nIndex1+1,nIndex2)}}
if(szKanal.length>0)
{bFound=false
for(nLoop=0;(nLoop<this.analog.length)&&(bFound==false);nLoop++)
{if(this.analog[ nLoop].szKanal==szKanal) {this.analog[ nLoop].setEingang(szLine);bFound=true}}

for(nLoop=0;(nLoop<this.digital.length)&&(bFound==false);nLoop++)
{if(this.digital[ nLoop].szKanal==szKanal)
{this.digital[ nLoop].setEingang(szLine);bFound=true}}

for(nLoop=0;(nLoop<this.zaehler.length)&&(bFound==false);nLoop++)
{if(this.zaehler[ nLoop].szKanal==szKanal)
{this.zaehler[ nLoop].setEingang(szLine); bFound=true}}
}
szLine=""
if((nEndPos=szText.indexOf(";",nStartPos))>0)
{szLine=szText.substring(nStartPos,nEndPos)
nStartPos=nEndPos+1
}}}}          


                            


function getEingaenge(art)
{
var szEingaenge=""
var szTemp=""
var fkt_typ=" ";
for(nLoop=0;nLoop<this.analog.length;nLoop++)
{
 if (art=="def")  {szTemp=this.analog[ nLoop].getEingangdef();}  
 if (art=="konv")  {szTemp=this.analog[ nLoop].getEingangkonv(); }
 if (art=="norm")  {szTemp=this.analog[ nLoop].getEingang();    } 
if(szTemp.indexOf("=")!=0)
if(this.analog[nLoop].szName.indexOf("Name"+this.analog[nLoop].szKanal)==-1)
szEingaenge+=szTemp
}
 if ((art=="norm") || (art=="def"))
{ 
for(nLoop=0;nLoop<this.digital.length;nLoop++)
{ if (art=="def")  szTemp=this.digital[ nLoop].getEingangdef() ;  
 if (art=="norm")  {szTemp=this.digital[ nLoop].getEingang();    } 
/// else szTemp=this.digital[ nLoop].getEingang();    
// szTemp=this.digital[ nLoop].fkt_typ
if(szTemp.indexOf("=")!=0)
if(this.digital[nLoop].szName.indexOf("Name"+this.digital[nLoop].szKanal)==-1)
szEingaenge+=szTemp
}
}
/*
for(nLoop=0;nLoop<this.zaehler.length;nLoop++)
{ if (art=="def")  szTemp=this.zaehler[ nLoop].getEingangdef() ;  
 if (art=="norm")  szTemp=this.zaehler[ nLoop].getEingang();  
// szTemp=this.zaehler[ nLoop].fkt_typ
if(szTemp.indexOf("=")!=0)
 if(this.zaehler[nLoop].szName.indexOf("Name"+this.zaehler[nLoop].szKanal)==-1)
  { szEingaenge+=szTemp
  szEingaenge+="rs"+this.zaehler[nLoop].szName+"=init(0);o"+this.zaehler[nLoop].szKanal+"=init(0);"
   }
 }
*/
return szEingaenge
}


function isEingaengeNameOk(szName)
{var nLoop
for(nLoop=0;nLoop<this.analog.length;nLoop++)
{if(this.analog[ nLoop].szKanal==szName)
{return false
}}for(nLoop=0;nLoop<this.digital.length;nLoop++)
{if(this.digital[ nLoop].szKanal==szName)
{return false
}}for(nLoop=0;nLoop<this.zaehler.length;nLoop++)
{if(this.zaehler[ nLoop].szKanal==szName)
{return false
}}return true}

function objAusgang(szKanal)
{this.szKanal=szKanal
this.szName="Name"+szKanal
this.szBeschreibung="Beschreibung "+szKanal
this.szEinheit=""
this.szNullD="false"
this.szKorrektur=""
this.bSichtbar="false"
this.getAusgang=getAusgang 
this.getAusgangdef=getAusgangdef 
this.setAusgang=setAusgang
this.setVisible=setVisible
this.isVisible=isVisible
this.setNullD=setNullD
this.isNullD=isNullD
}

function getAusgang()
{var szAusgang=""
szAusgang=this.szName
if(this.szNullD=="true")
szAusgang+="=soutput("
else
szAusgang+="=output("
szAusgang+=this.szKanal+","+this.szKorrektur+","
szAusgang+=escape(this.szBeschreibung)+","+this.szEinheit+","
szAusgang+=this.bSichtbar+");"
return szAusgang
}

function getAusgangdef()
{
var szAusgang="" 
szAusgang="#define "+this.szName+" "+ this.szKanal+"\n";
return szAusgang
}   


function setAusgang(szAusgang)
{var nIndex=szAusgang.indexOf('=')
this.szName=szAusgang.substring(0,nIndex)
if ( this.szName.indexOf(';')!=-1)   {this.szName= szAusgang.substring(1,nIndex) }
if(szAusgang.charAt(nIndex+1)=="s")
this.szNullD="true"
else
this.szNullD="false"
nIndex=szAusgang.indexOf('(')
szAusgang=szAusgang.substring(nIndex+1,szAusgang.length)
nIndex=szAusgang.indexOf(',')
this.szKanal=szAusgang.substring(0,nIndex)
szAusgang=szAusgang.substring(nIndex+1,szAusgang.length)
nIndex=szAusgang.indexOf(',')
this.szKorrektur=szAusgang.substring(0,nIndex)
szAusgang=szAusgang.substring(nIndex+1,szAusgang.length)
nIndex=szAusgang.indexOf(',')
this.szBeschreibung=unescape(szAusgang.substring(0,nIndex))
szAusgang=szAusgang.substring(nIndex+1,szAusgang.length)
nIndex=szAusgang.indexOf(',')
this.szEinheit=szAusgang.substring(0,nIndex)
szAusgang=szAusgang.substring(nIndex+1,szAusgang.length)
nIndex=szAusgang.indexOf(')')
this.bSichtbar=szAusgang.substring(0,nIndex)
szAusgang=szAusgang.substring(nIndex+1,szAusgang.length)
}
function isVisible()
{if(this.bSichtbar=="true")
return(true)
return(false)
}
function isNullD()
{if(this.szNullD=="true")
return(true)
return(false)
}
function setVisible(bVisible)
{if(bVisible)
this.bSichtbar="true"
else
this.bSichtbar="false"
}
function setNullD(szNullD)
{if(szNullD)
this.szNullD="true"
else
this.szNullD="false"
}
function objAusgaenge(szText)
{var nLoop
this.analog=new Array(6)
this.digital=new Array(24)
this.getAusgaenge=getAusgaenge   
this.isAusgaengeNameOk=isAusgaengeNameOk
for(nLoop=0;nLoop<this.analog.length;nLoop++)
{this.analog[ nLoop]=new objAusgang("AOT"+(nLoop+1))
}for(nLoop=0;nLoop<this.digital.length;nLoop++)
{this.digital[ nLoop]=new objAusgang("DOT"+(nLoop+1))
}if((szText.indexOf("no include file")==-1)&&(szText.length>0))
{var nIndex,nIndex1,nIndex2
var bFound
var szLine=""
var szKanal=""
var nStartPos=0
var nEndPos=0
szLine=""
if((nEndPos=szText.indexOf(";",nStartPos))>0)
{szLine=szText.substring(nStartPos,nEndPos)
nStartPos=nEndPos+1
}while(szLine.length>0)
{szKanal=""
nIndex1=szLine.indexOf('(')
if(nIndex1>=0)
{nIndex2=szLine.indexOf(',')
if(nIndex2>=0)
{szKanal=szLine.substring(nIndex1+1,nIndex2)
}}if(szKanal.length>0)
{bFound=false
for(nLoop=0;(nLoop<this.analog.length)&&(bFound==false);nLoop++)
{if(this.analog[ nLoop].szKanal==szKanal)
{this.analog[ nLoop].setAusgang(szLine)
bFound=true
}}for(nLoop=0;(nLoop<this.digital.length)&&(bFound==false);nLoop++)
{if(this.digital[ nLoop].szKanal==szKanal)
{this.digital[ nLoop].setAusgang(szLine)
bFound=true
}}}szLine=""
if((nEndPos=szText.indexOf(";",nStartPos))>0)
{szLine=szText.substring(nStartPos,nEndPos)
nStartPos=nEndPos+1
}}}}
 

function getAusgaenge(art)
{var szAusgaenge=""
var szTemp=""     
var fkt_typ=" ";
for(nLoop=0;nLoop<this.analog.length;nLoop++)
{  if (art=="def")  {szTemp=this.analog[ nLoop].getAusgangdef();}  else szTemp=this.analog[ nLoop].getAusgang(); 
// szTemp=this.analog[ nLoop].getAusgang()
if(szTemp.indexOf("=")!=0)
if(this.analog[nLoop].szName.indexOf("Name"+this.analog[nLoop].szKanal)==-1)
szAusgaenge+=szTemp
}for(nLoop=0;nLoop<this.digital.length;nLoop++)
{   if (art=="def")  {szTemp=this.digital[ nLoop].getAusgangdef();}  else szTemp=this.digital[ nLoop].getAusgang(); 
// szTemp=this.digital[ nLoop].getAusgang()
if(szTemp.indexOf("=")!=0)
if(this.digital[nLoop].szName.indexOf("Name"+this.digital[nLoop].szKanal)==-1)
szAusgaenge+=szTemp
}return szAusgaenge
}    

function isAusgaengeNameOk(szName)
{var nLoop
for(nLoop=0;nLoop<this.analog.length;nLoop++)
{if(this.analog[ nLoop].szKanal==szName)
{return false
}}for(nLoop=0;nLoop<this.digital.length;nLoop++)
{if(this.digital[ nLoop].szKanal==szName)
{return false
}}return true}

function objMerker(szKanal)
{this.szKanal=szKanal
this.szName="Name"+szKanal
this.szBeschreibung="Beschreibung "+szKanal
this.szEinheit=""
this.szAlarmstufen="AlarmAus"
this.szAlarmtext=""
this.szGrenzwertmax=""
this.szGrenzwertmin=""
this.bSichtbar="false"
this.szRemanenz=""
this.getMerker=getMerker   
this.getMerkerdef=getMerkerdef   
this.setMerker=setMerker
this.setVisible=setVisible
this.isVisible=isVisible
this.setRemanenz=setRemanenz
this.isRemanenz=isRemanenz
}

function getMerker()
{var szMerker=""
szMerker=this.szName+"=numerik("+this.szKanal+","+this.szAlarmstufen+","
szMerker+=this.szGrenzwertmax+","+this.szGrenzwertmin+","+escape(this.szAlarmtext)+","
szMerker+=escape(this.szBeschreibung)+","+this.szEinheit+","
szMerker+=this.bSichtbar+","+this.szRemanenz+");"
return szMerker
}

function  getMerkerdef()
{
var szMerker="" 
szMerker="#define "+this.szName+" "+ this.szKanal+"\n";
return szMerker
}   



function setMerker(szMerker)
{var nIndex=szMerker.indexOf('=')
this.szName=szMerker.substring(0,nIndex)    
if ( this.szName.indexOf(';')!=-1)   {this.szName= szMerker.substring(1,nIndex) }
nIndex=szMerker.indexOf('(')
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(',')
this.szKanal=szMerker.substring(0,nIndex)
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(',')
this.szAlarmstufen=szMerker.substring(0,nIndex)
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(',')
this.szGrenzwertmax=szMerker.substring(0,nIndex)
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(',')
this.szGrenzwertmin=szMerker.substring(0,nIndex)
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(',')
this.szAlarmtext=unescape(szMerker.substring(0,nIndex))
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(',')
this.szBeschreibung=unescape(szMerker.substring(0,nIndex))
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(',')
this.szEinheit=szMerker.substring(0,nIndex)
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(',')
if(nIndex<0)
{nIndex=szMerker.indexOf(')')
this.bSichtbar=szMerker.substring(0,nIndex)
szMerker=szMerker.substring(nIndex+1,szMerker.length)
this.szRemanenz=""
}else
{this.bSichtbar=szMerker.substring(0,nIndex)
szMerker=szMerker.substring(nIndex+1,szMerker.length)
nIndex=szMerker.indexOf(')')
this.szRemanenz=szMerker.substring(0,nIndex)
szMerker=szMerker.substring(nIndex+1,szMerker.length)
}}

function isVisible()
{if(this.bSichtbar=="true")
return(true)
return(false)
}

function isRemanenz()
{if(this.szRemanenz=="rem")
return(true)
return(false)
}
function setRemanenz(szRemanenz)
{if(szRemanenz)
this.szRemanenz="rem"
else
this.szRemanenz=""
}function setVisible(bVisible)
{if(bVisible)
this.bSichtbar="true"
else
this.bSichtbar="false"
}
function objNumerisch(szText)
{
var nLoop
this.merker=new Array(275)
this.getNumerisch=getNumerisch
this.isNumerischNameOk=isNumerischNameOk
for(nLoop=0;nLoop<this.merker.length;nLoop++)
{this.merker[ nLoop]=new objMerker("M"+(nLoop+1))
}
if((szText.indexOf("no include file")==-1)&&(szText.length>0))
{var nIndex,nIndex1,nIndex2
var bFound
var szLine=""
var szKanal=""
var nStartPos=0
var nEndPos=0
szLine=""
if((nEndPos=szText.indexOf(";",nStartPos))>0)
{szLine=szText.substring(nStartPos,nEndPos)
nStartPos=nEndPos+1
}while(szLine.length>0)
{szKanal=""
nIndex1=szLine.indexOf('(')
if(nIndex1>=0)
{nIndex2=szLine.indexOf(',')
if(nIndex2>=0)
{szKanal=szLine.substring(nIndex1+1,nIndex2)
}}if(szKanal.length>0)
{bFound=false
for(nLoop=0;(nLoop<this.merker.length)&&(bFound==false);nLoop++)
{if(this.merker[ nLoop].szKanal==szKanal)
{this.merker[ nLoop].setMerker(szLine)
bFound=true
}}}szLine=""
if((nEndPos=szText.indexOf(";",nStartPos))>0)
{szLine=szText.substring(nStartPos,nEndPos)
nStartPos=nEndPos+1
}}}}            
    

function getNumerisch(art)
{
var szNumerisch=""
var szTemp=""
var fkt_typ=" ";
for(nLoop=0;nLoop<this.merker.length;nLoop++)
{
if (art=="def")  {szTemp=this.merker[ nLoop].getMerkerdef();}  else szTemp=this.merker[ nLoop].getMerker(); 
// szTemp=this.merker[ nLoop].getMerker()
if(szTemp.indexOf("=")!=0)
if(this.merker[nLoop].szName.indexOf("Name"+this.merker[nLoop].szKanal)==-1)
szNumerisch+=szTemp
}
return szNumerisch
}

function isNumerischNameOk(szName)
{var nLoop
for(nLoop=0;nLoop<this.merker.length;nLoop++)
{if(this.merker[ nLoop].szKanal==szName)
{return false
}}return true}