2036 KA=3 : KB=7*(KN-KM)+21 : GOSUB 695