|
Last change
on this file was 142, checked in by ktk, 25 years ago |
|
Import
|
-
Property svn:eol-style
set to
native
-
Property svn:keywords
set to
Author Date Id Revision
|
|
File size:
601 bytes
|
| Rev | Line | |
|---|
| [142] | 1 | ; $Id: iodelay.asm 142 2000-04-23 14:55:46Z ktk $
|
|---|
| 2 |
|
|---|
| 3 | ;; IODELAY.ASM - 500ns delay routine. Calling convention defined in iodelay.h
|
|---|
| 4 |
|
|---|
| 5 | ;; MODIFICATION HISTORY
|
|---|
| 6 | ;; DATE PROGRAMMER COMMENT
|
|---|
| 7 | ;; 01-Jul-95 Timur Tabi Creation
|
|---|
| 8 |
|
|---|
| 9 | include segments.inc
|
|---|
| 10 |
|
|---|
| 11 | public iodelay_
|
|---|
| 12 |
|
|---|
| 13 | EXTRN DOSIODELAYCNT:ABS
|
|---|
| 14 |
|
|---|
| 15 | _TEXT SEGMENT DWORD PUBLIC USE16 'CODE'
|
|---|
| 16 | assume cs:cgroup, ds:dgroup
|
|---|
| 17 |
|
|---|
| 18 | iodelay_ proc near
|
|---|
| 19 | db 0B8h
|
|---|
| 20 | dw DOSIODELAYCNT
|
|---|
| 21 | align 4
|
|---|
| 22 | @@: dec ax
|
|---|
| 23 | jnz @b
|
|---|
| 24 | loop iodelay_
|
|---|
| 25 | ret
|
|---|
| 26 | iodelay_ endp
|
|---|
| 27 |
|
|---|
| 28 | _TEXT ENDS
|
|---|
| 29 |
|
|---|
| 30 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
