1590 KA=2 : KB=50 : GOSUB 695