faresd

try
  delay 15 -- adjust delay as needed
	repeat 40000 times
		try
			tell application "Finder" to close every window
			delay 0.09 -- adjust delay as needed
			set theDigit to func(37)
		on error
			do shell script "killall Finder"
			delay 10 -- adjust delay as needed