Inhaltsverzeichnis
Werbung
G–8
z$ = INPUT$(1, #1)
PRINT " Kanal 3 Kanal 4 Zeitkanal"
FOR i = 1 TO anzwdh%
FOR j = 1 TO anzzln%
FOR k = 1 TO anzsig%
z$ = INPUT$(1, #1) + CHR$(0)
p% = CVI(z$)
rd$ = CHR$(0) + INPUT$(3, #1)
IF k = 1 THEN
wert! = ((CVL(rd$) / 256) * 2) / 7680000
PRINT USING "+##.###"; wert!;
PRINT " mV/V ";
ELSEIF k = 2 THEN
wert! = ((CVL(rd$) / 256) * 5000) / 7680000
PRINT USING "###.###"; wert!;
PRINT " Ohm
";
ELSE
wert! = ((CVL(rd$) / 256) * 416.7) / 1000000
PRINT USING "##.##"; wert!;
PRINT " s";
END IF
NEXT k
PRINT
NEXT j
PRINT
NEXT i
GET #1, , p%
MGCplus Betrieb mit Rechner oder Terminal
'0 einlesen
'Überschrift
'Anzahl der Wiederholungen
'Anzahl der Meßwertzeilen
'Summe der Signale aller Kanäle
'Meßwert-Status einlesen
'Meßwert einlesen
'Kanal 3
'mV/V
'Kanal 4
'Ohm
'Zeitkanal
's (1/2400Hz = 416.7µs)
'2 Byte (CRLF) einlesen
Programmerstellung
Werbung
Inhaltsverzeichnis
