=========================================================================== BBS: The Abacus * HST/DS * Potterville MI Date: 06-01-93 (19:51) Number: 50 From: TOM HAMMOND Refer#: NONE To: WAYNE VENABLES Recvd: NO Subj: Re: Sort... 2/2 Conf: (35) Quick Basi --------------------------------------------------------------------------- >>> Continued from previous message ELSE IF low < j THEN lstack(sp).low = low lstack(sp).hi = j sp = sp + 1 END IF low = i END IF LOOP WHILE low < hi 'IF sp > maxsp THEN maxsp = sp LOOP WHILE sp <> 1 'PRINT "MAX SP"; maxsp END SUB --- * Origin: Night Shift BBS (314)635-7588 HST 14.4 (1:289/15) SEEN-BY: 1/211 11/2 4 13/13 101/1 108/89 109/25 110/69 114/5 123/19 124/1 SEEN-BY: 153/752 154/40 77 157/110 159/100 125 430 575 950 203/23 209/209 SEEN-BY: 261/1023 280/1 390/1 396/1 15 397/2 2230/100 2440/5 3603/20