A program that causes a red square to move with arrow keys