source: SHX/trunk/SeismicHandler/cmdscripts/LOCAL_MAGNITUDE_ESTIMATOR.SHC @ 1235

Revision 1235, 1.2 KB checked in by klaus, 2 years ago (diff)

added excluded networks

Line 
1! file LOCAL_MAGNITUDE_ESTIMATOR.SHC
2!      =============================
3!
4! K. Stammler, 19-Dec-2016
5
6default 1  ;;  origin time
7default 2  ;;  latitude
8default 3  ;;  longitude
9default 4  ;;  plotfile
10default 5  ;;  result file
11default 6  ;;  save file
12
13sdef rtime
14sdef trcno
15sdef magn
16sdef corrmagn
17
18sdef filnam hp1hz4
19
20calc t &rtime = #1 tadd -60.
21
22param set origin_time #1
23param set epi_latitude #2
24param set epi_longitude #3
25param set source_depth 1
26
27del all
28phase clear_all
29fdsnws |#2|,|#3|,4| * * hh? "rtime 360
30fdsnws |#2|,|#3|,4| * * hh? "rtime 360 /addr=eth /excludenets=z3,s,c4
31fdsnws |#2|,|#3|,4| * * hh? "rtime 360 /addr=gfz /excludenets=z3,zs
32meta all complete /addr=gfz
33meta all complete /addr=eth
34meta all complete /del_incomplete
35sort_by_distance #2 #3
36if #6 eqs ;; goto saveok:
37    writeo #6 all mseed
38saveok:
39@THEOPHASE LOCAL ALL Pg,Sg,Pn,Sn
40calc i &trcno = $dsptrcs
41simulate all wood-anderson
42del |1-|"trcno|
43calc i &trcno = $dsptrcs
44if "filnam eqs ;; goto filok:
45    fili f "filnam
46    filter f all
47    del |1-|"trcno|
48filok:
49sort_by_distance #2 #3
50@MAGNITUDE DETERMINE ml ALL Pg,Sg,Pn,Sn 16
51magnitude estimator ml all &magn &corrmagn #4
52echo_ch #5
53echo "magn "corrmagn
54echo_ch
55
56return
Note: See TracBrowser for help on using the repository browser.