feat: mise a nivo pour la gestion des blocs parent

This commit is contained in:
Nicolas Hordé 2004-10-31 11:46:47 +00:00
parent fee0c5a333
commit 056902c2cf
1 changed files with 43 additions and 26 deletions

View File

@ -14,57 +14,74 @@ mov ah,13
int 47h
mov ah,6
int 47h
mov ah,0
int 49h
mov si,offset menu
mov ah,13
int 47h
mov ah,18h
int 47h
xor cx,cx
listmcb:
mov ah,06h
int 47h
mov ah,4
int 49h
jc fino
inc cx
inc bl
push gs
pop ds
mov bh,0
mov si,MB.Names
mov ah,0Dh
int 47h
mov ah,05h
mov ah,14h
int 47h
mov bh,15
xor edx,edx
mov dx,ds:[MB.Sizes]
shl edx,4
mov ah,08
int 47h
mov ah,05h
mov ah,0Fh
int 47h
push cs
pop ds
mov bh,24
cmp ds:[MB.Sizes],true
jne notresident
mov si,offset resident
mov ah,0Dh
mov ah,14h
int 47h
mov ah,05h
int 47h
jmp listmcb
jmp suitelistmcb
notresident:
mov si,offset nonresident
mov ah,0Dh
mov ah,14h
int 47h
suitelistmcb:
mov bh,30
cmp gs:[MB.Reference],0
je next
cmp gs:[MB.Reference],1000h
jb next
mov ax,gs:[MB.Reference]
dec ax
dec ax
mov ds,ax
mov si,MB.Names
mov ah,14h
int 47h
next:
mov bh,46
xor edx,edx
mov dx,gs
inc dx
inc dx
push cx
mov cx,16
mov ah,11h
int 47h
pop cx
jmp listmcb
fino:
push cs
pop ds
mov si,offset findesprog
mov ah,0Dh
int 47h
mov ax,0
int 16h
db 0CBh
findesprog db '********* FIN ***********',0
resident db 'Resident',0
nonresident db 'Volatile',0
msg db 'Memory manager V1.0',0
resident db 'oui',0
nonresident db 'non',0
msg db 'Memory manager V1.2',0
menu db 'Nom | Taille | Res | Parent | Mem',0
end start