PET VIC-20 C64 C16 Plus/4 C128 X16 M65

The TYPE keyword starts a new user-defined type (UDT) block.

TYPE <name>
  <field> AS <type>
  [<field> AS <type>]
  [...]
  [SUB <method_name> ...]
  [FUNCTION <method_name> ...]
  [...]
END TYPE