TCopList

type TCopList = record

  Next: PCopList;

Next block for this copper list

  CopList: PCopList;

  ViewPort: Pointer;

  CopIns: PCopIns;

start of this block

  CopPtr: PCopIns;

intermediate ptr

  CopLStart: PWord;

mrgcop fills this in for Long Frame

  CopSStart: PWord;

mrgcop fills this in for Longint Frame

  Count: SmallInt;

intermediate counter

  MaxCount: SmallInt;

max # of copins for this block

  DyOffset: SmallInt;

offset this copper list vertical waits

  SLRepeat: Word;

  Flags: Word;

end;