2130 KL=5 : GOSUB 980