home *** CD-ROM | disk | FTP | other *** search
- ;
- ; *** Listing 10-17 ***
- ;
- ; Reads a single byte stored in a far segment by
- ; temporarily pointing DS to the far segment.
- ;
- jmp Skip
- ;
- FarSeg segment para
- MemVar db 0 ;this variable resides in a
- ; far segment
- FarSeg ends
- ;
- Skip:
- call ZTimerOn
- rept 100
- push ds ;preserve the normal data segment
- mov si,seg MemVar
- mov ds,si
- mov si,offset MemVar ;point DS:SI to MemVar
- lodsb ;read MemVar
- pop ds ;retrieve the normal data segment
- endm
- call ZTimerOff