//avec la fonction appro:
  //la transformation est exprimée dans le repère de référence du point
  //pas besoin de calculer sa valeur dans world
  link(l_pVariableDansFrame1,fFrame1)
  movej(appro(l_pVariableDansFrame1,{0,0,0,0,0,0}),tTool,mNomSpeed)   
  waitEndMove()
  
  for l_nNum=0 to 100   
    movej(appro(l_pVariableDansFrame1,{(l_nNum%10)*10,roundDown(l_nNum/10)*10,0,0,0,0}),tTool,mNomSpeed)   
    if roundDown(l_nNum%10)==0
      waitEndMove()
    endIf
  endFor