Microsoft LPF-00004 Manual del operador descargar pdf (Pagina 132)

Page 114 PROGRAMMER'S GUIDE

YBER

380, COPYRIGHT MARCH 2002, AXON INSTRUMENTS, INC.

The following example program sets the gain, filter and coupling of channel 1 of the CyberAmp.

'The following INCLUDE statement is required to allow access to the

routines that are exported by the C300LIB module.

'$include: 'C300LIBB.INC'

'Initialize the CyberAmp interface module.

if C300.Initialize% then

end if

'Set the CyberAmp device number.

'This step is not required if the device number is set to

'C300.DEVICENULL since this is the default. Therefore this step is

'included only for completeness.

if C300.SetDeviceNumber% (C300.DEVICENULL) then

print "Error setting CyberAmp device number:"; C300.GetLastError%

end

end if

'Set the CyberAmp COM port and baud rate.

if C300.SetOutput% (C300.COM1, C300.SPEED9600) then

print "Error setting CyberAmp port/speed:"; C300.GetLastError%

end

end if

'Set the gain of channel 1 to 200

if C300.SetGain% (1, 200) then

print "Error setting CyberAmp gain:"; C300.GetLastError%

end

end if

'Set the filter of channel 1 to 2000 Hz.

if C300.SetFilter% (1, 2000) then

print "Error setting CyberAmp filter:"; C300.GetLastError%

end

end if

'Set the positive input coupling of channel 1 to DC-coupled.

if C300.SetCoupling% (1, C300.POSINPUT, C300.COUPLINGDC) then

print "Error setting CyberAmp + coupling:"; C300.GetLastError%

end

end if

'Set the negative input coupling of channel 1 to DC-coupled.

1 2 ... 127 128 129 130 131 132 133 134 135 136 137 ... 156 157

Sin comentarios

Microsoft LPF-00004 Manual del operador Pagina 132