[Newbies] Background method in squeak

[seb]

Hello,

I want to start a methods at the creation of an object, and every second give 
me status of somme of his variable. When i create the instance I can see in 
the Transcript the output expected. But the squeak interface freeze (and 
processor goes to 100%). How can I make this method execute in background?

Here is my buggy method:

MyClass>>beeper
	 [ self beeperOn ] whileTrue: [
		Transcript show: self myStatus; cr.
		( Delay forSeconds: 1) wait.
		]

Regards.

Sébastien