pbetancourtp

!Este script realiza simulaciones dinamicas (RMS) evaluando cortocircuitos
!bifasicos en las lineas seleccionadas.

!Para la ejecucion de este script es necesario añadir el conjunto de lineas
!a evaluar dando click derecho sobre el elemento luego add y por ultimo seleccionar
!Shortcircuit Set.

!En la seleccion general del DPL, ubicada en opciones basicas, se debera seleccionar
!el "SET" donde se han añadido los elementos en los cuales se realizarán las
! perturbaciones.

pbetancourtp

set Text,Sloads,BusBars,allBars,allLine,allLoad,allSym,OldMons;
object Ldf;  
object Ini;
object Sim;
string str,elemento;
double f_servicio,t_n,tension,Pwr,t_end,phi,frec,P_a,P_r,ve,p_a,p_r,pl_a,pl_r,pl_carga,terminal;
object busbar,load,gen,line,result;
string nombre,subestacion;  
double it;
allBars = AllRelevant('*.ElmTerm');