All work up to Program 7B for PSP