TAESOBJECT

type TAESOBJECT = record

  ob_next: SmallInt;

  ob_head: SmallInt;

  ob_tail: SmallInt;

  ob_type: Word;

  ob_flags: Word;

  ob_state: Word;

  ob_spec: TOBSPEC;

  ob_x: SmallInt;

  ob_y: SmallInt;

  ob_width: SmallInt;

  ob_height: SmallInt;

end;