TSF_INSTRUMENT

type TSF_INSTRUMENT = record

  gain: cint;

  basenote: cchar;

  detune: cchar;

  velocity_lo: cchar;

  velocity_hi: cchar;

  loop_count: cint;

  loops: array [0..15] of record

  mode: cint;

  start: cuint;

  end_: cuint;

  count: cuint;

end;

end;