Megohmmeter
Model 24508
Page 32
Technical data
General informa
-
tion
Pr
eparations for
use
Contr
ols and con
-
nections
Manual operation
of the unit
Contr
olling the
unit r
emotely
Maintenance and customer service
Contr
olling the
unit r
emotely
*********** Funktionen (festgelegte Parameter)
‘Megohmmeter Function = Mxx,yy (ohne; weil letztes Zeichen = Termi-
nator CR)
‘ xx
= Anzahl der Messzyklen vor Datenuebertragung
‘ ,
= Separator
‘ YY
= Messmodus (Measurement mode)
‘ wenn = 0
= Automatische Messbereichswahl
‘
= 1-8 = Manuelle Messbereichswahl 1-8
‘
= 16 = Automatische Messbereichswahl mit
externem Trigger
‘
= 17-24 = Manuelle Messbereichswahl 1-8 mit
externem Trigger
‘Strommesser Function = Ixx,yy (Code wie unter Mxx,yy)
Messfunktion$ = „M08,00“: ‘ 8 Messzyklen, Automatische
Messbereichswahl;“
‘Messfunktion$ = „M10,16“: ’10 Messzyklen, Automatische MB(00) mit
externem Trigger(16);
‘Messfunktion$ = „I12,19“: ’12 Messzyklen, Manuelle Messbereichswahl(3)
und externem Trigger(16);
Endezeichen$ = CHR$(13) ‘Befehlsende-Zeichen
‘************ Parameter ueber die Schnittstelle senden ********
PRINT #1, Grenzwert$ + Voltage$ + Messfunktion$ + Endezeichen$; :
‘Schnittstelle
PRINT : PRINT „ Ausgabestring = „; ‘naechste Zeile
PRINT Grenzwert$ + Voltage$ + Messfunktion$ + Endezeichen$; : ‘Bild-
schirm
‘************ Typ 24508 Antwort (Fehlerflag) einholen und anzeigen
GOSUB einlesen: ‘CHR$(00) or CHR$(128) und CHR$(13) einlesen
’ 00H=(CHR$(00)) und 0DH=(CHR$(13))
‘ PRINT „ Typ 24508 Befehls-Antwort$ =“ + Lesen$ + CHR$(10):
‘CHR$(13)+CHR$(10)
‘ CR
LF
Flag1$ = „00“: ‘ Flag loeschen
Flag1$ = MID$(Lesen$, 1, 1):
PRINT : PRINT „ Flag_1 = Fehlerflag = „; CHR$(ASC(Flag1$)); :
‘Hex Ziffer in ASCII umsetzen
IF Flag1$ = CHR$(128) THEN ‘Hex 80 Binaer 0100 0000B = Fehler
PRINT „ Typ 24508 Steuer-Code-Fehler = 80“
