An Interpreter in Object Pascal