A826.bas (for win nt), 2 a826.bas (for win nt) – Omega Engineering OME-A826PG User Manual
Page 20
OME-A-826PG Software Manual [Win 95/98/NT]
2.2.2
A826.BAS (for Win NT)
Attribute VB_Name = "A826"
'*********************************************************************************
' The Declare of A826.DLL for A826 DAQ Card
'*********************************************************************************
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
'***************** DEFINE A826 RELATIVE ADDRESS *****************
Global Const TIMER0
= &H0
Global Const Timer1
= &H1
Global Const TIMER2
= &H2
Global Const TIMER_MODE
= &H3
Global Const AD_LO
= &H4 '* Analog to Digital, Low Byte *
Global Const AD_HI
= &H5
'* Analog to Digital, High Byte *
Global Const DA_CH0_LO
= &H4
'* Digit to Analog, CH 0 *
Global Const DA_CH0_HI
= &H5
Global Const DA_CH1_LO
= &H6 '* Digit to Analog, CH 1 *
Global Const DA_CH1_HI
= &H7
Global Const DI_LO
= &H6 '* Digit Input *
Global Const DO_LO
= &HD '* Digit Output *
Global Const CLEAR_IRQ
= &H8
Global Const SET_GAIN
= &H9
Global Const SET_CH
= &HA
Global Const SET_MODE
= &HB
Global Const SOFT_TRIG
= &HC
Global Const POLLING_MODE
= 1
Global Const DMA_MODE
= 2
Global Const INTERRUPT_MODE
= 6
'*** define the gain mode ***
Global Const A826_BI_1
= 0
Global Const A826_BI_10
= 1
Global Const A826_BI_100
= 2
Global Const A826_BI_1000
= 3
Global Const A826_UNI_1
= 4
Global Const A826_UNI_10
= 5
Global Const A826_UNI_100
= 6
Global Const A826_UNI_1000
= 7
Global Const A826_BI_05
= 8
Global Const A826_BI_5
= 9
Global Const A826_BI_50
= 10
Global Const A826_BI_500
= 11
Global Const A826_BI_2
= 1
Global Const A826_BI_4
= 2
Global Const A826_BI_8
= 3
Global Const A826_UNI_2
= 5
Global Const A826_UNI_4
= 6
Global Const A826_UNI_8
= 7
Date: Aug-15-2000 Ver: 2.2 Page 18