added a counter to guess at some kind of progress

This code needs work. :P