.key DIR/K
.bra {
.ket }

;
; Example-Script for creating a new Group
;	$VER: NewGroup 1.0 (8.1.94) by Litrik De Roy
;


IF `UserInfo QUICK` EQ "root"
	IF NOT EXISTS {dir}
		Echo "Creating template Group directory..."
		MakeDir {dir}
		SetOwner {dir} root QUIET
		MProtect {dir} RW GROUP R OTHER R QUIET
		Echo "Done."
	ELSE
		Echo "Directory {dir} already exists."
	ENDIF
ELSE
	Echo "Access not allowed."
ENDIF