Create superobject.pas