<pre>on goToBkgnd bgName  toComputer  put liste("fonds") into theBkgnds  if theBkgnds is empty then exit goToBkgnd  set itemDelimiter to tab  repeat with x = 1 to the number of lines of theBkgnds    if item 1 of line x of theBkgnds is bgName then      pushCard      go to item 2 of line x of theBkgnds      adjustCheckMarks      exit goToBkgnd    end if  end repeatend goToBkgnd</pre>