| 1 |
*************************************************************** |
| 2 |
* |
| 3 |
* common for data format |
| 4 |
* |
| 5 |
************************************************************** |
| 6 |
|
| 7 |
parameter (max_event_l=20000) |
| 8 |
integer*2 event_buffer(max_event_l) |
| 9 |
integer l_buffer |
| 10 |
common/event/event_buffer,l_buffer |
| 11 |
|
| 12 |
|
| 13 |
|
| 14 |
integer*2 header(16) !header: 16 2-byte words |
| 15 |
integer*2 trailer(3) !trailer: 3 2-byte words |
| 16 |
integer checkheader !header control flag: |
| 17 |
! =1 if some error occurred |
| 18 |
! =2 if Acquisition header, |
| 19 |
! =3 if Calibration header |
| 20 |
common/pkt_structure/header,checkheader,trailer |
| 21 |
|
| 22 |
integer DAQmode_cal ! |
| 23 |
integer DSPnumber_cal !view number |
| 24 |
integer dataword |
| 25 |
integer calibrationnumber |
| 26 |
integer nused_event |
| 27 |
integer ped_1,ped_2,ped_3 |
| 28 |
integer sig_1,sig_2,sig_3 |
| 29 |
integer nbad_1,nbad_2,nbad_3 |
| 30 |
integer ff |
| 31 |
integer checksum_cal |
| 32 |
integer DSPbad_o(nviews,nstrips_view) !online bad strips |
| 33 |
real DSPped_o(nviews,nstrips_view) !online pedestal |
| 34 |
real DSPsig_o(nviews,nstrips_view) !online sigma |
| 35 |
|
| 36 |
common/calibration_pkt/DAQmode_cal,DSPnumber_cal |
| 37 |
$ ,dataword,calibrationnumber, |
| 38 |
$ nused_event, |
| 39 |
$ ped_1,ped_2,ped_3, |
| 40 |
$ sig_1,sig_2,sig_3, |
| 41 |
$ nbad_1,nbad_2,nbad_3, |
| 42 |
$ ff,checksum_cal |
| 43 |
$ ,DSPped_o,DSPsig_o,DSPbad_o |
| 44 |
|
| 45 |
|
| 46 |
integer DAQmode_dat !9 = full acquisition mode |
| 47 |
!10 = compressed acquisition mode |
| 48 |
!11 = compressed+full acquisition mode |
| 49 |
integer DSPnumber_dat !view number |
| 50 |
integer DATAlength_dat !data buffer length |
| 51 |
integer eventn_dat !DSP event number |
| 52 |
integer nclust_dat!nclust*2+1 = number of strips to be |
| 53 |
integer cutc_dat !cut to include strips in a cluster |
| 54 |
integer cutcl_dat !cut to search for clusters |
| 55 |
integer addrcluster_dat(3) !address of the greatest cluster(view,ladder) |
| 56 |
integer signcluster_dat(3) !signal of the greatest cluster(view,ladder) |
| 57 |
integer fc_dat !compression flag |
| 58 |
integer compressiontime_dat !DSP program compression time |
| 59 |
integer fl5_dat !flag |
| 60 |
integer fl4_dat !flag |
| 61 |
integer fl3_dat !flag |
| 62 |
integer fl2_dat !flag |
| 63 |
integer fl1_dat !flag |
| 64 |
integer fl6_dat !flag |
| 65 |
integer checksum_dat !DSP header checksum |
| 66 |
integer*2 b_tra(100000) !DATA BUFFER |
| 67 |
|
| 68 |
c common/data_pkt/DAQmode_dat,DSPnumber_dat |
| 69 |
c $ ,eventn_dat,nclust_dat |
| 70 |
c $ ,cutc_dat,cutcl_dat |
| 71 |
c $ ,addrcluster_dat,signcluster_dat |
| 72 |
c $ ,fc_dat,compressiontime_dat |
| 73 |
c $ ,fl5_dat,fl4_dat,fl3_dat,fl2_dat,fl1_dat,fl6_dat |
| 74 |
c $ ,checksum_dat,datalength_dat,b_tra |
| 75 |
|
| 76 |
integer pnum_dat,cmdnum_dat,bid_dat,alarm_dat,aswr_dat |
| 77 |
|
| 78 |
common/data_pkt/DAQmode_dat,DSPnumber_dat |
| 79 |
$ ,eventn_dat,nclust_dat |
| 80 |
$ ,cutc_dat,cutcl_dat |
| 81 |
$ ,addrcluster_dat,signcluster_dat |
| 82 |
$ ,fc_dat,compressiontime_dat |
| 83 |
$ ,fl5_dat,fl4_dat,fl3_dat,fl2_dat,fl1_dat,fl6_dat |
| 84 |
$ ,checksum_dat,datalength_dat,b_tra |
| 85 |
$ ,pnum_dat,cmdnum_dat,bid_dat |
| 86 |
& ,alarm_dat,aswr_dat |
| 87 |
|
| 88 |
integer TRK_DSP_OK(12) |
| 89 |
common/DSP_OK/TRK_DSP_OK |
Parent Directory
| 
Revision Log