写一段汇编语言的冒泡排序代码

以下是一段使用汇编语言实现冒泡排序的代码：

section .data

array db 5, 3, 8, 2, 1 ; 待排序的数组
n equ $-array ; 数组长度

section .text
global _start

_start:
  mov ecx, n ; 设置循环次数
  dec ecx ; 循环次数减一，因为最后一个数不需要比较

outer_loop:
  mov ebx, 0 ; 用于记录是否有交换

  mov edx, ecx ; 设置内部循环次数
  inner_loop:
    mov esi, edx ; 设置当前位置为数组最后一个位置
    dec esi ; 往前比较
    mov al, [array + esi] ; 获取当前位置的值
    cmp al, [array + esi - 1] ; 比较当前位置和前一个位置的值
    jge skip_swap ; 如果当前位置比前一个位置大，则不需要交换
    mov bl, [array + esi - 1] ; 交换位置
    mov [array + esi], bl
    mov [array + esi - 1], al
    mov ebx, 1 ; 设置交换标志
  skip_swap:
    dec edx ; 循环次数减一
    jnz inner_loop ; 如果还没到第一个位置，则继续循环

  cmp ebx, 1 ; 如果没有交换，则说明排序已完成
  jne done

  dec ecx ; 循环次数减一
  jnz outer_loop ; 如果还没到第一个位置，则继续循环

done:
  ; 排序完成，可以在这里输出结果或者进行其他操作
  mov eax, 1 ; 设置系统调用号
  xor ebx, ebx ; 退出状态码为 0
  int 0x80 ; 调用系统调用