2570 WHILE JP=2