#!/bin/csh -fx

date >> newbranch.log

ls >> newbranch.log

ls RCS >> newbranch.log

foreach f (*)
  if ( -f RCS/$f,v ) then
     if ( -w $f ) then
        echo $f IS WRITABLE. Clean up first! >> newbranch.log
        echo $f IS WRITABLE. Clean up first!
	exit 1
     endif
  endif
end

foreach f (*)
  if ( -f RCS/$f,v ) then
     if ( -w $f ) then
	echo $f IS WRITABLE. DO IT YOURSELF! >> newbranch.log
     else
	\co -r5.1 -l $f
	chmod -w $f
	\co -rdemeter_5_1 $f
	\ci -u -f5.2 $f
	\ci -u -f5.2.1 $f
	rcs -Ndemeter_5_2:5.2.1 $f
	echo \co -l -r5.1 $f  >> newbranch.log
	echo \co -rdemeter_5_1 $f  >> newbranch.log
	echo rcs -Ndemeter_5_2:5.2.1 $f >> newbranch.log
     endif
  else
    echo "Please use sr addfile " $f
    echo "Please use sr addfile " $f >> newbranch.log
  endif
end

echo Check newbranch.log