home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
ddkx86v5.zip
/
DDKX86
/
SRC
/
DEV
/
ATCOM
/
ATESPMAC.INC
< prev
next >
Wrap
Text File
|
1995-04-14
|
2KB
|
79 lines
;*DDK*************************************************************************/
;
; COPYRIGHT Copyright (C) 1995 IBM Corporation
;
; The following IBM OS/2 WARP source code is provided to you solely for
; the purpose of assisting you in your development of OS/2 WARP device
; drivers. You may use this code in accordance with the IBM License
; Agreement provided in the IBM Device Driver Source Kit for OS/2. This
; Copyright statement may not be removed.;
;*****************************************************************************/
; SCCSID = @(#)atespmac.inc 6.2 91/04/08
PWRITE MACRO reg,value
LOCAL Loop
IF (reg EQ ESP_R_CMD1)
bit = ESP_RDY_CMD1
ENDIF
IF (reg EQ ESP_R_CMD2)
bit = ESP_RDY_CMD2
ENDIF
mov dx,[di].pi_address
Loop: in al,dx
test al,bit
jz Loop
add dx,reg
mov al,value
out dx,al
ENDM
PREAD MACRO reg
LOCAL Loop
IF (reg EQ ESP_R_STATUS1)
bit = ESP_RDY_STATUS1
ENDIF
IF (reg EQ ESP_R_STATUS2)
bit = ESP_RDY_STATUS2
ENDIF
; no waiting for RR or SID
IFE (reg EQ ESP_R_RDY) OR (reg EQ ESP_R_SID)
mov dx,[di].pi_address
Loop: in al,dx
test al,bit
jz Loop
ENDIF
add dx,reg
in al,dx
ENDM
ISSUE MACRO cmd,cmd2,cmd3,cmd4,cmd5
PWRITE ESP_R_CMD1,cmd
IFNB <cmd2>
PWRITE ESP_R_CMD2,cmd2
ENDIF
IFNB <cmd3>
PWRITE ESP_R_CMD2,cmd3
ENDIF
IFNB <cmd4>
PWRITE ESP_R_CMD2,cmd4
ENDIF
IFNB <cmd5>
PWRITE ESP_R_CMD2,cmd5
ENDIF
ENDM