3615 IF KE=1 THEN 3575