<pre>on exporterDessin  toComputer  push cd  choose select tool  doMenu "Select" with optionKey  doMenu "Copy picture"  go to last cd of stack pile("Dessins")  set lockMessages to false  doMenu "New card"  doMenu "Paste picture"  choose browse tool  pop cdend exporterDessin</pre>