I came across an alternative progressbar. I thought it was a good idea, but it didn't use smooth 'scrolling'. I came up with this sub routine.
I included an example.
Inputs
A description of the usage is included in the module.
Assumes
You can use, modify and distribute this code freely.