1899 KA=3 : KB=XA+43 : GOSUB 695