Lab Cleanup script

Does anyone know of an Applescript that will delete all files on the desktop? I am new to Applescript and would like to write something that when the machine is shutdown at the end of the day, it collects all files, folders, etc on the desktop and deletes them. (This is for a public access lab) Suggestions would be greatly appreciated.

I can’t take credit for writing the meat of this but it is a simple clean up script

tell application "Finder"
	set theLooseFiles to every item of desktop whose kind is not "Volume"
	set theNewFolder to (make new folder at desktop with properties {name:"roundup_Folder"})
	move theLooseFiles to theNewFolder
	--only uncomment this next line if you want to delete before verifying
--do shell script "rm -d " & (quoted form of POSIX path of (theNewFolder as string))
end tell