%COMMAND a := FakPla() %COMMAND i := 1 %WHILE i <= Len(a) %a[i,1]% %Tc(a[i,2])% %COMMAND i := i + 1 %ENDDO