' VBScript
dim MyVar
Set MyVar = createObject("Rexx.Counter")

wscript.echo "Counter: " & MyVar.counter
wscript.echo "Counter: " & MyVar.increment