вполне логично, у тебя ведь не определены значения регистров по умолчанию, надо ввести цепь начального сброса и не мучаться с flag и конечно присвоение вроде DOUT(0) <= regA(0) необходимо вынести за процесс иначе получишь задержку в один такт.
впрочем и шины лучше присваивать сразу без индексов DOUT <= regA;
в общем причина в том что у тебя по включению сразу flag = 1, а regA = "000000000"

удачи в освоениии