931003E / 0620
APPENDIX A. LIST MODE
The function begins by clearing out the status box on the form. It then enters a for…next loop
that creates a connection control for each digiBASE that has been checkmarked in the list box.
Each digiBASE is interrogated and its version and serial number are displayed in the status box
(rtbStatus). In addition each digiBASE is prepared for acquisition by calling the PrepareMCB
function.
After the for…next loop, the data file is opened and then each MCB is started.
(uConn21(i - 1).Comm “START”)
After starting, the “While Not bStop” loop is entered. This loop is executed until the
Stop
button
is clicked.
In the While loop, data is requested from each selected MCB with the GetRawData(0, 16384)
method. This function causes the digiBASE to transmit up to 16383 conversions. The first word
in the returned buffer reports the number of conversions that were actually available to be
returned.
The REDIM command resizes the data array to the size that was returned by the GetRawData
method. This prevents extraneous data from being written to the disk file.
The data is written to the disk file with the Put command.
The DoEvents command gives time for the
Stop
button to be clicked.
The remaining portion of the “While loop” prints out status information every 3 seconds.
Once
Stop
is clicked, the bStop flag gets set and the program exits from the while loop. The
remaining portion of the subroutine prints out some statistics about the average count rate and
the file is closed.
A.3.4.4. STOP_CLICK
Private Sub cmdStop_Click()
bStop = True
End Sub
When the
Stop
button is clicked, the bStop flag is simply set. The START_CLICK function will
notice the flag and stop acquisition.
51
Содержание ORTEC digiBASE
Страница 6: ...vi...