modified hacker1/credit.c