Listing of file='WAIT.MAC;01' on disk='vmedia/asm_utility_routines-sideA-sector.ccvf'
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; WAIT - TIME DELAY ROUTINE ; ; SIMPLE TIMING LOOP. ; ; VALUES ON ENTRY: ; A = NUMBER OF COUNTS - APPROX 20 MS PER COUNT ; ; DESTROYS: ; A REG. ; WTIM EQU 2906 ENTRY WAIT WAIT: PUSH H ;SAVE REGISTER WAIT10: LXI H,WTIM WAIT20: DCR L ;INNER LOOP JNZ WAIT20 DCR H JNZ WAIT20 DCR A ;OUTER LOOP JNZ WAIT10 POP H RET END