Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Мой диплом. УРА!!! 3.1.docx
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
3.26 Mб
Скачать

Приложение б

(обязательное)

Программа по построению волновых форм спектрограмм землетрясений и микросейсм до и после землетрясений

p='f:\ATR\';

p2='f:\';

%nomer='13';

switchnomer

case '01'

filenameX1='2014204214130320_POLE__1_2.atr';

filenameY1='2014204214130320_POLE__1_3.atr';

filenameX2='2014204224130320_POLE__1_2.atr';

filenameY2='2014204224130320_POLE__1_3.atr';

filetime=datenum(2014,07,23,21,41,30.320);

begtime=datenum(2014,07,23,22,48,17);

ZTname='M=1.1,Az=000';

timeDo=50; timePosle=100;

z1=-125; z2=-90;

case '02'

filenameX1='2014205135635320_POLE__1_2.atr';

filenameY1='2014205135635320_POLE__1_3.atr';

filenameX2='2014205145635320_POLE__1_2.atr';

filenameY2='2014205145635320_POLE__1_3.atr';

filetime=datenum(2014,07,24,13,56,35.320);

begtime=datenum(2014,07,24,14,48,9); %!!!!!

ZTname='M=2.4,Az=097';

timeDo=50; timePosle=100;

z1=-120; z2=-80;

case '04'

Продолжение приложения б

filenameX1='2014205165635320_POLE__1_2.atr';

filenameY1='2014205165635320_POLE__1_3.atr';

filenameX2='2014205175635320_POLE__1_2.atr';

filenameY2='2014205175635320_POLE__1_3.atr';

filetime=datenum(2014,07,24,16,56,35.320);

begtime=datenum(2014,07,24,17,12,3);

ZTname='M=3.8,Az=027';

timeDo=50; timePosle=250;

z1=-120; z2=-50;

case '05'

filenameX1='2014205175635320_POLE__1_2.atr';

filenameY1='2014205175635320_POLE__1_3.atr';

filenameX2='2014205185635320_POLE__1_2.atr';

filenameY2='2014205185635320_POLE__1_3.atr';

filetime=datenum(2014,07,24,17,56,35.320);

begtime=datenum(2014,07,24,18,40,42);

ZTname='M=1.8,Az=107';

timeDo=50; timePosle=100;

z1=-125; z2=-80;

case '06'

filenameX1='2014206055635320_POLE__1_2.atr';

filenameY1='2014206055635320_POLE__1_3.atr';

filenameX2='2014206065635320_POLE__1_2.atr';

filenameY2='2014206065635320_POLE__1_3.atr';

filetime=datenum(2014,07,25,05,56,35.320);

begtime=datenum(2014,07,25,06,07,2);

ZTname='M=0.9,Az=239';

timeDo=50; timePosle=70;

z1=-115; z2=-95;

Продолжение приложения б

case '07'

filenameX1='2014206115635320_POLE__1_2.atr';

filenameY1='2014206115635320_POLE__1_3.atr';

filenameX2='2014206125635320_POLE__1_2.atr';

filenameY2='2014206125635320_POLE__1_3.atr';

filetime=datenum(2014,07,25,11,56,35.320);

begtime=datenum(2014,07,25,12,43,6);

ZTname='M=0.7,Az=229';

timeDo=50; timePosle=40;

z1=-125; z2=-80;

case '08'

filenameX1='2014206175635320_POLE__1_2.atr';

filenameY1='2014206175635320_POLE__1_3.atr';

filenameX2='2014206185635320_POLE__1_2.atr';

filenameY2='2014206185635320_POLE__1_3.atr';

filetime=datenum(2014,07,25,17,56,35.320);

begtime=datenum(2014,07,25,18,04,27);

ZTname='M=2.0,Az=117';

timeDo=50; timePosle=150;

z1=-125; z2=-85;

case '09'

filenameX1='2014206205635320_POLE__1_2.atr';

filenameY1='2014206205635320_POLE__1_3.atr';

filenameX2='2014206215635320_POLE__1_2.atr';

filenameY2='2014206215635320_POLE__1_3.atr';

filetime=datenum(2014,07,25,20,56,35.320);

begtime=datenum(2014,07,25,21,24,7);

ZTname='M=1.6,Az=249';

timeDo=50; timePosle=100;