Source position: tos.pas line 220
function settracks(
playtracks: SmallInt;
rectracks: SmallInt
):LongInt;