Added Do While

getting infinite loop --- research why