Paulh has brought a very important point to my attention.

The code which I had recently posted may operate with a 4 mHz
crystal instead of the 1 mHz which I had stated in the previous message.

Sorry.