Save Stored Procedures to Text Files

The other day I was looking for a way to save all the stored procedures in a database to text files. This would allow me to check in the SPs to source control as well as compare differences of the SPs from different database enviroments. I found some VBScript code that does the job at SQL Server Central.