BubbleSort PROC USES eax ecx esi,
    Names:PTR DWORD , Marks:PTR DWORD ,Count:DWORD
    mov  ecx,Count
    dec  ecx
L1: push ecx
    mov  ebx,Names
    mov  esi,Marks
L2: mov  eax,[esi]
    cmp  [esi+4],eax
    jge  L3
    xchg ebx,[esi+4]
    xchg eax,[esi+4]
    mov  [esi],eax
L3: add  esi,4
    add  ebx,4
    loop L2
    pop  ecx
    loop L1
L4: ret
BubbleSort ENDP