<pre>on selectParts -- select parts by clicking on them.  toComputer  put long name of this cd into selectedPartsCard  writeFile selectedPartsCard,disk() & ":Fichiers:Procedures:selectedPartsCard"  put script of this cd into savedCardScript  writeFile savedCardScript,disk() & ":Fichiers:Procedures:savedCardScript"  put "Click on the parts you wish to select. Press enter to stop."  get readFile(disk() & ":Fichiers:Procedures:scriptSelectParts")  set script of this cd to itend selectParts</pre>