Macro SAC untuk sinyal pergeseran

  • Mengubah percepatan menjadi pergeseran

               r *LHZ
               rtrend
               int
               r more         !  menghilangkan drift “penyok”
               p1



  •  Mengubah sampling sinyal menjadi lebih kecil (down sampling)


            SAC > qdp off
            SAC > bd x
            SAC > synch               # memperjelas sinyal to synchronice the time all components
            SAC > interpolate delta 0.5
            SAC > p1
            SAC > lh
                        DELTA : 5E-1
                        sebelumnya   DELTA : 1E+0

            NyQIST frequency = 1/(2*DELTA) = 1/ (2*0.5) = 1.0
            NyQIST frequency adalah maksimum frequency. DELTA adalah sampling per second
           
            SAC > decimate 2

Downsampling diperlukan untuk mengurangi harga filter sehingga benar-benar mendapatkan harga frekwensi corner yang layak. Nilai downsampling hanya sekitar 2 – 7.

  • Prosedur untuk phase picking gelombang P dan S

              SAC > r coco.sac
              SAC > lh DIST
                        Ubah dalam bentuk degree DEG = DIST / 111.267
                        Lihat dalam Tabel Jeffrey Bullens (Gambar 1) untuk DEGREE 
                        sehingga dapat diketahui kapan waktu kedatangan gel P dan S
                        Misal :     COCO
                                      DEG  = 1.201442e+03 / 111.267 = 10.8
                                    dalam tabel didapatkan waktu gel P = 3.70 dan S = 5.80
                                    
Kemudian observasi sinyal secara manual untuk mendapatkan nilai waktu sebenarnya

            SAC > bd x
            SAC > qdp off
            SAC > r coco.sac
            SAC > synch
            SAC > ppk  ----------> pick gel P dan S
            SAC > lh 

            Bandingkan hasil obs dengan tabel, usahakan deviasi tidak terlalu jauh (+/- 40 dtk)

            SAC > w over   

             menimpa nama file lama

            SAC > ch a -12345 t0 -12345

           menghapus picking dan kembali ke sinyal asli

  • Untuk mengubah dari gambar sac menjadi ps file:

                      bd sgf    # start sac graphics file (sgf)
                       p1
                      sgftops f001.sgf COCO_enr.ps  # convert to sgf to ps file
                      quit from sac
                      rm -f *.sgf   # remove sgf files
                      gs COCO_enr.ps

  • Membuat label judul, absis, dan ordinat

                      title on
                      xlabel "Time @(s@)"
                      ylabel "Velocity @(nm/s@)"
                      * set the xlabel and ylabel
                      ylim all
                      * set the y-axis to be the same
                      xlim o o +8
                set the time axis to be from origin time to 8 sec after the origin time


Gabungkan tiga komponen sekaligus

               rm -f *.sgf
               setbb sacfile "$sta$.*"  #setbb sacfile "$sta$.[zne]"
               setbb psfile "$sta$_3c.eps"  #set three component data

               qdp off
               r COCO.sac
               rmean
               bp p 2 n 4 c 1 10 #4th order bandpass butterworth filter with 1 - 10 Hz

               setbb ds '( concatenate ' &1,kstnm ' ' &1,kzdate ' ' &1,kztime ' ) '
               evaluate to r &1,dist
              title '( concatenate ' %ds% ' ', dist = ' ' %r km ') '
              * get the stn name, reference time, and distance from SAC header
              * and put them into the title
              fileid l ul
              fileid t l kcmpnm
             * display the component name
             * fileid Controls the file id display found on most SAC plots.
             * TYPE LIST hdrlist  :  Define a list of header fields to display in the
             * fileid.
             * LOCATION UL  :  Place file id in upper left hand corner.

Perintah envelope untuk membalikkan sinyal 90 derajat atau menjadikan bernilai positif dengan transformasi Hilbert. 


Gambar 1. Tabel Jeffery Bullens




Komentar

Postingan populer dari blog ini

Install SAC

Metode Magnet Sebagai Prekursor Gempabumi

Download data IRIS Wilber orfeus II