Keyence LS-3100/3100W Series Manual de usuario Pagina 67

  • Descarga
  • Añadir a mis manuales
  • Imprimir
  • Pagina
    / 104
  • Tabla de contenidos
  • SOLUCIÓN DE PROBLEMAS
  • MARCADORES
  • Valorado. / 5. Basado en revisión del cliente
Vista de pagina 66
61
CHAPTER 4 Functions and Controls
Program 3
The following settings are specified through the computer: simultaneous
measurement of DIA and EDGE1, 100 samplings for each of DIA and EDG1,
and display of maximum, minimum and average values of these measure-
ments.
Performs arithmetic
operation to obtain
maximum, minimum, and
average values
Processors or discards
data received after
continuous output has
been stopped
100 DIM D$ (100), E$ (100)
110 OPEN "COM1:4800,N,8,1,RS,CS,DS,CD" FOR RANDOM AS #1
120 PRINT #1, "X1D" Sets segment selector X, measurement part 1, and DIA
130 PRINT #1, "Y1E" Sets segment selector Y, measurement part 1, and EDGE1
140 PRINT #1, "VC0" Sets output channel CH1 and arithmetic operation "X"
150 PRINT #1, "VMN" Sets output channel CH1 and NORMAL mode
160 PRINT #1, "WC1" Sets output channel CH2 and arithmetic operation "Y"
170 PRINT #1, "WMN" Sets output channel CH2 and NORMAL mode
180 PRINT "START or END ? (Press [S] or [E] key)"
190 PRINT
200 A$=INPUT$ (1)
210 IF A$="E" OR A$="e" THEN END
220 IF A$<> "S" AND A$<> "S" THEN 200
230 PRINT #1, "X5" Sets continuous output of CH1 and then CH2 data
240 FOR I=1 TO 100
250 INPUT #1, D$ (I) Inputs data
260 INPUT #1, E$ (I)
270 NEXT I
280 PRINT #1, "X6" Stops continuous output
290 FOR I=1 TO 500 :NEXT I
300 IF EOF (1) = 0 THEN INPUT #1, DAMMY$ : GOTO 300
310 DMAX=-10000 :DMIN=10000 :DSUM=0
320 EMAX=-10000 "EMIN=10000 :ESUM=0
330 FOR I=1 TO 100
340 D=VAL (D$ (I))
350 IF D>DMAX THEN DAMX=D
360 IF D<DMIN THEN DMIN=D
370 DSUM=DSUM+D
380 E=VAL (E$ (I))
390 IF E>EMAX THEN EMAX=E
400 IF E<EMIN THEN EMIN=E
410 ESUM=ESUM+E
420 NEXT I
430 DAVE=DUSM/100
440 EAVE=ESUM/100
450 PRINT "[DIA] [EDGE]"
460 PRINT USING "MAX = ####,#### mm ####, #### mm" ; DMAX, EMAX
470 PRINT USING "MIN = ####, #### mm ####, #### mm" ; DMIN, EMIN
480 PRINT USING "AVE = ####, #### mm ####, #### mm" ;DAVE, EAVE
490 PRINT
500 GOTO 180
Note: The baud rate is set to 4800 bps in these 3 examples. Set the baud rate according to your requirements.
Displays
maximum,
minimum and
average
values
Displays prompt for
starting or ending
measurement
ls3100_49_64.p65 08.10.1, 10:56 AM61
Vista de pagina 66
1 2 ... 62 63 64 65 66 67 68 69 70 71 72 ... 103 104

Comentarios a estos manuales

Sin comentarios