5行目のREADを消して、GPUTCHRの前にREADを入れてみればいけます。