function [ValidPassword problemmsg]=PassCheck(Password)
	ValidPassword = true;
	problemmsg="OK";

	lowerletters = isstrprop(Password, 'lower');
	nolower = all(lowerletters == 0);
	upperletters = isstrprop(Password, 'upper');
	noupper = all(upperletters == 0);

	if (any(noupper,nolower) == 1);
		ValidPassword = false;
		problemmsg="must contain upper and lower case letters";
		return;
	endif;

	numbers = isstrprop(Password, 'digit');
	nonumber = all(numbers == 0);

	if (nonumber == 1);
		ValidPassword = false;
		problemmsg="must contain numbers"
		return;
	endif;

	firstletter = [lowerletters(1),upperletters(1)]

	if ~any(firstletter);
		ValidPassword = false;
		problemmsg="first character must be a letter";
		return;
	endif;
end