Heh, I don't know if there's an easier way to do this, but I'm assuming not.
<font face = "courier">find . | perl -ne 'chop($_); `chflags nouchg "$_"`;'</font>
That'll unlock all of the files in the directory you're in, as well as it's subdirectories. To lock, change the nouchg to uchg.
Hope that helps.