Campbell CR800 Series, Руководство оператора

Страница: 185 / 598

Section 7. Installation
185
• If indices are not specified, or none have been preceded with a minus
sign, the least significant dimension of the array is assumed.
•
The offset into the dimension being accessed is given by (a,b,c) .
• If the array is referenced as array() , the starting point is array(1,1,1) and
the least significant dimension is accessed. For example, if the array is
declared as test(a,b,c) , and subsequently referenced as test() , then the
starting point is test(1,1,1) and dimension c is accessed.
Array Assigned Expression: Sum Columns and Rows
'This example sums three rows and two columns of a 3x2 array.
'Source array image:
'1.23,2.34
'3.45,4.56
'5.67,6.78
Public Array(3,2) = {1.23,2.34,3.45,4.56,5.67,6.78} 'load values into source array
Public RowSum(3)
Public ColumnSum(2)
BeginProg
Scan (1,Sec,0,0)
'For each row, add up the two columns
RowSum() = Array(-1,1)() + Array(-1,2)()
'For each column, add up the three rows
ColumnSum() = Array(1,-1)() + Array(2,-1)() + Array(3,-1)()
NextScan
EndProg
Array Assigned Expression: Transpose an Array
'This example transposes a 3x2 array to a 2x3 array
'Source array image:
'1,2
'3,4
'5,6
'Destination array image (transpose of source):
'1,3,5
'2,4,6
'Dimension and initialize source array
Public A(3,2) = {1,2,3,4,5,6}
'Dimension destination array
Public At(2,3)
'Delcare For/Next counter
Dim i