4210 KA=1 : KB=12*N+7 : GOSUB 695