Subversion Repositories wimsdev

Rev

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

Rev 17945 Rev 18080
Line 247... Line 247...
247 
  !for slib_i=1 to $[$slib_cnt]
 247 
  !for slib_i=1 to $[$slib_cnt]
248 
    slib_inf=!item $[$slib_i] of $slib_w
 248 
    slib_inf=!item $[$slib_i] of $slib_w
249 
    slib_sup=!item $[$slib_i+1] of $slib_w
 249 
    slib_sup=!item $[$slib_i+1] of $slib_w
250 
    slib_f=!item $slib_i of $slib_uu
 250 
    slib_f=!item $slib_i of $slib_uu
251 
    !if $slib_f!=$empty and $slib_sup!=$empty and $slib_inf!=$empty
 251 
    !if $slib_f!=$empty and $slib_sup!=$empty and $slib_inf!=$empty
252 
      slib_pdata=!append line line $slib_inf,$slib_f,$slib_sup,$slib_f,$slib_couleur to $slib_pdata
 252 
      slib_pdata=!append line segment $slib_inf,$slib_f,$slib_sup,$slib_f,$slib_couleur to $slib_pdata
253 
    !endif
 253 
    !endif
254 
    !if $slib_i < $[$slib_cnt]
 254 
    !if $slib_i < $[$slib_cnt]
255 
      slib_points=!append item $slib_inf,$slib_f to $slib_points
 255 
      slib_points=!append item $slib_inf,$slib_f to $slib_points
256 
    !endif
 256 
    !endif
257 
  !next slib_i
 257 
  !next slib_i