simulating from TCL code and display current simulation time

Hello,

Can someone provide example how to use functions "PSpiceSetCallback" and "PSpiceCurrentTime" in tlc script. I would like to display current simulation time in command window during simulation launched by tcl code.

Thank you

rum