<pre>on reparer chane  global scriptFindString  put chane into scriptFindString  if the script of this stack contains chane then edit the script of this stack  push cd  repeat with x = 1 to the number of bgs    go to bg x    if the script of this bg contains chane then edit the script of this bg    if the number of bg parts > 0 then      repeat with y = 1 to the number of bg parts        if the script of bg part y contains chane then edit the script of bg part y      end repeat    end if  end repeat  repeat with x = 1 to the number of cds    go to cd x    if the script of this cd contains chane then edit the script of this cd    if the number of cd parts > 0 then      repeat with y = 1 to the number of cd parts        if the script of cd part y contains chane then edit the script of cd part y      end repeat    end if  end repeat  pop cdend repareron reparer chaneRecherchee  hide msg box  ---------------------------------------------------------------------------  if chaneRecherchee is empty then    ask "Chane  rechercher dans tous les scripts ?" with "on"    if it is not empty then put it into cetteChane else exit reparer  else    put chaneRecherchee into cetteChane  end if  ---------------------------------------------------------------------------  put liste("piles") into allStacks  set itemDelimiter to tab  push cd  repeat with x = 1 to the number of lines of allStacks    if item 1 of line x of allStacks is "scripts" then next repeat -- TEMP    go to stack item 2 of line x of allStacks    set the cantModify of this stack to false    fouillerScripts cetteChane    if the commandKey is down then      pop cd      exit reparer    end if  end repeat  pop cd  ---------------------------------------------------------------------------end reparer</pre>