feat: modification du programme afin qu'il soit compatible avec les blocs mémoires et les fonctions de restauration d'écran

This commit is contained in:
Nicolas Hordé 2004-11-05 01:01:37 +00:00
parent 1eff431dd6
commit 5b13a5616b
4 changed files with 25 additions and 28 deletions

View File

@ -36,9 +36,9 @@ push es
pop ds pop ds
xor si,si xor si,si
mov ax,0008h mov ah,28h
int 47h int 47h
mov ah,38 mov ax,0008h
int 47h int 47h
mov ah,2 mov ah,2
int 47h int 47h
@ -56,9 +56,7 @@ mov si,offset poper
int 47h int 47h
mov ax,0 mov ax,0
int 16h int 16h
mov ah,39 mov ah,29h
int 47h
mov ax,0004
int 47h int 47h
db 0CBH db 0CBH

View File

@ -6,7 +6,7 @@ org 0100h
start: start:
mov ah,26 mov ah,28h
int 47h int 47h
mov ax,0001 mov ax,0001
int 47h int 47h
@ -19,7 +19,6 @@ int 47h
mov ah,6 mov ah,6
int 47h int 47h
int 47h int 47h
mov ah,21 mov ah,21
mov cl,3 mov cl,3
int 47h int 47h
@ -38,7 +37,6 @@ mov ah,8
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ah,21 mov ah,21
mov cl,4 mov cl,4
int 47h int 47h
@ -59,7 +57,6 @@ mov ah,9
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ah,21 mov ah,21
mov cl,5 mov cl,5
int 47h int 47h
@ -80,7 +77,6 @@ mov cx,32
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ah,21 mov ah,21
mov cl,6 mov cl,6
int 47h int 47h
@ -101,7 +97,6 @@ mov cx,16
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ah,21 mov ah,21
mov cl,7 mov cl,7
int 47h int 47h
@ -120,7 +115,6 @@ mov ah,7
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ah,21 mov ah,21
mov cl,8 mov cl,8
int 47h int 47h
@ -139,7 +133,6 @@ mov ah,13
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ah,21 mov ah,21
mov cl,9 mov cl,9
int 47h int 47h
@ -158,7 +151,6 @@ mov ah,44
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ah,13 mov ah,13
mov si,offset text72 mov si,offset text72
int 47h int 47h
@ -174,19 +166,17 @@ mov ah,45
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ax,0 mov ax,0
int 16h int 16h
mov ah,2 mov ah,2
int 47h int 47h
mov ah,30 mov ah,30
int 47h int 47h
mov ah,2 mov ah,2
int 47h int 47h
mov ah,21 mov ah,21
mov cl,5 mov cl,5
int 47h int 47h
@ -294,14 +284,14 @@ mov ah,33
int 47h int 47h
dec bp dec bp
jnz go4 jnz go4
mov ah,27 mov ah,14h
int 47h
xor bx,bx xor bx,bx
mov si,offset texte3 mov si,offset texte3
mov ah,20
int 47h int 47h
mov ax,0 mov ax,0
int 16h int 16h
mov ah,29h
int 47h
db 0CBh db 0CBh
put: put:

View File

@ -5,9 +5,9 @@ org 0100h
start: start:
mov ax,0002 mov ah,28h
int 47H int 47H
mov ah,26 mov ax,0002
int 47H int 47H
replay: replay:
mov ah,2 mov ah,2
@ -25,12 +25,16 @@ int 47h
mov bx,0231h mov bx,0231h
mov si,offset msgapp mov si,offset msgapp
int 47h int 47h
mov bp,1000h
VerifAll: VerifAll:
mov ah,1 mov ah,1
int 16h int 16h
jz nokey
cmp al,32 cmp al,32
je enend je enend
nokey:
mov ax,cx mov ax,cx
inc ax
mov si,100 mov si,100
mul si mul si
mov si,2880 mov si,2880
@ -45,6 +49,7 @@ VerifAll:
int 47h int 47h
mov ah,15 mov ah,15
mov dx,cx mov dx,cx
inc dx
mov bx,0A10h mov bx,0A10h
int 47h int 47h
mov ah,13 mov ah,13
@ -83,8 +88,8 @@ int 47h
someof: someof:
mov ah,0 mov ah,0
int 16h int 16h
mov ah,27 mov ah,29h
int 47h int 47H
db 0CBH db 0CBH
errors: errors:
mov ah,21 mov ah,21
@ -106,7 +111,7 @@ error2 db 'Le disque est defectueux, appuyez sur une touche pour quitter',0
po db ' %',0 po db ' %',0
msgapp db '<Pressez espace pour quitter>',0 msgapp db '<Pressez espace pour quitter>',0
msg db '- Test de surface du disque -',0 msg db '- Test de surface du disque -',0
msg2 db ' cluster tested. ',0 msg2 db ' cluster testes. ',0
msg3 db ' cluster defectueux. ',0 msg3 db ' cluster defectueux. ',0
;->Increment CX ;->Increment CX
gauge: gauge:

View File

@ -8,6 +8,8 @@ start:
mov ax,0305h mov ax,0305h
mov bx,0008h mov bx,0008h
int 16h int 16h
mov ah,28h
int 47H
mov ax,0002 mov ax,0002
int 47H int 47H
mov ah,2 mov ah,2
@ -282,6 +284,8 @@ cursor:
suit7: suit7:
cmp ax,4200h cmp ax,4200h
jne adres2 jne adres2
mov ah,29h
int 47H
db 0CBH db 0CBH
ret ret
@ -374,7 +378,7 @@ spaces db '
showbuffer db 35 dup (0FFh) showbuffer db 35 dup (0FFh)
oldmode db 0 oldmode db 0
infos db 40 dup (0) infos db 40 dup (0)
buffer equ $ buffer db 512 dup (0)
end start end start