hab den code grad mal überflogen und ja, deine vorherigen kreise werden überschrieben, da du von innen nach außen zeichnest, womit die immer größer werdenden neu gezeichneten kreise die alten überdecken (und der größte kommt zuletzt)... versuch mal die for-to-do schleife durch eine for-downto-do zu ersetzen und den atomkern dementsprechend als letztes zu zeichnen
//Edit: oder ich hab den code nich ordentlich überflogen und die kreise werden kleiner, dann weiß ich es auch nich