1090 KL=4 : GOSUB 980