Is anyone willing to work with me to rewrite some code?

[Art]

It’s been translated from French where Boucle (Buckle) means Loop.

http://f6csx.free.fr/ATV/STV5730/OSDCSX28.bas

[Ramius]

Thanks Art!
Turns out translating from French to English created several problems. Every Wdata statement contains a $xxxx. The translator changed this to $ xxxx, placing a space between the $ and the number! There were other translation errors and I am working to correct them.

Best, Ed