Hallo zusammen!
Ich habe ein kleine Problem mit einem Array unter Bascom.
Hier der Code:
1 | Dim Text(20) As Byte
|
2 | Dim I As Byte
|
3 |
|
4 | i = 1
|
5 | For i = 1 To 20
|
6 | Text(i) = Lookup(i , Wert1)
|
7 | Next
|
8 |
|
9 | Wert1:
|
10 | Data &H00 , &H01 , &H02 , &H03 , &H04 , &H05 , &H06 , ...
|
11 |
|
12 | Printbin Text(1) ; Text(2) ; Text(3) ; Text(4) ; ...
|
Wenn ich nun testweise nur Text(1) mit Prinbin ausgebe, dann erscheint
zwar als erstes der richtige Wert aus der Tabelle (Wert1) aber dann
kommen die restlichen Zeichen der Tabelle. Also so:
Printbin Text(1)
am Terminalprogramm wird ausgegeben:
00 01 02 03 04 05 06 07 ...
wenn ich Prinbin Text(19) nehme dann:
19 20
Wieso gibt mir Bascom immer den Rest des Arrays mit aus und nicht nur
den Wert des gewünschten Index?
Maxl