************************************************************************* * * * MAIN_SYMBOLS.INCLUDE Rev. 2-FEB-1994 * * * * For use with Two VME Buffers * * * * This is the Include file that holds most of the symbols and * * constants for use with the VME Transfer Computer program. * * * * When possible all symbols and constants that are used by more * * than one module should be defined in this file. * * * * Symbols that need to be "exported" to other modules need to be * * included in an XDEF assembler directive and thus given the * * external definition attribute. * * * * A few symbols must be defined in other program modules (e.g. the * * targets of JSR from the main program section). These need to be * * included in an XREF assembler directive in the module where they * * are referenced but not defined. * * * ************************************************************************* ************************************************************************* * * * This section defines the Addresses of the Registers on the VBD card. * * * ************************************************************************* VBDBASE EQU $FFFFA000 ; Base Address of the VBD's Registers VBDCSR0 EQU VBDBASE+$0000 ; VBD Control Status Reg 0 VBDCSR1 EQU VBDBASE+$0002 ; VBD Control Status Reg 1 VBDCSR2 EQU VBDBASE+$0004 ; VBD Control Status Reg 2 VBDCSR3 EQU VBDBASE+$0006 ; VBD Control Status Reg 3 CrateTypeReg EQU VBDBASE+$0008 ; Reg for Crate Type for VBD operation EvtNmbAdrReg EQU VBDBASE+$000A ; Reg for the Adrs of the Event Number CrtIDAdrReg EQU VBDBASE+$000C ; Reg for the Address of the Crate ID DControlReg EQU VBDBASE+$0010 ; Data Read Format Control Reg. PControlReg EQU VBDBASE+$0012 ; Parameter Read Format Control Reg. IOUPAdrsReg EQU VBDBASE+$0014 ; Parameter Read Adrs Bits 31-16 WCPntList EQU VBDBASE+$1000 ; List of Pointers to Word Counts DataPntList EQU VBDBASE+$1800 ; List of Base Adrs's of Data BLK's XDEF VBDCSR0,CrateTypeReg,EvtNmbAdrReg ; Define as Global XDEF CrtIDAdrReg,DControlReg,PControlReg ; Symbols for use XDEF IOUPAdrsReg,WCPntList,DataPntList ; in other program XDEF VBDCSR2 ; modules. ************************************************************************* * * * This section defines the data loaded into registers on the VBD * * card and masks used to test bits in status registers on the VBD. * * * ************************************************************************* ALIGN 4 ; Align to longwords. VBDDMATO DC.W $000C ; VBD DMA time-out value VBDToLock DC.W $001C ; VBD DMA time-out value & Lock memory VBDReset DC.W $00CC ; Reset the VBD and load DMA time-out CrateType DC.W $0001 ; Crate Type is 1 i.e. Calorimeter DCtrlData DC.W $BD00 ; Control format of DMA reads A24-LW PCtrlData DC.W $ED00 ; Control format of param reads A24-W IOUPAdrs DC.W $0000 ; Upper address bits for param reads ALIGN 4 ; Align to longwords. MskBuf0Sta DC.L $00000005 ; Mask to select from VBD CSR2 the bits ; that indicate buf 0's DMA status ; and Buf 0's port status. MskBuf1Sta DC.L $0000000A ; Mask to select from VBD CSR2 the bits ; that indicate buf 1's DMA status ; and Buf 1's port status. MskDMARunning DC.L $0000000C ; Mask to select from VBD CSR2 the bita ; that indicate if either buffer is ; running the DMA cycle. ALIGN 4 ; Align to longwords. Buf0DMAGo DC.W $001D ; Code to start the DMA running into ; Buf 0, also pick DMA time out and ; keep the control memory write locked. Buf1DMAGo DC.W $001F ; Code to start the DMA running into ; Buf 1, also pick DMA time out and ; keep the control memory write locked. XDEF VBDDMATO,VBDToLock,VBDReset ; Define as Global XDEF CrateType,DCtrlData,PCtrlData ; Symbols for use XDEF IOUPAdrs ; in other program XDEF Buf0DMAGo,Buf1DMAGo ; modules. XDEF MskBuf0Sta,MskBuf1Sta XDEF MskDMARunning ************************************************************************* * * * This section specifies the storage location in Short IO Address * * Space read by the VBD to obtain the crate ID from the Crate ID Card. * * * ************************************************************************* ALIGN 4 ; Align to longwords. CrateIDAdrs DC.W $C0D0 ; Address of Crate ID card in I/O space. ; Address of Mike Shea's Crate ID card. XDEF CrateIDAdrs ; Make this symbol global. ************************************************************************* * * * This section defines the storage locations in the 2k byte Short IO * * Address memory (Sort 214) that are used to store the Word Counts for * * the various Data Blocks, and the Event Number. * * * ************************************************************************* IOMemBase EQU $9000 ; Base Address of the Short IO Memory ; i.e. starting adrs of the Short 214 EvtNmbAdR EQU IOMemBase+$0010 ; Short IO Address Storage Location ; for Event Number for the VBD to read. EvtNmbAdr133 EQU $FFFF0000+EVTNMBADR ; MVME-133A version of the Short IO ; Address for the storage location ; for the Event Number. WCStore1 EQU IOMemBase+$0100 ; Storage location for Header Word Cnt. WCStore2 EQU IOMemBase+$0102 ; Storage location for Current FrmWk WC. WCStore3 EQU IOMemBase+$0104 ; Storage location for Curnt Cal Trg WC. WCStore4 EQU IOMemBase+$0106 ; Storage location for Prev FrameWrk WC. WCStore5 EQU IOMemBase+$0108 ; Storage location for Prev Cal Trg WC. WCStore6 EQU IOMemBase+$010A ; Storage location for EM Jet List WC. WCStore7 EQU IOMemBase+$010C ; Storage location for TEt Jet List WC. WCStore8 EQU IOMemBase+$010E ; Storage location for Jet Mask Word C. WCStore9 EQU IOMemBase+$0110 ; Storage location for TRD Hot Table WC. WCStore10 EQU IOMemBase+$0112 ; Storage location for Spec Trg Prg WC. WCStore11 EQU IOMemBase+$0114 ; Storage location Super Tower Ptrn WC. WCStore12 EQU IOMemBase+$0116 ; Storage location Level 1.5 Data WC. WCStore13 EQU IOMemBase+$0118 ; Storage location for Absolute Time WC. WCStore14 EQU IOMemBase+$011A ; Storage locat L1 & Foreign Scalers WC. WCStore15 EQU IOMemBase+$011C ; Storage location for Pulser Data WC. XDEF IOMemBase,EvtNmbAdr,EvtNmbAdr133 ; Define as Global XDEF WCStore1,WCStore2,WCStore3,WCStore4 ; Symbols for use XDEF WCStore5,WCStore6,WCStore7,WCStore8 ; in other program XDEF WCStore9,WCStore10,WCStore11,WCStore12 ; modules. XDEF WCStore13,WCStore14,WCStore15 ************************************************************************* * * * This section defines the list of Word Counts for the various blocks * * of data from the Trigger Crate. (number of Long Words in each block) * * These control the length of the DMA data transfers into the VBD. * * * ************************************************************************* ALIGN 4 ; Align to longwords. WCHeader DC.W 5 ; Define the Crate Header Word Count. WCCurFrWk DC.W 266 ; Current Trig Framework Word Count. WCCurCalT DC.W 640 ; Current Cal Trig Word Count. WCPrvFrWk DC.W 266 ; Previous Trig Framework Word Count. WCPrvCalT DC.W 640 ; Previous Cal Trig Word Count. WCEMJetL DC.W 65 ; Define the EM Jet List Word Count. WCTEtJetL DC.W 65 ; Define Total Et Jet List Word Count. WCJetMask DC.W 320 ; Define the Jet Mask Word Count. WCTRDHotT DC.W 160 ; TRD Hot Tower Table Word Count. WCSpTrPrg DC.W 41 ; Spec Trig Programming Word Count. WCSupTowPtrn DC.W 20 ; Super Tower Jet Paterns Word Count. WCL15Data DC.W 36 ; Level 1.5 Data Word Count. WCAbsoTime DC.W 6 ; Define the Absolute Time Word Countd. WCL1ForScaler DC.W 170 ; New L1 & Foreign Scalers Word Count. WCPulser DC.W 128 ; Pulser Data Word Count i.e. 64 x 2. XDEF WCHeader,WCCurFrWk,WCCurCalT,WCPrvFrWk ; Define as Global XDEF WCPrvCalT,WCEMJetL,WCTEtJetL,WCJetMask ; Symbols for use XDEF WCTRDHotT,WCSpTrPrg,WCSupTowPtrn,WCL15Data ; in other program XDEF WCAbsoTime,WCL1ForScaler,WCPulser ; modules. ************************************************************************* * * * This section defines the list of Base Addresses for the various * * blocks of data from the Trigger Crate. These are the locations * * where the VBD will start to read. (32 bit Base Addresses) * * * ************************************************************************* ALIGN 4 ; Align to longwords. BAHeader DC.L $00305000 ; Define the Crate Header Base Address. BACurFrWk DC.L $00320018 ; Current Trig Framework Base Address. BACurCalT DC.L $00300018 ; Current Cal Trigger Base Address. BAPrvFrWk DC.L $00320440 ; Previous Trig Framework Base Address. BAPrvCalT DC.L $00300A18 ; Previous Cal Trigger Base Address. BAEMJetL DC.L $00341000 ; Define the EM Jet List Base Address. ; Now Reserved. VBD Reads Zeroed Memory. BATEtJetL DC.L $00341000 ; Define Total Et Jet List Base Adrss. ; Now Reserved. VBD Reads Zeroed Memory. BAJetMask DC.L $00301418 ; Define the Mask Jet Paterns Base Adrs. BATRDHotT DC.L $00341000 ; Define TRD Hot Tower Table Base Adrs. ; Now Reserved. VBD Reads Zeroed Memory. BASpTrPrg DC.L $00320868 ; Define Spec Trig Progrming Base Adrs. BASupTowPtrn DC.L $0032090C ; Define the Large Tile Trig Base Addrs. BAL15Data DC.L $0032095C ; Define the Level 1.5 data Base Addrs. BAL1ForScaler DC.L $003209EC ; Define L1 & Foreign Scaler Base Addrs. BAAbsoTime DC.L $00340800 ; Define the Abso Time Data Base Addrs. ; Note this is an Adrs in the "V" 214. BAPulser DC.L $00340000 ; Define the Pulser Data Base Address. ; Note this is an Adrs in the "V" 214. XDEF BAHeader,BACurFrWk,BACurCalT,BAPrvFrWk ; Define as Global XDEF BAPrvCalT,BAEMJetL,BATEtJetL,BAJetMask ; Symbols for use XDEF BATRDHotT,BASpTrPrg,BASupTowPtrn,BAL15Data ; in other program XDEF BAAbsoTime,BAL1ForScaler,BAPulser ; modules. ************************************************************************* * * * This section specifies locations used the the 214 VMX to VME memory. * * * * Export the following symbols to other modules: * * TrgBuffer The base address where the COMINT builds the data blk. * * TrgFire Base addrs of list of Spec Trigs fired for this event. * * TrgNum Base address of the Transfer Number DBSC (for TAS Num).* * BASEM P/N Base address where COMINT writes the CTFE EM data. * * BASHD P/N Base address where COMINT writes the CTFE HD data. * * BAEMM0...BAEMM3 Base address of the EM Jet Masks. * * BATEtM0...BATEtM3 Base address of the Total Et Jet Masks. * * CrtHDWord% Crate Header Words 1:5 * ************************************************************************* XDEF TrgBuffer,TrgFire,TrgNum ; Symbols to export XDEF BASEMP,BASEMN ; to other modules. XDEF BASHDP,BASHDN XDEF BAEMM0,BAEMM1,BAEMM2,BAEMM3 XDEF BATEtM0,BATEtM1,BATEtM2,BATEtM3 XDEF CrtHDWord1,CrtHDWord2,CrtHDWord3 XDEF CrtHDWord4,CrtHDWord5 TrgBuffer EQU $00300000 ; L1 Data Block MVME214 base address. TrgFire EQU TrgBuffer+$00020398 ; Spec Trig Fired VME Adrs in the ; Assistant COMINT's "C" Type 214. ; This is the address of the first ; long word that holds Spec Trigs ; Fired information. TrgNum EQU TrgBuffer+$00020298 ; Transfer Number VME Adrs in the ; Assistant COMINT's "C" Type 214. ; This is the address of the first ; long word that holds Transfer ; Number information. ; ***** Base Addresses of the EM and HD Et Data from the CTFE cards. ***** ; ***** VME Longword Address in the "C" Type 214 from Pilot COMINT. ***** ; ***** This symbol is used by the Move Data Routine. ***** BASEMP EQU TrgBuffer+$00000018 ; Base Adrs of Positive Eta EM CTFE data. BASEMN EQU BASEMP+640 ; Base Adrs of Negative Eta EM CTFE data. BASHDP EQU BASEMP+1280 ; Base Adrs of Positive Eta HD CTFE data. BASHDN EQU BASEMP+1920 ; Base Adrs of Negative Eta HD CTFE data. ; ***** EM and Total Et Mask of Jet Patterns Base Address ***** ; ***** VME Longword Address in the "C" Type 214 from Pilot COMINT. ***** ; ***** This symbol is used by the Move Data Routine. ***** BAEMM0 EQU TrgBuffer+$00001418 ; Base Address of EM Jet Mask Ref 0 BAEMM1 EQU BAEMM0+160 ; Base Address of EM Jet Mask Ref 1 BAEMM2 EQU BAEMM0+320 ; Base Address of EM Jet Mask Ref 2 BAEMM3 EQU BAEMM0+480 ; Base Address of EM Jet Mask Ref 3 BATEtM0 EQU BAEMM0+640 ; Base Address of Total Et Jet Mask Ref 0 BATEtM1 EQU BAEMM0+800 ; Base Address of Total Et Jet Mask Ref 1 BATEtM2 EQU BAEMM0+960 ; Base Address of Total Et Jet Mask Ref 2 BATEtM3 EQU BAEMM0+1120 ; Base Address of Total Et Jet Mask Ref 3 ;***** Addresses in the "C" Type 214 Memory Module for the Crate Header ***** HeadBase EQU TrgBuffer+$00005000 ; Crate Header MVME214 Base Address CrtHDWord1 EQU HeadBase+$00000000 ; First long word of the Crate Header ; This is the SYNC Word CrtHDWord2 EQU HeadBase+$00000004 ; 2nd long word of the Crate Header ; This is the Controller word CrtHDWord3 EQU HeadBase+$00000008 ; 3rd long word of the Crate Header ; This is the Version Number CrtHDWord4 EQU HeadBase+$0000000C ; 4th long word of the Crate Header ; This is the Revision Number CrtHDWord5 EQU HeadBase+$00000010 ; 5th long word of the Crate Header ; This is the Spec Trig Fired Mask *************************************************************************** * * * These are the symbols used by the Move_Data Routine. These control * * which sections of CTFE data will be set to zero energy response and * * which sections of CHTCR data will be set to zero hot towers in the * * Level 1 Trigger Data Block. * * * *************************************************************************** StrZeroEta EQU 17 ; First Eta Index to "zero". EndZeroEta EQU 20 ; Last Eta Index to "Zero". SecLength EQU (EndZeroEta-StrZeroEta+1)*8 ; Number of Lngwrds to zero. StrZeroEMPos EQU BASEMP+((StrZeroEta-1)*32) ; First Pos eta EM Adrs to 0. StrZeroEMNeg EQU BASEMN+((StrZeroEta-1)*32) ; First Neg eta EM adrs to 0. StrZeroHDPos EQU BASHDP+((StrZeroEta-1)*32) ; First Pos eta HD adrs to 0. StrZeroHDNeg EQU BASHDN+((StrZeroEta-1)*32) ; First Neg eta HD adrs to 0. DifCurPrev EQU 2560 ; Difference in VME address ; between Current and Prev ; Beam Crossing CTFE data. ; $300A18 - $300018 = $0A00 ; = 2560 ; This is data from the Pilot ; COMINT. EndEta EQU 64 ; This is the offset from a Jet Mask Base Address ; to the first longword address that is to be ; "zeroed" because it is an eta that does not yet ; have CHTCR's installed. This is equal to the Eta ; Index of last (highest) installed eta times 4. OffPosNeg EQU 80 ; Offset in bytes between the positive eta CHTCR ; "Mask of Jet Patterns" data and the negative ; eta CHTCR "Mask of Jet Patterns" data. EndNegEta EQU EndEta+OffPosNeg ; Offset to the first long word to ; zero in the negative eta CHTCR data. XDEF StrZeroEta,EndZeroEta,SecLength,DifCurPrev XDEF StrZeroEMPos,StrZeroEMNeg,StrZeroHDPos,StrZeroHDNeg XDEF EndEta,OffPosNeg,EndNegEta ************************************************************************* * * * Define miscellaneous constants. * * * ************************************************************************* Ironics_Port_2 EQU $FFFFF003 ; Ironics port address to send signals ; to the COMINT card. Ironics_Port_3 EQU $FFFFF005 ; Ironics port address to read signals ; from the COMINT card. Ironics_Port_5 EQU $FFFFF009 ; Ironics port address to control the ; dual VME buffers. Bits1and2Hi EQU $03 ; only 1st and 2nd bits in high state Bit5High EQU $10 ; only 5th bit in high state Bits1and5Hi EQU $11 ; only 1st and 5th bits in high state AllBitsLow EQU $00 ; all bits low AllBitsHi EQU $FFFFFFFF ; all bits Hi ALIGN 4 ; Align to longwords. Low4Long DC.L $0000000F ; Low order 4 bits set, Mask for Sync. TrgNumStore DC.L $00000000 ; Store for 16 bit trigger number. TrgsFired DC.L $00000000 ; Store Specific Trigs Fired longword. MskMonSpTrg DC.L $7FFFFFFF ; Mask for non-monitor Spec Trigs ; a 1 in the mask -> normal Spec Trig ; a 0 in the mask -> monitor Spec Trig TransEvent DC.L $00000000 ; This location hold a flag which ; indicates whether or not this event ; should be transfered to L2. If it ; is a monitor data only event (or a ; "no trig" event) then clear this ; location. If this is a normal ; event then set it to $0000000F. SJLLoopCnt DC.L $00000000 ; Loop count of tests of Start Jet List SJLMaxWait DC.L $02000000 ; Max number of loops looking waiting ; for a Start Jet List signal before ; "resetting" COMINT by sending a ; pulse on Data Cable Driver Finished. ; $01000000 gives about 55 seconds ?? SRLoopCnt DC.L $00000000 ; Loop count of tests for Slave Ready SRMaxWait DC.L $00100000 ; Max number of loops looking waiting ; for Slave Ready to go high before ; "resetting" COMINT by sending a ; pulse on Data Cable Driver Finished. ; $01000000 gives about 55 seconds ?? SRMinDisp DC.L $01000000 ; Min number of loops waiting for Slave ; Ready for the transfer rate to be ; low enough to send full message ; at the end of the transfer. ; $00010000 implies a transfer rate ; of 5 Hz or less for the full ; message to be displayed. ; 28-July-92 was $00010000 ; for test change to $01000000 BBSMaxWait DC.L $00100000 ; Max number of loops looking waiting ; for a free VBD buffer before ; concluding that both buffers are ; stuck waiting to transfer on the ; Data Cable. $0004000 implies max ; wait of about 1 sec for a buffer. WaitDMATime DC.L $00240000 ; Maximum loop count to wait for the ; VBD DMA cycle to complete. ; $00040000 ---> About 1/4 second. ; $030D4000 ---> About 30 seconds. WaitSvRdDropTime DC.L $00040000 ; Maximum loop count to wait for the ; COMINT card to drop the Slave ; Ready after it sees the Data Cable ; Driver Finished signal go active. BufSelect DC.L $00000000 ; Buffer Select i.e. VBD BUFFER 0 or 1. GetTimeError DC.L $00000000 ; Storage for the Flag that indicates a ; Bus Error during read Absolute Time. ; non-zero value of the flag --> error. GetCentPulsEr DC.L $00000000 ; Storage for the Flag that indicates ; a Bus Error while reading the Central ; Detector Pulser Programming Data. A ; non-zero value of the flag --> error. GetCalPulsErr DC.L $00000000 ; Storage for the Flag that indicates a ; Bus Error while reading Calorimeter ; Pulser Programming Data. A non-zero ; value of the flag --> error. TWBData DC.L $00000000 ; Storage location for the Trigger ; Warning Bits data. TWBPortAdrs EQU $FFFFF001 ; Address of the Ironics output port ; for the Trigger Warning Bits. StateWaitStJet EQU $01 ; State waiting for a Start Jet List ; signal. StatePrepData EQU $02 ; State for prepairing data for transfer ; i.e. make header, build lists. StateSearchVBD EQU $04 ; State Searching for free VBD Buffer. StateWaitDMA EQU $08 ; State waiting for the VBD DMA List to ; finish. StateWaitSvRd EQU $10 ; State waiting for a Slave Ready. StatePortAdrs EQU $FFFFF007 ; Address of the Ironics output port for ; the State Bits from Cyclic Section. ; This is Ironics Port #4. RdTimeBA EQU $13000788 ; Base Address to read the Abso Time from ; the Shea Front-End Crate. Vert214Buf EQU TrgBuffer+$00040000 ; This is the starting address ; of the Vertical Interconnect ; MVME-214 memmory. i.e. the ; memory for the Vertical ; Interconnect data. It runs ; $00340000 through $00347FFF. AdrTxStat EQU $FFF8002D ; Address of the MFP Transmitter Status Reg. AdrTxBufr EQU $FFF8002F ; Address of the MFP Transmitter Buffer Reg. XDEF Bits1and2Hi,AllBitsLow,AllBitsHi ; Symbols to export XDEF Bit5High,Bits1and5Hi ; to other modules. XDEF BufSelect,SRLoopCnt,SRMaxWait XDEF SJLLoopCnt,SJLMaxWait XDEF SRMinDisp,BBSMaxWait,WaitDMATime XDEF Ironics_Port_2,Ironics_Port_3,Ironics_Port_5 XDEF TransEvent XDEF WaitSvRdDropTime XDEF Low4Long,TrgNumStore,TrgsFired,MskMonSpTrg XDEF GetTimeError,GetCentPulsEr,GetCalPulsErr XDEF TWBPortAdrs,TWBData XDEF StatePortAdrs XDEF StateWaitSvRd,StatePrepData,StateSearchVBD XDEF StateWaitDMA,StateWaitStJet XDEF RdTimeBA,Vert214Buf XDEF AdrTxStat,AdrTxBufr ************************************************************************* * * * Define constants for the Error_Checking routine. * * * * The first 10 PROM addresses in each of the COMINT's are used for * * error checking reads. * * * * The Spec Trig Fired List and the 2 low order bytes of the BX number * * have been read at the very end of the Assistant COMINT PROM to * * provide data for some of the error checks. * * * * On the Pilot COMINT the first 4 of these 10 PROM locations is used * * to read HD Trig Towers near eta of zero, the next 4 locations is * * used to read EM locations near eta of zero, and the last two * * locations are currently not used. * ************************************************************************* EC_SpTrgFr EQU TrgBuffer+$00020C98 ; This is the longword VME address ; of the data from the Error Check ; read of the Spec Trig Fired List. ; This comes from the Assistant ; COMINT PROM Addresses 1611:1614. ; This is the VME address of the ; first long word that holds this ; Spec Trigs Fired information. ; This is the VME byte addresses ; of the data from the Error Check ; read of the Beam Crossing Number. ; This data comes from the Assistant ; COMINT PROM Addresses 1615, 1616. EC_BX_Num_1B EQU TrgBuffer+$00020CA3 ; Error Check Read of the 1st ; Byte of the BX Number. EC_BX_Num_2B EQU TrgBuffer+$00020CA1 ; Error Check Read of the 2nd ; Byte of the BX Number. ; These are the VME byte addresses ; of the data from the normal Data ; Block reads of the Beam Crossing ; Number by the Assistant COMINT. DB_BX_Num_1B EQU TrgBuffer+$000202C3 ; Data Block Read of the 1st ; Byte of the Current BX Number. DB_BX_Num_2B EQU TrgBuffer+$000202C1 ; Data Block Read of the 2nd ; Byte of the Current BX Number. DB_BX_Num_3B EQU TrgBuffer+$000202C7 ; Data Block Read of the 3rd ; Byte of the Current BX Number. DB_BX_Num_4B EQU TrgBuffer+$000202C5 ; Data Block Read of the 4th ; Byte of the Current BX Number. ; In the VME data from the Assistant ; COMINT there are 1064 bytes ; between the start of the Current ; Framework data and the Previous ; Framework data. ; $0440 - $0018 = $428 = 1064. Pr_BX_Num_1B EQU DB_BX_Num_1B+1064 ; Previous BX Number 1st Byte. Pr_BX_Num_2B EQU DB_BX_Num_2B+1064 ; Previous BX Number 2nd Byte. Pr_BX_Num_3B EQU DB_BX_Num_3B+1064 ; Previous BX Number 3rd Byte. Pr_BX_Num_4B EQU DB_BX_Num_4B+1064 ; Previous BX Number 4th Byte. XDEF EC_SpTrgFr XDEF EC_BX_Num_1B XDEF EC_BX_Num_2B XDEF DB_BX_Num_1B XDEF DB_BX_Num_2B XDEF DB_BX_Num_3B XDEF DB_BX_Num_4B XDEF Pr_BX_Num_1B XDEF Pr_BX_Num_2B XDEF Pr_BX_Num_3B XDEF Pr_BX_Num_4B CT_EC_Read_1_B EQU TrgBuffer+$00000004 ; VME Long Word Address of the 1st ; Cal Trig Error Check Read at ; Beginning of the Data Block. ; COMINT PROM Addresses 1 and 2. CT_EC_Read_2_B EQU TrgBuffer+$00000008 ; VME Long Word Address of the 2nd ; Cal Trig Error Check Read at ; Beginning of the Data Block. ; COMINT PROM Addresses 3 and 4. CT_EC_Read_3_B EQU TrgBuffer+$0000000C ; VME Long Word Address of the 3rd ; Cal Trig Error Check Read at ; Beginning of the Data Block. ; COMINT PROM Addresses 5 and 6. CT_EC_Read_4_B EQU TrgBuffer+$00000010 ; VME Long Word Address of the 4th ; Cal Trig Error Check Read at ; Beginning of the Data Block. ; COMINT PROM Addresses 7 and 8. CT_EC_Read_5_B EQU TrgBuffer+$00000014 ; VME Long Word Address of the 5th ; Cal Trig Error Check Read at ; Beginning of the Data Block. ; COMINT PROM Addresses 9 and 10. CT_EC_Read_1_E EQU TrgBuffer+$00001918 ; VME Long Word Address of the 1st ; Cal Trig Error Check Read at ; END of the Data Block. COMINT ; PROM Addresses 3211 and 3212. CT_EC_Read_2_E EQU TrgBuffer+$0000191C ; VME Long Word Address of the 2nd ; Cal Trig Error Check Read at ; END of the Data Block. COMINT ; PROM Addresses 3213 and 3214. CT_EC_Read_3_E EQU TrgBuffer+$00001920 ; VME Long Word Address of the 3rd ; Cal Trig Error Check Read at ; END of the Data Block. COMINT ; PROM Addresses 3215 and 3216. CT_EC_Read_4_E EQU TrgBuffer+$00001924 ; VME Long Word Address of the 4th ; Cal Trig Error Check Read at ; END of the Data Block. COMINT ; PROM Addresses 3217 and 3218. CT_EC_Read_5_E EQU TrgBuffer+$00001928 ; VME Long Word Address of the 5th ; Cal Trig Error Check Read at ; END of the Data Block. COMINT ; PROM Addresses 3219 and 3220. XDEF CT_EC_Read_1_B,CT_EC_Read_1_E XDEF CT_EC_Read_2_B,CT_EC_Read_2_E XDEF CT_EC_Read_3_B,CT_EC_Read_3_E XDEF CT_EC_Read_4_B,CT_EC_Read_4_E XDEF CT_EC_Read_5_B,CT_EC_Read_5_E ************************************************************************* * * * END of the Define Constants Section: * * * *************************************************************************