如何将此排序算法转换为mips程序集

.data
array: .word 5, 2, 8, 1, 9    # 待排序的数组
length: .word 5               # 数组长度

.text
.globl main

main:
    la $t0, array              # 加载数组的地址到$t0寄存器
    lw $t1, length             # 加载数组长度到$t1寄存器

    addi $t2, $zero, 1         # 设置标志位，表示是否发生交换
    addi $t3, $zero, 0         # 设置循环计数器

outer_loop:
    addi $t3, $t3, 1           # 循环计数器加1
    addi $t4, $zero, 0         # 设置交换标志位为0

    addi $t5, $zero, 0         # 设置内层循环计数器
inner_loop:
    addi $t5, $t5, 1           # 内层循环计数器加1

    lw $t6, ($t0)              # 加载当前元素到$t6寄存器
    lw $t7, 4($t0)             # 加载下一个元素到$t7寄存器

    ble $t6, $t7, no_swap      # 如果$t6 <= $t7，则跳过交换操作

    sw $t6, 4($t0)             # 将较大的元素存回数组
    sw $t7, ($t0)              # 将较小的元素存回数组

    addi $t4, $t4, 1           # 设置交换标志位为1

no_swap:
    addi $t0, $t0, 4           # 数组指针后移一个元素

    blt $t5, $t1, inner_loop   # 如果内层循环计数器 < 数组长度，则继续内层循环

    beqz $t4, outer_loop       # 如果交换标志位为0，则跳出外层循环

    addi $t3, $zero, 0         # 重置循环计数器
    j outer_loop               # 继续外层循环

exit:
    li $v0, 10                 # 退出程序
    syscall