TpInterpret almost done