; *** Listing 3-2 ***
;
; Programme pour mesurer les performances d'un code qui s'exécute en moins
; de 54 ms. (PZTEST.ASM)
;
; A lier à PZTIMER.ASM (Listing 3-1). PZTEST.BAT (Listing 3-4)
; peut être utilisé pour assembler et lier les deux fichiers. Le code à
; mesurer est dans le fichier TESTCODE; le Listing 3-3 présente un exemple
; de fichier TESTCODE.
;
; Par Michael Abrash
;
mystack  segment para stack 'STACK'
         db      512 dup(?)
mystack  ends
;
Code    segment para public 'CODE'
        assume  cs:Code, ds:Code
        extrn   ZTimerOn:near, ZTimerOff:near, ZTimerReport:near
Start   proc    near
        push    cs
        pop     ds  ; DS pointe sur le segment de code,
                    ; les données tout comme le code peuvent donc facilement être 
                    ; inclus dans TESTCODE
                    ;
include    TESTCODE ;code à mesurer, comprenant
                    ;les appels à ZTimerOn et à ZTimerOff
                    ;
; Affiche les résultats.
;
        call    ZTimerReport
;
; Termine le programme.
;
        mov     ah,4ch
        int     21h
Start   endp
Code    ends
        end     Start