3210 KA=1 : KB=8*NG+30 : GOSUB 695