i=1;
 while(i<26){ 
 
/*---UNTEN 0-200 m --------------------------------------------------------*/  
  if(NU_allegleich==0)NU[i]=0;   if(NU_allegleich==10)NU[i]=10;
  if(NU_allegleich==11)NU[i]=11; if(NU_allegleich==12)NU[i]=12;
  if(NU_allegleich==13)NU[i]=13; if(NU_allegleich==30)NU[i]=30;
  if(NU_allegleich==31)NU[i]=31; if(NU_allegleich==32)NU[i]=32;
  if(NU_allegleich==33)NU[i]=33; if(NU_allegleich==40)NU[i]=40;
  if(NU_allegleich==41)NU[i]=41; if(NU_allegleich==42)NU[i]=42;
  if(NU_allegleich==43)NU[i]=43; if(NU_allegleich==50)NU[i]=50; 
  if(NU_allegleich==51)NU[i]=51; if(NU_allegleich==110)NU[i]=110; 
  if(NU_allegleich==130)NU[i]=130;if(NU_allegleich==140)NU[i]=140;

  if(NU[i]==0) NU[i]="--";       if(NU[i]==10)NU[i]="R00";
  if(NU[i]==11)NU[i]="R01";      if(NU[i]==12)NU[i]="R02";
  if(NU[i]==13)NU[i]="R03";      
  if(NU[i]==21)NU[i]="G01";      if(NU[i]==22)NU[i]="G02";
  if(NU[i]==23)NU[i]="G03";     if(NU[i]==24)NU[i]="GH01";
  if(NU[i]==25)NU[i]="GH02";    if(NU[i]==26)NU[i]="GH03";      
  if(NU[i]==30)NU[i]="S00";
  if(NU[i]==31)NU[i]="S01";      if(NU[i]==32)NU[i]="S02";
  if(NU[i]==33)NU[i]="S03";      if(NU[i]==40)NU[i]="SR00";
  if(NU[i]==41)NU[i]="SR01";     if(NU[i]==42)NU[i]="SR02";
  if(NU[i]==43)NU[i]="SR03";     if(NU[i]==50)NU[i]="S00/SR00";  
  if(NU[i]==51)NU[i]="S01/SR01";  
  if(NU[i]==110)NU[i]="(R00)";   if(NU[i]==111)NU[i]="(R01)";
  if(NU[i]==130)NU[i]="(S00)";   if(NU[i]==131)NU[i]="(S01)"; 
  if(NU[i]==140)NU[i]="(SR00)";  if(NU[i]==141)NU[i]="(SR01)"; 
  if(NU[i]==122)NU[i]="(G02)";    if(NU[i]==123)NU[i]="(G03)"; 
  if(NU[i]==124)NU[i]="(GH01)";   if(NU[i]==125)NU[i]="(GH02)";  
  if(NU[i]==126)NU[i]="(GH03)";   if(NU[i]==101)NU[i]="(RS01)";   
  if(NU[i]==102)NU[i]="(RS02)";   if(NU[i]==103)NU[i]="(RS03)";                           
  if(NU[i]==221)NU[i]="RS01/G01"; if(NU[i]==222)NU[i]="G02/GH02";                            
  
  if(ZU_allegleich==0)ZU[i]=0;
  if(ZU_allegleich==1)ZU[i]=1;   if(ZU_allegleich==2)ZU[i]=2;
  if(ZU_allegleich==3)ZU[i]=3;   if(ZU_allegleich==4)ZU[i]=4;
  if(ZU_allegleich==5)ZU[i]=5;   if(ZU_allegleich==6)ZU[i]=6;
  if(ZU_allegleich==7)ZU[i]=7;   if(ZU_allegleich==8)ZU[i]=8;
  if(ZU_allegleich==11)ZU[i]=11;   if(ZU_allegleich==12)ZU[i]=12;
  if(ZU_allegleich==13)ZU[i]=13;   if(ZU_allegleich==14)ZU[i]=14;
  if(ZU_allegleich==15)ZU[i]=15;   if(ZU_allegleich==16)ZU[i]=16;
  if(ZU_allegleich==17)ZU[i]=17;   if(ZU_allegleich==18)ZU[i]=18;



  if(ZU[i]==0) ZU[i]="--";
  if(ZU[i]==1) ZU[i]="nass";     if(ZU[i]==2) ZU[i]="Schnee";
  if(ZU[i]==3) ZU[i]="gefr";     if(ZU[i]==4) ZU[i]="Reif";
  if(ZU[i]==5) ZU[i]="nass/gefr";if(ZU[i]==6) ZU[i]="nass/<br>Schnee";
  if(ZU[i]==7) ZU[i]="Schnee/gefr";if(ZU[i]==8) ZU[i]="Eis";
  if(ZU[i]==9) ZU[i]="Reif/gefr";
  if(ZU[i]==11) ZU[i]="(nass)";     if(ZU[i]==12) ZU[i]="(Schnee)";
  if(ZU[i]==13) ZU[i]="(gefr)";       if(ZU[i]==14) ZU[i]="(Reif)";
  if(ZU[i]==15) ZU[i]="(nass/gefr)";if(ZU[i]==16) ZU[i]="(nass/Schn)";
  if(ZU[i]==17) ZU[i]="(Schnee/gefr)";if(ZU[i]==18) ZU[i]="(Eis)"; 
  if(ZU[i]==19) ZU[i]="(Reif/gefr)";
  
 
/*---OBEN 200-400 m --------------------------------------------------------*/   
  if(NO_allegleich==0)NO[i]="--";if(NO_allegleich==10)NO[i]=10;
  if(NO_allegleich==11)NO[i]=11; if(NO_allegleich==12)NO[i]=12;
  if(NO_allegleich==13)NO[i]=13; if(NO_allegleich==30)NO[i]=30;
  if(NO_allegleich==31)NO[i]=31; if(NO_allegleich==32)NO[i]=32;
  if(NO_allegleich==33)NO[i]=33; if(NO_allegleich==40)NO[i]=40;
  if(NO_allegleich==41)NO[i]=41; if(NO_allegleich==42)NO[i]=42;
  if(NO_allegleich==43)NO[i]=43; if(NO_allegleich==50)NO[i]=50; 
  if(NO_allegleich==51)NO[i]=51; if(NO_allegleich==110)NO[i]=110; 
  if(NO_allegleich==130)NO[i]=130;if(NO_allegleich==140)NO[i]=140;

  if(NO[i]==0) NO[i]="--";       if(NO[i]==10)NO[i]="R00";
  if(NO[i]==11)NO[i]="R01";      if(NO[i]==12)NO[i]="R02";
  if(NO[i]==13)NO[i]="R03";      
  if(NO[i]==21)NO[i]="G01";      if(NO[i]==22)NO[i]="G02";
  if(NO[i]==23)NO[i]="G03";     if(NO[i]==24)NO[i]="GH01";
  if(NO[i]==25)NO[i]="GH02";    if(NO[i]==26)NO[i]="GH03";      
  if(NO[i]==30)NO[i]="S00";
  if(NO[i]==31)NO[i]="S01";      if(NO[i]==32)NO[i]="S02";
  if(NO[i]==33)NO[i]="S03";      if(NO[i]==40)NO[i]="SR00";
  if(NO[i]==41)NO[i]="SR01";     if(NO[i]==42)NO[i]="SR02";
  if(NO[i]==43)NO[i]="SR03";     if(NO[i]==50)NO[i]="S00/SR00";  
  if(NO[i]==51)NO[i]="S01/SR01";  
  if(NO[i]==110)NO[i]="(R00)";   if(NO[i]==111)NO[i]="(R01)";
  if(NO[i]==130)NO[i]="(S00)";   if(NO[i]==131)NO[i]="(S01)"; 
  if(NO[i]==140)NO[i]="(SR00)";   if(NO[i]==141)NO[i]="(SR01)";  
  if(NO[i]==122)NO[i]="(G02)";    if(NO[i]==123)NO[i]="(G03)"; 
  if(NO[i]==124)NO[i]="(GH01)";   if(NO[i]==125)NO[i]="(GH02)";  
  if(NO[i]==126)NO[i]="(GH03)";   if(NO[i]==101)NO[i]="(RS01)";   
  if(NO[i]==102)NO[i]="(RS02)";   if(NO[i]==103)NO[i]="(RS03)";                           
  if(NO[i]==221)NO[i]="RS01/G01"; if(NO[i]==222)NO[i]="G02/GH02";                           
  if(NO_gleich_NU==1)NO[i]=NU[i];   

  if(ZO_allegleich==0)ZO[i]=0;  
  if(ZO_allegleich==1)ZO[i]=1;   if(ZO_allegleich==2)ZO[i]=2;
  if(ZO_allegleich==3)ZO[i]=3;   if(ZO_allegleich==4)ZO[i]=4;
  if(ZO_allegleich==5)ZO[i]=5;   if(ZO_allegleich==6)ZO[i]=6;
  if(ZO_allegleich==7)ZO[i]=7;   if(ZO_allegleich==8)ZO[i]=8;

  if(ZO[i]==0) ZO[i]="--"; 
  if(ZO[i]==1) ZO[i]="nass";     if(ZO[i]==2) ZO[i]="Schnee";
  if(ZO[i]==3) ZO[i]="gefr";     if(ZO[i]==4) ZO[i]="Reif"; 
  if(ZO[i]==5) ZO[i]="nass/gefr";if(ZO[i]==6) ZO[i]="nass/<br>Schnee"; 
  if(ZO[i]==7) ZO[i]="Schnee/gefr";if(ZO[i]==8) ZO[i]="Eis";
  if(ZO[i]==9) ZO[i]="Reif/gefr";
  if(ZO[i]==11) ZO[i]="(nass)";     if(ZO[i]==12) ZO[i]="(Schnee)";
  if(ZO[i]==13) ZO[i]="(gefr)";       if(ZO[i]==14) ZO[i]="(Reif)";
  if(ZO[i]==15) ZO[i]="(nass/gefr)";if(ZO[i]==16) ZO[i]="(nass/Schn)";
  if(ZO[i]==17) ZO[i]="(Schnee/gefr)";if(ZO[i]==18) ZO[i]="(Eis)"; 
  if(ZO[i]==19) ZO[i]="(Reif/gefr)"; 
  if(ZO_gleich_ZU==1)ZO[i]=ZU[i];    

/*---GANZ OBEN 400-800 m --------------------------------------------------------*/  
  if(NOB_allegleich==0)NOB[i]="--";if(NOB_allegleich==10)NOB[i]=10;
  if(NOB_allegleich==11)NOB[i]=11; if(NOB_allegleich==12)NOB[i]=12;
  if(NOB_allegleich==13)NOB[i]=13; if(NOB_allegleich==30)NOB[i]=30;
  if(NOB_allegleich==31)NOB[i]=31; if(NOB_allegleich==32)NOB[i]=32;
  if(NOB_allegleich==33)NOB[i]=33; if(NOB_allegleich==40)NOB[i]=40;
  if(NOB_allegleich==41)NOB[i]=41; if(NOB_allegleich==42)NOB[i]=42;
  if(NOB_allegleich==43)NOB[i]=43; if(NOB_allegleich==50)NOB[i]=50; 
  if(NOB_allegleich==51)NOB[i]=51; if(NOB_allegleich==110)NOB[i]=110; 
  if(NOB_allegleich==130)NOB[i]=130;if(NOB_allegleich==140)NOB[i]=140;

  if(NOB[i]==0) NOB[i]="--";       if(NOB[i]==10)NOB[i]="R00";
  if(NOB[i]==11)NOB[i]="R01";      if(NOB[i]==12)NOB[i]="R02";
  if(NOB[i]==13)NOB[i]="R03";      if(NOB[i]==30)NOB[i]="S00";
  if(NOB[i]==31)NOB[i]="S01";      if(NOB[i]==32)NOB[i]="S02";
  if(NOB[i]==33)NOB[i]="S03";      if(NOB[i]==40)NOB[i]="SR00";
  if(NOB[i]==41)NOB[i]="SR01";     if(NOB[i]==42)NOB[i]="SR02";
  if(NOB[i]==43)NOB[i]="SR03"; 
  if(NOB[i]==110)NOB[i]="(R00)";   if(NOB[i]==111)NOB[i]="(R01)";
  if(NOB[i]==130)NOB[i]="(S00)";   if(NOB[i]==131)NOB[i]="(S01)"; 
  if(NOB[i]==140)NOB[i]="(SR00)";   if(NOB[i]==141)NOB[i]="(SR01)";  
  if(NOB_gleich_NU==1)NOB[i]=NU[i]; 
  if(ZOB_allegleich==0)ZOB[i]=0;       
  if(ZOB_allegleich==1)ZOB[i]=1;   if(ZOB_allegleich==2)ZOB[i]=2;
  if(ZOB_allegleich==3)ZOB[i]=3;   if(ZOB_allegleich==4)ZOB[i]=4;
  if(ZOB_allegleich==5)ZOB[i]=5;   if(ZOB_allegleich==6)ZOB[i]=6;
  if(ZOB_allegleich==7)ZOB[i]=7;   if(ZOB_allegleich==8)ZOB[i]=8;
  if(ZOB[i]==0) ZOB[i]="--";
  if(ZOB[i]==1) ZOB[i]="nass";     if(ZOB[i]==2) ZOB[i]="Schnee";
  if(ZOB[i]==3) ZOB[i]="gefr";     if(ZOB[i]==4) ZOB[i]="Reif";
  if(ZOB[i]==5) ZOB[i]="nass/gefr";if(ZOB[i]==6) ZOB[i]="nass/Schn";
  if(ZOB[i]==7) ZOB[i]="Schnee/gefr";if(ZOB[i]==8) ZOB[i]="Eis"; 
  if(ZOB[i]==9) ZOB[i]="Reif/gefr"; 
  if(ZOB[i]==11) ZOB[i]="(nass)";     if(ZOB[i]==12) ZOB[i]="(Schnee)";
  if(ZOB[i]==13) ZOB[i]="(gefr)";       if(ZOB[i]==14) ZOB[i]="(Reif)";
  if(ZOB[i]==15) ZOB[i]="(nass/gefr)";if(ZOB[i]==16) ZOB[i]="(nass/Schn)";
  if(ZOB[i]==17) ZOB[i]="(Schnee/<br>gefr)";if(ZOB[i]==18) ZOB[i]="(Eis)"; 
  if(ZOB[i]==19) ZOB[i]="(Reif/gefr)"; 
  if(ZOB_gleich_ZU==1)ZOB[i]=ZU[i];    

   
 i=i+3}; 

 if(TO_automat==1){TLO07=TLU07-1,TLO10=TLU10-1,TLO13=TLU13-1,TLO16=TLU16-1,
                   TLO19=TLU19-1,TLO22=TLU22-1,TLO01=TLU01-1,TLO04=TLU04-1,TLO07m=TLU07m-1,TLO13m=TLU13m-1,
                   TSO07=TSU07-1,TSO10=TSU10-1,TSO13=TSU13-1,TSO16=TSU16-1,
                   TSO19=TSU19-1,TSO22=TSU22-1,TSO01=TSU01-1,TSO04=TSU04-1,TSO07m=TSU07m-1,TSO13m=TSU13m-1};

 if(TOB_automat==1){TLOB07=TLU07-abzug_hoehe,TLOB10=TLU10-abzug_hoehe,TLOB13=TLU13-abzug_hoehe,TLOB16=TLU16-abzug_hoehe,
                   TLOB19=TLU19-abzug_hoehe,TLOB22=TLU22-abzug_hoehe,TLOB01=TLU01-abzug_hoehe,
                   TLOB04=TLU04-abzug_hoehe,TLOB07m=TLU07m-abzug_hoehe,TLOB13m=TLU13m-abzug_hoehe,
                   TSOB07=TSU07-abzug_hoehe,TSOB10=TSU10-abzug_hoehe,TSOB13=TSU13-abzug_hoehe,TSOB16=TSU16-abzug_hoehe,
                   TSOB19=TSU19-abzug_hoehe,TSOB22=TSU22-abzug_hoehe,TSOB01=TSU01-abzug_hoehe,
                   TSOB04=TSU04-abzug_hoehe,TSOB07m=TSU07m-abzug_hoehe,TSOB13m=TSU13m-abzug_hoehe};