реализовать поиск (assembler)

[Xdron]

ребята, вот изночальный код который нужно как-то поменять...
условие: ФИО, количество отработанных дней, количество проданного товара.
реализовать поиск: вывести человека продавшего больше всех товара.

prg segment para public 'code'
assume cs: prg,ss: prg,es: prg,ds: prg
org 100h
start: jmp go
worker struc
n db 30 dup(' ')
sex db ' '
a db ?
worker ends
mas worker <'Gurko Ivan $','м',3>,<'Solovei Ivan &','м',2>,<'Muha Vasilii $','м',4>,<'Petrova Elena $','ж',6>,<'Ivanova Marina ?','Ж',6>
go:
lea di,mas
mov cx,5
mov bl,'м'
m:
cmp [di].sex,bl
jne ml
lea dx,[di].n
mov ah,09h
int 21h
ml:add di, type worker
loop m
ret
prg ends 
end start