Unit 6.11 -- Two Dimensional Array Dealing with Columns
               See SILVER 5.3 Specifically


PROG

See Program

PED

to  learn  how to handle two-dimensional logic that proceeds
by column

CONCEPTS

AX:array[k..m,x..n] of integer;
For i = x to p
  for j= k to m
    process AX(j,i)

Let regA represent the address of the current column
Let regB represent the address of the row within that column

gets converted to

LA regA,AX
set regC to the number of bytes in a row
FOR I stuff
  LR regB,regA
  FOR J stuff
     process  stuff  at 0(0,regB)     <-- process  stuff  at
A(J,I)
    AR regB,regC
       OR
    A  regB,=A((n-x+1)*4)
  END for J stuff
  add 4 to regA
END for i stuff

SF

none


22.html