DEFINE value WORD
DEFINE i BYTE
FOR i = 0 to 3
LOOKTAB mytab,i,value
PRINT "mytab["; i; "]="; value
NEXT
END
TABLE mytab 12 -20 0 1000
TABEND
Am Bildschirm des Terminalprogramms sollte erscheinen
mytab[0]=12
mytab[l]=-20
mytab[2]=0
mytab[3]=1000
Besonders nützlich erweisen sich Tabellen beim Umsetzen von A/D-Werten in echte physikalische Größen.
Eine Umsetzungstabelle hat dann in der Regel 256 Einträge. Der gemessene A/D-Wert geht dann als Tabel-
lenindex in die Bestimmung der physikalischen Größe ein.
Die Echtzeituhr
Um den Stand der internen Echtzeituhr auszulesen und zu setzen, sind folgende globale Variablen definiert:
YEAR Jahr (0...99)
MONTH Monat (1...12)
DAY Tag des Monats (1...31)
DOW Wochentag (O=Sonntag...6=Samstag)
HOUR Stunde (0...23)
MINUTE Minute (0...59)
SECOND Sekunde (0...59)
Beachten Sie bitte, dass während des Zugriffs die interne Uhr weiterläuft. Der Sekundenwert sollte daher
stets zuerst ausgelesen werden. Steht er auf 59, so muss nach dem Lesen der letzten interessierenden Zeit-
information
(z.B YEAR) der Sekundewert nochmals gelesen und auf =O getestet werden. In diesem Fall ist das Auslesen
der Echtzeituhr zu wiederholen, da eine neue Minute angebrochen ist (Extremfall Silvester mit Weiterschal-
ten aller Stellen in Uhr und Datum). Die Jahreszahl wird im C-Control System nur zweistellig abgespeichert.
Anmerkung:
Durch einen Fehler im Betriebssystem zählt DOW bis 7. Sie können diesen Fehler korrigieren, indem in
jedem BASIC-Programm, dass auf den Wochentag angewiesen ist, die IF-Abfrage
IF DOW > 6 THEN DOW = 0
vor JEDEM Auslesen des DOW-Registers eingefuegt wird.
Interner Timer,Tonerzeugung, Frequenzmessung
• Timer
Der interne 20-Millisekunden-Timer kann über den vordefinierten Bezeichner TIMER ausgelesen werden.
Der Timer ist freilaufend und kann nicht gestellt oder rückgesetzt werden.
• Ausgabe von Tönen mit BEEP
Der C-ControVBASIC Steuercomputer kann an einem seiner Pins (BEEP-Pin, entspricht Prozessorausgang
TCMPI) Töne als Rechteckschwingungen ausgeben. Der Befehl dazu lautet
32