Pascal Script usage example