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