TAnimComp

type TAnimComp = record

  Flags: SmallInt;

  Timer: SmallInt;

  TimeSet: SmallInt;

  NextComp: PAnimComp;

  PrevComp: PAnimComp;

  NextSeq: PAnimComp;

  PrevSeq: PAnimComp;

  AnimCRoutine: Pointer;

  YTrans: SmallInt;

  XTrans: SmallInt;

  HeadOb: PAnimOb;

  AnimBob: PBob;

end;