Programmbeispiel (Q-Basic) - Grundig TG 100 Gebrauchsanweisung

7.5Programmbeispiel (Q-Basic)

1Ø REM *****************************************************
2Ø REM BEISPIEL FÜR TG 100 MIT RS 232C-SCHNITTSTELLE
3Ø REM
4Ø REM GENERATOREINSTELLUNG - AUSGANGSFREQUENZ: 1.234 kHz
5Ø REM
6Ø REM *****************************************************
70 REM
8Ø CLS
9Ø REM
1ØØ IDCL$=CHR$(2Ø):IREN$=CHR$(9):ILLO$=CHR$(25):IGTL$=CHR$
(1)
11Ø REM
12Ø REM
13Ø OPEN "com2:12ØØ,n,8,1,CS3ØØØØ,LF" FOR RANDOM AS #1
14Ø REM
15Ø REM
16Ø PRINT #1,IDCL$;IREN$;ILLO$;"*RST;*CLS"
17Ø REM
18Ø REM
19Ø PRINT #1,"FREQ 1.234E+3"
2ØØ REM
21Ø REM
22Ø PRINT #1,"UNIT V"
23Ø REM
24Ø REM
25Ø PRINT #1,"LEVEL !"
26Ø REM
27Ø REM *** ÜBERGANG ZUR LOKALEN BEDIENUNG DES TG 100 ***
28Ø PRINT #1,"*OPC?"
29Ø INPUT #1,A$
3ØØ PRINT #1,IGTL$
31Ø REM
32Ø REM
33Ø CLOSE #1
34Ø END
PORT COM 2, ÜBERTRAGUNGSRATE 1200 Bd
*** SCHNITTSTELLE AKTIVIEREN ***
*** SCHNITTSTELLE KONFIGURIEREN ***
*** TG 100 KONFIGURIEREN ***
*** FREQUENZ EINSTELLEN ***
*** EINSTELLUNG DER MASSEINHEIT ***
*** EINSTELLUNG DES AUSGANGSPEGELS ***
*** ABSCHLUSS ***
- AUSGANGSPEGEL
26
: 1 V