feat: suppression de l'exécutable memoire.asm qui fait double emploi avec la commande "mem" du shell.
This commit is contained in:
parent
2955cca945
commit
2c7b28df93
|
@ -1,77 +0,0 @@
|
|||
model tiny,stdcall
|
||||
p586N
|
||||
locals
|
||||
jumps
|
||||
codeseg
|
||||
option procalign:byte
|
||||
|
||||
include "..\include\mem.h"
|
||||
include "..\include\divers.h"
|
||||
|
||||
org 0h
|
||||
|
||||
start:
|
||||
header exe <"CE",1,0,0,,offset imports,,offset realstart>
|
||||
|
||||
realstart:
|
||||
call [cs:print],offset msg
|
||||
xor ebx,ebx
|
||||
xor cx,cx
|
||||
listmcb:
|
||||
call [cs:mbget],cx
|
||||
jc fino
|
||||
dec ax
|
||||
dec ax
|
||||
mov gs,ax
|
||||
inc cx
|
||||
mov dx,gs
|
||||
push edx ;Emplacement memoire hex 2
|
||||
;parent
|
||||
cmp [gs:mb.reference],0
|
||||
jne next
|
||||
push cs
|
||||
push offset none ;parent lstr0 2x2
|
||||
add bx,[gs:mb.sizes]
|
||||
jmp suitemn
|
||||
next:
|
||||
mov dx,[gs:mb.reference]
|
||||
dec dx
|
||||
dec dx
|
||||
push dx ;parent lstr0 2x2
|
||||
push offset (mb).names
|
||||
suitemn:
|
||||
cmp [gs: mb.isresident],true
|
||||
jne notresident
|
||||
push offset resident ;resident str0 2
|
||||
jmp suitelistmcb
|
||||
notresident:
|
||||
push offset nonresident ;resident str0 2
|
||||
suitelistmcb:
|
||||
xor edx,edx
|
||||
mov dx,[gs: mb.sizes]
|
||||
shl edx,4
|
||||
push 6 ;decimal 4 + type 2
|
||||
push edx
|
||||
push gs ;nom lstr0 2x2
|
||||
push offset (mb).names
|
||||
push offset line2 ;ligne
|
||||
call [cs:print]
|
||||
jmp listmcb
|
||||
fino:
|
||||
shl ebx,4
|
||||
push ebx
|
||||
push offset fin
|
||||
call [cs:print]
|
||||
retf
|
||||
resident db "oui",0
|
||||
nonresident db "non",0
|
||||
line2 db "%0P\h15|%w\h25|%0\h30|%0P\h46|%hW\l",0
|
||||
fin db "\l\l\c02%u octets de memoire disponible\l\c07",0
|
||||
msg db "Plan de la memoire\l\lNom | Taille |Res |Parent |Mem\l",0
|
||||
none db ".",0
|
||||
|
||||
|
||||
importing
|
||||
use VIDEO.LIB,print
|
||||
use SYSTEME,mbget
|
||||
endi
|
Loading…
Reference in New Issue