41

.686
.model flat

extern _ExitProcess@4 : proc
public _main

.data
    znaki1      db 'a','b','c','d','e',0            ;A
    rozmiar1    db $ - znaki1
    znaki2      db 'b','c','d','f','h',0        ;B
    rozmiar2    db $ - znaki2
.code

_main:
    mov esi, OFFSET znaki1
    mov edi, OFFSET znaki2
;w al liczba cyfr znaki1
;w ah liczba cyfr znaki2
    mov al, rozmiar1
    mov ah, rozmiar2
    cmp al, ah
    ja  A_p_B
    jb  B_p_A

;przypadek gdy liczby mają tyle samo znaków
    movzx   ecx, al
ptl:
    mov al, [esi]
    mov ah, [edi]
    cmp al, ah
    ja  A_w_B
    jb  B_w_A
    inc     esi
    inc     edi
    loop ptl
    jmp A_r_B

A_p_B:
    clc
    mov edx, 2
    sub edx, 1
    jmp koniec
B_p_A:
    stc
    mov edx, 2
    sub edx, 1
    jmp koniec
A_r_B:
    clc
    mov edx, 1
    sub edx, 1
    jmp koniec



koniec:

    push 0
    call _ExitProcess@4
END