DigSilent DPL

set Sloads,BusBars,allBars,OldMons;
object Ldf;
double X;
object busbar,result;
string nombre;
allBars = AllRelevant('*.ElmTerm');

!Ldf = GetCaseCommand('ComLdf');

fopen('test.txt','w',0);
for (busbar=allBars.First(); busbar; busbar=allBars.Next()) {
result=busbar.GetNextHVBus(); 
                             
busbar.GetVal(X,'m:u');
busbar.GetVal(nombre,'loc_name');  
fprintf(0,'%s\t %2.4f',nombre, X);

}     
fclose(0);