Leica tps1100, Руководство пользователя, Страница: 241 / 1154

GeoBASIC Reference Manual 2.GeoBasic Constructs
2-12 TPS1100-Version 1.30
The first element of the array now contains the value
20
10
2
=
.
♦
We can also use variables for the index; assume we had declared an integer
variable
iIndex
.
DIM iIndex AS Integer
iIndex = 2
MyFirstArray( iIndex ) = 5
♦
And even more complicated, the index variable may of course be an indexed
variable.
iIndex = 1
MyFirstArray( iIndex ) = MyFirstArray( MyFirstArray(
iIndex ) )
Note For keeping track of value changes it is often convenient to draw a table
with pencil and paper. But as a rule, a program should always be written
and commented so well that is immediately clear what is done when
reading the program.
State
MyFirstArray(1) MyFirstArray(2) iIndex
1 10 20 –
2 2 20 –
3 2 20 2
4 2 5 2
5 2 5 1
6 5 5 1
♦
Array variables of the same type can be assigned as a whole, no matter how
complex they are. This is equivalent to assigning all elements separately.
DIM A1 AS MyFirstArrayType
DIM A2 AS MyFirstArrayType
A1(1) = 1
A1(2) = 2
A2 = A1 'equivalent to
'
A2(1) = A1(1)