/[PAMELA software]/yoda/techmodel/forroutines/tracker/common/common_readraw.f
ViewVC logotype

Diff of /yoda/techmodel/forroutines/tracker/common/common_readraw.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 6.0 by kusanagi, Tue Feb 7 17:11:10 2006 UTC revision 6.1 by kusanagi, Fri Jun 23 12:13:13 2006 UTC
# Line 4  Line 4 
4  *  *
5  *  *
6  *     10/9/2005 modified by david fedele to include general variables  *     10/9/2005 modified by david fedele to include general variables
7    *     23/6/2006 modified by elena to fix a bug
8  *  *
9  **************************************************************  **************************************************************
10    
11          
12          parameter (MAXBUFFLEN=z'172c8')
13          integer YODAflag
14          integer*4 length_buffer
15          integer*1 buffer(MAXBUFFLEN)
16          integer curpos            !current position in buffer
17          integer startcrc
18          integer stopcrc
19    c      common/yoda_buffer/YODAflag,length_buffer,buffer,curpos,startcrc,stopcrc
20    
21        integer*2 header(16)      !header: 16 2-byte words        integer*2 header(16)      !header: 16 2-byte words
22        integer*2 trailer(3)      !trailer: 3 2-byte words        integer*2 trailer(3)      !trailer: 3 2-byte words
# Line 42  Line 52 
52       $     ff,checksum_cal       $     ff,checksum_cal
53       $     ,DSPped_o,DSPsig_o,DSPbad_o,crc_calib,crc_hcalib         $     ,DSPped_o,DSPsig_o,DSPbad_o,crc_calib,crc_hcalib  
54    
55    *
56    *               common for data packet
57    *
58          parameter (MAXBTRALEN=200000)
59        integer DAQmode_dat       !9  = full acquisition mode        integer DAQmode_dat       !9  = full acquisition mode
60                                  !10 = compressed acquisition mode                                  !10 = compressed acquisition mode
61                                  !11 = compressed+full acquisition mode                                  !11 = compressed+full acquisition mode
# Line 62  Line 76 
76        integer fl1_dat           !flag        integer fl1_dat           !flag
77        integer fl6_dat           !flag        integer fl6_dat           !flag
78        integer checksum_dat       !DSP header checksum        integer checksum_dat       !DSP header checksum
79        integer*2 b_tra(100000)    !DATA BUFFER        integer l_tra
80          integer*2 b_tra(MAXBTRALEN)    !DATA BUFFER
81        integer pnum_dat,cmdnum_dat,bid_dat,alarm_dat,aswr_dat        integer pnum_dat,cmdnum_dat,bid_dat,alarm_dat,aswr_dat
82        integer crc_dat        integer crc_dat
83                
# Line 72  Line 87 
87       $     ,addrcluster_dat,signcluster_dat       $     ,addrcluster_dat,signcluster_dat
88       $     ,fc_dat,compressiontime_dat       $     ,fc_dat,compressiontime_dat
89       $     ,fl5_dat,fl4_dat,fl3_dat,fl2_dat,fl1_dat,fl6_dat       $     ,fl5_dat,fl4_dat,fl3_dat,fl2_dat,fl1_dat,fl6_dat
90       $     ,checksum_dat,datalength_dat,b_tra       $     ,checksum_dat,datalength_dat,l_tra,b_tra
91       $     ,pnum_dat,cmdnum_dat,bid_dat       $     ,pnum_dat,cmdnum_dat,bid_dat
92       &     ,alarm_dat,aswr_dat       &     ,alarm_dat,aswr_dat
93       &     ,crc_dat       &     ,crc_dat
Legend:
Removed from v.6.0  
changed lines
  Added in v.6.1
  ViewVC Help
Powered by ViewVC 1.1.23