119 do {
while(SCent >= 0)
120 {
if ((fsp = FSTab[3][SCent]))
121 {
if (!( FSTab[3][SCent] = fsp->
Next)) SCent--;
129 while(MNent >= 0 && !fsp) fsp = FSTab[2][MNent--];
130 if (fsp) {FSTab[2][MNent+1]=0; SCent = Bin(fsp, 3, SCshift);
continue;}
131 while(HRent >= 0 && !fsp) fsp = FSTab[1][HRent--];
132 if (fsp) {FSTab[1][HRent+1]=0; MNent = Bin(fsp, 2, MNshift);
continue;}
133 while(DYent >= 0 && !fsp) fsp = FSTab[0][DYent--];
134 if (fsp) {FSTab[0][DYent+1]=0; HRent = Bin(fsp, 1, HRshift);
continue;}