Choose a spher of 10Å around the next Id'ed atom the molecule name is defined by the last atom ID'd symbol
centre_id Wait_id message "Displaying a sphere of atoms" mol $.id_m c_at $.id_m $.id_r $.id_a obj sph spher 10. end message ' '
