Subversion Repositories wimsdev

Rev

Rev 4351 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4351 Rev 7692
Line 28... Line 28...
28 
  !if $slib_k = 0
 28 
  !if $slib_k = 0
29 
    slib_rep1 = !values $slib_cnt + x for x=1 to $slib_cnt_c
 29 
    slib_rep1 = !values $slib_cnt + x for x=1 to $slib_cnt_c
30 
    slib_rep  = !append item $slib_rep1 to $slib_rep
 30 
    slib_rep  = !append item $slib_rep1 to $slib_rep
31 
  !endif
 31 
  !endif
32 
  slib_cnt = $[$slib_cnt+$slib_cnt_c]
 32 
  slib_cnt = $[$slib_cnt+$slib_cnt_c]
33 
  slib_HH =
33 
  slib_HH =
34 
  !for slib_j = 1 to $slib_cnt_c
 34 
  !for slib_j = 1 to $slib_cnt_c
35 
    slib_char = !char $slib_j of $slib_H
 35 
    slib_char = !char $slib_j of $slib_H
36 
    slib_HH = !append item $slib_char to $slib_HH
 36 
    slib_HH = !append item $slib_char to $slib_HH
37 
   !next slib_j
 37 
   !next slib_j
38 
  slib_TEXTE = !append item $slib_HH to $slib_TEXTE
 38 
  slib_TEXTE = !append item $slib_HH to $slib_TEXTE