배열에서 값을 한 칸씩 이동시키려면 어떻게 하나요?

PBS_X 배열에서 값이 1이고 다음 배열 값은 1이 아니면, 다음 값을 앞 칸으로 옮기고 원래 자리는 1로 만들고 싶어요.
아래처럼 작성했는데, 1을 대입하면 두 배열 값이 모두 1이 되어버립니다.
어떻게 고치면 좋을까요?