Hellmut
19.02.2005, 18:29
Hallo Freunde
Ich programmiere gerade mit BASCOM AVR die von mir benötigten VT100 Befehle um die Ausgabe von der RN-Control oder RN-Motor über die RS232 formatiert auf dem Terminal Tool darzustellen.
Wenn ich folgenden Kode ausführe, so wird der Bildschirminhalt des Terminal Emulators gelöscht und die Ausgabe erscheint dann so wie ich will:
printbin 27 ; 91 ; 50 ; 74
Wenn ich jetzt jedoch ein Array mit 4 Elementen deklariere:
Dim Vterasescreen(4) As Byte
Die Werte im Array initialisiere
Vterasescreen(1) = 27
Vterasescreen(2) = 91
Vterasescreen(3) = 50
Vterasescreen(4) = 74
Varerasescreen = 4
und dann die Anweisung:
Printbin Vterasescreen(1) ; Varerasescreen
verwende erscheint vor dem eigentlichen Text nur Schrott. Offensichtlich ist das Ergebnis von printbin auf das Element in Array nicht equivalent mit dem printbin des Wertes den ich dem Array-Element zugewiesen habe.
Folgerichtig müsste meine Array Deklaration mit "as byte" falsch sein. Wie mache ich es richtig? Danke, es ist dringend.
Ich programmiere gerade mit BASCOM AVR die von mir benötigten VT100 Befehle um die Ausgabe von der RN-Control oder RN-Motor über die RS232 formatiert auf dem Terminal Tool darzustellen.
Wenn ich folgenden Kode ausführe, so wird der Bildschirminhalt des Terminal Emulators gelöscht und die Ausgabe erscheint dann so wie ich will:
printbin 27 ; 91 ; 50 ; 74
Wenn ich jetzt jedoch ein Array mit 4 Elementen deklariere:
Dim Vterasescreen(4) As Byte
Die Werte im Array initialisiere
Vterasescreen(1) = 27
Vterasescreen(2) = 91
Vterasescreen(3) = 50
Vterasescreen(4) = 74
Varerasescreen = 4
und dann die Anweisung:
Printbin Vterasescreen(1) ; Varerasescreen
verwende erscheint vor dem eigentlichen Text nur Schrott. Offensichtlich ist das Ergebnis von printbin auf das Element in Array nicht equivalent mit dem printbin des Wertes den ich dem Array-Element zugewiesen habe.
Folgerichtig müsste meine Array Deklaration mit "as byte" falsch sein. Wie mache ich es richtig? Danke, es ist dringend.