8844 X=U : P(1)=0 : P(2)=1 : GOSUB 8140