1530 KTG=1 : GOSUB 6745 : NXX=0 : ISP=0