مرتب‌سازی کوکتلی

procedure bidirectionalbubbleSort( A : list of sortable items ) defined as:
  do
    swapped := false
    for each i in 0 to length( A ) - 2 do:
      if A[ i ]> A[ i + 1 ] then // test whether the two elements are in the wrong order
        swap( A[ i ], A[ i + 1 ] ) // let the two elements change places
        swapped := true
      end if
    end for
    if swapped = false then
      // we can exit the outer loop here if no swaps occurred.
      break do-while loop
    end if
    swapped := false
    for each i in length( A ) - 2 to 0 do:
      if A[ i ]> A[ i + 1 ] then
        swap( A[ i ], A[ i + 1 ] )
        swapped := true
      end if
    end for
  while swapped // if no elements have been swapped, then the list is sorted
end procedure

procedure bidirectionalbubbleSort ( A : list of sortable items ) defined as:
  // `begin` and `end` marks the first and last index to check
  begin := -1
  end := length( A ) - 2
  do
    swapped := false
    // increases `begin` because the elements before `begin` are in correct order
    begin := begin + 1
    for each i in begin to end do:
      if A[ i ]> A[ i + 1 ] then
        swap( A[ i ], A[ i + 1 ] )
        swapped := true
      end if
    end for
    if swapped = false then
      break do-while loop
    end if
    swapped := false
    // decreases `end` because the elements after `end` are in correct order
    end := end - 1
    for each i in end to begin do:
      if A[ i ]> A[ i + 1 ] then
        swap( A[ i ], A[ i + 1 ] )
        swapped := true
      end if
    end for
  while swapped
end procedure

class BidirBubbleSortAlgorithm extends SortAlgorithm {
    void sort(int a[]) throws Exception {
	int j;
	int limit = a.length;
	int st = -1;
	while (st <limit) {
	 boolean flipped = false;
	 st++;
	 limit--;
	 for (j = st; j <limit; j++) {
		if (stopRequested) {
		 return;
		}
		if (a[j]> a[j + 1]) {
		 int T = a[j];
		 a[j] = a[j + 1];
		 a[j + 1] = T;
		 flipped = true;
		 pause(st, limit);
		}
	 }
	 if (!flipped) {
		return;
	 }
	 for (j = limit; --j>= st;) {
		if (stopRequested) {
		 return;
		}
		if (a[j]> a[j + 1]) {
		 int T = a[j];
		 a[j] = a[j + 1];
		 a[j + 1] = T;
		 flipped = true;
		 pause(st, limit);
		}
	 }
	 if (!flipped) {
		return;
	 }
	}
	pause(st, limit);
    }
}