7030 IF KTG=1 THEN 7075