2295 KA=1 : KB=40+NVA*10 : GOSUB 695