Uniblitz VMM-T1, Руководство пользователя

Страница: 27 / 43

VMM-T1 User Manual 27
RS-232C Test Program
The following is a test program written to test the input commands to the RS-232 interface of the VMM-
T1 controller. This program and LabView programs (not listed) are available by contacting Vincent
Associates at our web site (www.uniblitz.com), via e-mail (vincentassociates@uniblitz.com), or calling
(800) 828-6972. Other programs may be available, please contact technical support for further
information.
REM PROGRAM TO SEND COMMAND PULSES TO RS232C INTERFACE AND VMM-T1
REM WRITTEN BY STEVE PASQUARELLA, VINCENT ASSOCIATES.
REM LAST REVISION 7/29/99 BY RICHARD ST.LOUIS
REM COMPUTER LANGUAGE USED – Microsoft Quick Basic ver. 4.0
CLS 0
K = -1
WHILE K
OPEN "COM1:9600,N,8,1,CS0,DS0" FOR RANDOM AS #1
J = 64
C$ = "X"
MENU: PRINT
PRINT
PRINT
PRINT "WAITING FOR KEYSTROKE COMMAND "
PRINT "TYPE:"
PRINT " VMM-T1 "
PRINT " --------- "
PRINT " O - OPEN Shutter "
PRINT " C - CLOSE Shutter "
PRINT " T - TRIGGER Control "
PRINT " R - RESET Control "
PRINT " G - OPEN Aux-Out "
PRINT " F - CLOSE Aux-Out "
PRINT
PRINT " S - SET Octal Switch Address "
PRINT " (Current Starting Decimal # ="; J; ")"
PRINT " (Current Octal Address Value = "; C$; ")"
PRINT
PRINT " Q - QUIT Program "
PRINT
PRINT
START: A$ = INKEY$
IF A$ = "O" OR A$ = "o" THEN
PRINT #1, CHR$(J);
PRINT "SHUTTER OPEN COMMAND SENT"