(read only)


This property returns a complex array of currents into each conductor of each terminal.


Example


% Create DSS object

DSSObject = actxserver('OpenDSSEngine.DSS')

if ~DSSObject.Start(0),

                    disp('Unable to start openDSS');

                    return

end;

DSSText = DSSObject.Text;

DSSCircuit = DSSObject.ActiveCircuit;

DSSLines = DSSCircuit.Lines;

% Compile a model        

DSSText.Command = 'Compile C:\myPath\myModel.dss';

DSSActiveElement = DSSCircuit.ActiveCktElement;

% Sets the first line of the list as the active element

if DSSLines.First > 0,

    % Gets the currents

    myCurr = DSSActiveElement.Currents;

    % Formats the array as complex and polar arrays

    mySize = size(myCurr);

    myCurrCmplx = []

    myCurrPolar = []

    for a = 1:2:mySize(2),

        CNum = myCurr(a) + i*myCurr(a + 1);

        myCurrCmplx = [myCurrCmplx;CNum];

        myCurrPolar = [myCurrPolar;[abs(CNum),angle(CNum)*180/pi]];

    end;

else 

    disp('It seems that you have no lines!');

end;