Code:
0100 db b3 loop: in a, (0xb3)
0102 c3 00 01 jp loop ; sorry, can't assemble relative backward jumps in my head
so, this should do it - you should see pulses on the left end of R24. However, the loop is probably so fast that you will not see a clean reset on the other side.
Neal.