<pre>on appendMenuFonds  toComputer  put "Fonds" into menuName  create menu menuName  repeat with x = 1 to the number of bgs    put the short name of bg x into menuItemName    put "goToBkgnd" && menuItemName into menuItemMessage    put menuItemName after menu menuName with menuMsg menuItemMessage  end repeat  put the short name of this bg into menuItemName  if there is a menuItem menuItemName of menu menuName  then set checkMark of menuItem menuItemName of menu menuName to trueend appendMenuFonds</pre>