TYPE MyClass = OBJECT x: INTEGER; END;
Here is an example of how to create an Oberon object using OOTL: oberon object tiler link
MODULE MyModule;