9664 IF RND<=PR THEN Y=Y+1 ELSE X=X+1