Real time under real pascal