2200 KL=3 : GOSUB 980