4114 IF KE=1 THEN 4109