1668 KA=3 : KB=30 : GOSUB 695