faultmain.m

来自「一个用matlab编写的用于故障诊断的源程序」· M 代码 · 共 34 行

clear all;
clc;
%main program for the fault analysis package
nb=input('enter the number of buses');
ng=input('enter the number of generators');
nl=input('enter the number of lines');
nt=input('enter the number of transformers');
%the following section determines choice of function
choice=input('enter your choice 1) data entry 2) fault analysis');
if choice==1
    dataentry(nb,ng,nl,nt);
end

if choice==2
    fid=fopen('faultdata.txt','r');
    b=textread('faultdata.txt');
    fclose(fid);
    if b(2)==1
        %three phase fault analysis
        done=threephfault(nb,ng,nl,nt);
    end
    if b(2)==2
        %SLG fault analysis
        done=slgfault(nb,ng,nl,nt);
    end
    if b(2)==3
        %LL fault analysis
        done=llfault(nb,ng,nl,nt);
    end
    if b(2)==4
        %LLG fault analysis
        done=llgfault(nb,ng,nl,nt);
    end
end