TAnimOb

type TAnimOb = record

  NextOb: PAnimOb;

  PrevOb: PAnimOb;

  Clock: LongInt;

  AnOldY: SmallInt;

  AnOldX: SmallInt;

  AnY: SmallInt;

  AnX: SmallInt;

  YVel: SmallInt;

  XVel: SmallInt;

  YAccel: SmallInt;

  XAccel: SmallInt;

  RingYTrans: SmallInt;

  RingXTrans: SmallInt;

  AnimORoutine: Pointer;

  HeadComp: PAnimComp;

  AUserExt: TAUserStuff;

end;