Correct typos and formatting in listing 3.6

This commit is contained in:
rnndxb wxcy 2016-03-03 13:56:41 -05:00
commit 879524acd5

View file

@ -1932,25 +1932,25 @@ timing.
;
; By Michael Abrash
;
mystack segment para stack STACK'
mystack segment para stack 'STACK'
db 512 dup(?)
mystack ends
mystack ends
;
Code segment para public CODE'
Code segment para public 'CODE'
assume cs:Code, ds:Code
extrn ZTimerOn:near, ZTimerOff:near, ZTimerReport:near
Startproc near
push cs
pop ds ;point DS to the code segment,
extrn ZTimerOn:near, ZTimerOff:near, ZTimerReport:near
Start proc near
push cs
pop ds ;point DS to the code segment,
; so data as well as code can easily
; be included in TESTCODE
;
; Delay for 6-7 seconds, to let the Enter keystroke that started the
; program come back up.
;
mov ah,2ch
int 21h ;get the current time
mov bh,dh ;set the current time aside
mov ah,2ch
int 21h ;get the current time
mov bh,dh ;set the current time aside
DelayLoop:
mov ah,2ch
push bx ;preserve start time
@ -1962,12 +1962,12 @@ DelayLoop:
add dh,60 ;yes, a minute must have turned over,
; so add one minute
CheckDelayTime:
sub dh,bh ;get time that's passed
cmp dh,7 ;has it been more than 6 seconds yet?
jb DelayLoop ;not yet
sub dh,bh ;get time that's passed
cmp dh,7 ;has it been more than 6 seconds yet?
jb DelayLoop ;not yet
;
include TESTCODE ;code to be measured, including calls
; to ZTimerOn and ZTimerOff
include TESTCODE ;code to be measured, including calls
; to ZTimerOn and ZTimerOff
;
; Display the results.
;
@ -1975,8 +1975,8 @@ CheckDelayTime:
;
; Terminate the program.
;
mov ah,4ch
int 21h
mov ah,4ch
int 21h
Start endp
Code ends
end Start