Subversion Repositories wimsdev

Rev

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

Rev 18546 Rev 18614
Line 30... Line 30...
30
    !set slib_pol1=$slib_pol
30
    !set slib_pol1=$slib_pol
31
  !endif
31
  !endif
32
  !set slib_tmp=$slib_pol1 $(slib_col)
32
  !set slib_tmp=$slib_pol1 $(slib_col)
33
  !set slib_tmp=!append item $(slib_som[$(slib_ff[2..$(slib_ff[1])+1]);]) to $slib_tmp
33
  !set slib_tmp=!append item $(slib_som[$(slib_ff[2..$(slib_ff[1])+1]);]) to $slib_tmp
34
  !set slib_tmp=!replace internal ; by , in $slib_tmp
34
  !set slib_tmp=!replace internal ; by , in $slib_tmp
35
  !if $slib_k<300
35
  !if $slib_k<$slib_cnt
36
    !set slib_dessin=!append line $slib_tmp to $slib_dessin
36
    !set slib_dessin=!append line $slib_tmp to $slib_dessin
37
  !else
37
  !else
38
    !goto out
38
    !goto out
39
    !if $slib_k<800
39
    !if $slib_k<800
40
      !set slib_dessin1=!append line $slib_tmp to $slib_dessin1
40
      !set slib_dessin1=!append line $slib_tmp to $slib_dessin1