| 
            Last change
 on this file since 3979 was             3591, checked in by ansari, 17 years ago           | 
        
        
          | 
             
Ajout script d'affichage/verification donnees fits BAORadio - Reza 03/04/2009 
 
           | 
        
        
          | 
            File size:
            716 bytes
           | 
        
      
      
| Rev | Line |   | 
|---|
| [3591] | 1 | 
 | 
|---|
 | 2 | # Script pour lire un fichier FITS et afficher des lignes ( contenu des paquets)
 | 
|---|
 | 3 | # Appel  /Dev/AcquisBAO/Script/dispbrp.pic NomFichierFits CutRow CutCols
 | 
|---|
 | 4 | delobjs *
 | 
|---|
 | 5 | set sigo signal0
 | 
|---|
 | 6 | set basedir /Raid/TestNancay_6avril2009/
 | 
|---|
 | 7 | # set file $1/$sigo.fits
 | 
|---|
 | 8 | set file $basedir/Raw_$1/$sigo.fits
 | 
|---|
 | 9 | 
 | 
|---|
 | 10 | echo '----> Opening file ' $file
 | 
|---|
 | 11 | readfits $file
 | 
|---|
 | 12 | 
 | 
|---|
 | 13 | listobjs 
 | 
|---|
 | 14 | set cutrow (r<1)
 | 
|---|
 | 15 | set cutcol (c<5000)
 | 
|---|
 | 16 | if ( $# > 1 )  then 
 | 
|---|
 | 17 |   set cutrow $2
 | 
|---|
 | 18 | endif
 | 
|---|
 | 19 | echo ' ---- CutRow= ' $cutrow
 | 
|---|
 | 20 | if ( $# > 2 )  then 
 | 
|---|
 | 21 |   set cutcol $3
 | 
|---|
 | 22 | endif
 | 
|---|
 | 23 | echo ' ---- CutCol= ' $cutcol ' PAS UTILISE'
 | 
|---|
 | 24 | 
 | 
|---|
 | 25 | 
 | 
|---|
 | 26 | setaxesatt 'font=helvetica,bold,16 autofontsize=0.05 minorticks'
 | 
|---|
 | 27 | zone 1 2
 | 
|---|
 | 28 | 
 | 
|---|
 | 29 | plot2d $sigo c val ${cutrow}&&c>23 'blue font=helvetica,bold,16 fixedfontsize connectpoints win'
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.