#include "exlib.conf"
#include "danlib.conf"
#include "spe1a.conf"
#include "iteg1a.conf"
#include "matr1b.conf"
#include "rota1c.conf"
#include "spot1d.conf"
#include "exlib.h"
#include "danlib.h"
#include "dan7x.h"
#include "dan7a.h"
#include "spe1a.h"
#include "iteg1a.h"
#include "dan7b.h"
#include "matr1b.h"
#include "dan7c.h"
#include "rota1c.h"
#include "dan7d.h"
#include "spot1d.h"
#include "peak3.h"
Data Structures | |
| union | SPCHDR |
| struct | SPCHDR::MCA_VAX_type |
| struct | SPCHDR::MCA_VXW_type |
| struct | SPCHDR::ALL_VAX_type |
| struct | SPCHDR::ALL_VXW_type |
| struct | AUXHDAT |
Defines | |
| #define | CPNAME "PEAK3" |
| #define | CPTITL "Peak Integration Program" |
| #define | CPDATE "(12Mar03/Hu)" |
| #define | CEXPMNT "??????" |
| #define | CIDPRG "PEAK" |
| #define | CVERSION "20apr07" |
| #define | CSTMODE 'X' |
| #define | MFILNA 70 |
| #define | DIM3SPEC |
| #define | INISTACK 5000 |
| #define | INICHCK VX_FP_TASK |
| #define | INIOPT VX_FP_TASK |
| #define | MSTRTASK "tPeakMstr" |
| #define | MSTRPRIO 100 |
| #define | MSTRSTACK 12000 |
| #define | MSTROPT VX_FP_TASK |
| #define | MSTROPT VX_FP_TASK |
| #define | CPARNA "~/ex_home/ex_param/peak3par.vxw" |
| #define | CDFNAM "~/ex_home/ex_data/spenam.spe" |
| #define | CHLPNA "~/ex_home/ex_help/peak3/peak.txt" |
| #define | CISERV "servix" |
| #define | CIUSER "vme-info" |
| #define | CIFILE "peak3/peak.info" |
| #define | ffPARFILE parfile |
| #define | ffPARMTR parfile.parmtr |
| #define | ffEXLIBPAR parfile.exlibpar |
| #define | ffPARSPE parfile.dataSpe.data7a[0] |
| #define | ffPARITEG parfile.dataIteg.data7a[0] |
| #define | ffPARMATR parfile.dataMatr.data7b[0] |
| #define | ffPARROTA parfile.dataRota.data7c[0] |
| #define | ffPARSPOT parfile.dataSpot.data7d[0] |
| #define | ccCOMMON common |
| #define | ccPARMTR common.parmtr |
| #define | ccDANLIBCOM common.danlibcom |
| #define | ccEXLIBCOM common.exlibcom |
| #define | ccHDATA common.auxhdat |
| #define | IDPAR ffPARMTR.idpar |
| #define | PIDPRG ffPARMTR.idprg |
| #define | PVERSION ffPARMTR.version |
| #define | DFLTPAR ffPARMTR.dflts |
| #define | PEXPMNT ffPARMTR.pexpmnt |
| #define | SP0NAM ffPARMTR.sp0nam |
| #define | STARTUP ffPARMTR.startup |
| #define | STARTEND ffPARMTR.startend |
| #define | DSPMOD ccPARMTR.dspmod |
| #define | HEADER0 ccPARMTR.header0 |
| #define | CHDLEN "" |
| #define | CSPTYPE "" |
| #define | CROWS "" |
| #define | CCOLS "" |
| #define | CBYTES "" |
| #define | CLTXT "" |
| #define | CDFTXT "" |
| #define | INITSPCHDR |
| #define | INITAUXHDAT 0 |
| #define | ACCppnn(v) |
| #define | ACCpnnn(v) |
| #define | ACCnpnn(v) |
| #define | ACCppaa(v) |
| #define | RLTCNT ACCppnn(rltcnt) |
| #define | LFTCNT ACCppnn(lftcnt) |
| #define | DATCNT ACCppnn(datcnt) |
| #define | OUTCNT ACCppnn(outcnt) |
| #define | REJCNT ACCppnn(rejcnt) |
| #define | FULCNT ACCnpnn(fulcnt) |
| #define | ERRCNT ACCppnn(errcnt) |
| #define | SPOFFS ACCppnn(spoffs) |
| #define | CMPRSS ACCppnn(cmprss) |
| #define | RUNTIM ACCppnn(runtim) |
| #define | MAXSPECS 1 |
| #define | MAXHTYPS 4 |
| #define | USHMAX 4 |
| #define | HDSCR_MCA_VAX "208i1 1i2 1i4 3i2 7i4 1i2 2i4" |
| #define | HDSCR_MCA_VXW "208i1 1i2 8i4 2i2 1i4" |
| #define | HDSCR_ALL_VAX "208i1" |
| #define | HDSCR_ALL_VXW "208i1" |
| #define | pHEADER spepntr[iselspe].xsphdr |
| #define | pHEADER0 spepntr[0].xsphdr |
| #define | INITHTYPES |
| #define | INITSPEPNTR |
| #define | FIRSTPARFILE |
| #define | SHOWHDR |
Enumerations | |
| enum | headertypes { MTX_HEADER, MCA_HEADER, MCT_HEADER, MS2_HEADER, MSC_HEADER, PCM_HEADER, MCA_VAX_HEADER, MCA_VXW_HEADER, ALL_VAX_HEADER, ALL_VXW_HEADER, MCA_VAX_HEADER, MCA_VXW_HEADER, ALL_VAX_HEADER, ALL_VXW_HEADER, DRM_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_1_HEADER, ECF_VAX_HEADER, ECF_0_HEADER, ECF_1_HEADER, ECF_1_HEADER, ESI_VAX_HEADER, ESW_VAX_HEADER, ESW_VXW_HEADER, ESS_VAX_HEADER, ESS_VXW_HEADER, ESS_HEADER, ECF_HEADER, ESW_HEADER, MASS_HEADER, ESW_VAX_HEADER, ESW_VXW_HEADER, ESS_VAX_HEADER, ESS_VXW_HEADER } |
Features:
X * Y * Z * counts version
Display of spectrum
Peak integration
Hidden lines display of matrix
Contour Plot of matrix
Rotated display of matrix
modification history -------------------- 15aug08 kHu DOXYGEN comments added 20apr07 kHu DIM3SPEC, IPLANES, NPLANE 23jul04 kHu Help mit INFO auf Server 29apr03 kHu *.conf, *.h Files neu geordnet 16apr03 kHu Fit gemacht fuer -Wall GCC-Option 02apr03 kHu define CPDATE EMKSTR(SIGNAT) 12mar03 kHu Portierung auf Linux 14feb03 kHu neu default Terminal/Printer, xImport() 06jan03 kHu peak10.c: strtup: BOOL -> int; loadpar raus 12sep02 kHu Updpar() geaendert 12sep02 kHu #define pHEADER/0 16aug02 kHu *xfnctn, *xspebuf nach danlib.h, INITSPEPNTR geaendert 28jun02 kHu Init task -> Master task 28feb02 kHu more args on Start: PNAME,PTITLE,PARNAM,HLPNAM,stmode 21dec01 kHu Printing neu 28aug01 kHu Updpar(1) in Shohdr() 09oct00 kHu FIRSTPARFILE: data7. -> data7.[0] 04oct00 kHu Uebergabe fuer Name von Parameter-File (PFNAME) 13sep00 kHu tReadp() -> tMenu 29mar00 kHu MINSTACK = 11000, CHCKOPT, TASKOPT 10mar00 kHu Inpar(1/3): TOTLEN IHDLEN BLOCKT 10mar00 kHu IBYTES new 15feb00 kHu erweitert auf verschiedene Header Typen 19nov99 kHu Zero spectrum if test run 11nov99 kHu Newprog Standard 02sep99 kHu Abschluss Pruefung 21jul99 kHu neu aus peak.h
| #define ACCnpnn | ( | v | ) |
Value:
(*( (CHTDATA == MCA_VXW_HEADER) ? \ &(((struct MCA_VXW_type *)XHSPCD)->v) : \ &(((struct MCA_VXW_type *)Illacc(#v))->v) ))
| #define ACCpnnn | ( | v | ) |
Value:
(*( (CHTDATA == MCA_VAX_HEADER) ? \ &(((struct MCA_VAX_type *)XHSPCD)->v) : \ &(((struct MCA_VAX_type *)Illacc(#v))->v) ))
| #define ACCppaa | ( | v | ) |
Value:
(*( (CHTDATA == MCA_VAX_HEADER) ? \ &(((struct MCA_VAX_type *)XHSPCD)->v) : \ (CHTDATA == MCA_VXW_HEADER) ? \ &(((struct MCA_VXW_type *)XHSPCD)->v) : \ (CHTDATA == ALL_VAX_HEADER) ? \ &(ccHDATA.v) : \ (CHTDATA == ALL_VXW_HEADER) ? \ &(ccHDATA.v) : \ &(((struct MCA_VXW_type *)Illacc(#v))->v) ))
| #define ACCppnn | ( | v | ) |
Value:
(*( (CHTDATA == MCA_VAX_HEADER) ? \ &(((struct MCA_VAX_type *)XHSPCD)->v) : \ (CHTDATA == MCA_VXW_HEADER) ? \ &(((struct MCA_VXW_type *)XHSPCD)->v) : \ &(((struct MCA_VXW_type *)Illacc(#v))->v) ))
| #define CBYTES "" |
| #define ccCOMMON common |
| #define ccDANLIBCOM common.danlibcom |
| #define ccEXLIBCOM common.exlibcom |
| #define ccHDATA common.auxhdat |
| #define CCOLS "" |
| #define ccPARMTR common.parmtr |
| #define CDFNAM "~/ex_home/ex_data/spenam.spe" |
| #define CDFTXT "" |
| #define CEXPMNT "??????" |
| #define CHDLEN "" |
| #define CHLPNA "~/ex_home/ex_help/peak3/peak.txt" |
| #define CIDPRG "PEAK" |
| #define CIFILE "peak3/peak.info" |
| #define CISERV "servix" |
| #define CIUSER "vme-info" |
| #define CLTXT "" |
| #define CMPRSS ACCppnn(cmprss) |
| #define CPARNA "~/ex_home/ex_param/peak3par.vxw" |
| #define CPDATE "(12Mar03/Hu)" |
| #define CPNAME "PEAK3" |
| #define CPTITL "Peak Integration Program" |
| #define CROWS "" |
| #define CSPTYPE "" |
| #define CSTMODE 'X' |
| #define CVERSION "20apr07" |
| #define DATCNT ACCppnn(datcnt) |
| #define DFLTPAR ffPARMTR.dflts |
| #define DIM3SPEC |
| #define DSPMOD ccPARMTR.dspmod |
| #define ERRCNT ACCppnn(errcnt) |
| #define ffEXLIBPAR parfile.exlibpar |
| #define ffPARFILE parfile |
| #define ffPARITEG parfile.dataIteg.data7a[0] |
| #define ffPARMATR parfile.dataMatr.data7b[0] |
| #define ffPARMTR parfile.parmtr |
| #define ffPARROTA parfile.dataRota.data7c[0] |
| #define ffPARSPE parfile.dataSpe.data7a[0] |
| #define ffPARSPOT parfile.dataSpot.data7d[0] |
| #define FIRSTPARFILE |
| #define FULCNT ACCnpnn(fulcnt) |
| #define HDSCR_ALL_VAX "208i1" |
| #define HDSCR_ALL_VXW "208i1" |
| #define HDSCR_MCA_VAX "208i1 1i2 1i4 3i2 7i4 1i2 2i4" |
| #define HDSCR_MCA_VXW "208i1 1i2 8i4 2i2 1i4" |
| #define HEADER0 ccPARMTR.header0 |
| #define IDPAR ffPARMTR.idpar |
| #define INICHCK VX_FP_TASK |
| #define INIOPT VX_FP_TASK |
| #define INISTACK 5000 |
| #define INITAUXHDAT 0 |
| #define INITHTYPES |
Value:
/* MCA-VAX-type, spectrum 0 only */ \ {{TRUE}, /* Type valid for spectrum 0 */ \ CIDHDRvax, /* Required header ID in IDHDR */ \ "MCA", /* Required program ID in IDPRG */ \ HDSCR_MCA_VAX, /* Header descriptor string */ \ MCA_VAX_HEADER}, /* Header type */ \ /* MCA-VXW-type, spectrum 0 only */ \ {{TRUE}, /* Type valid for spectrum 0 */ \ CIDHDRvxw, /* Required header ID in IDHDR */ \ "MCA", /* Required program ID in IDPRG */ \ HDSCR_MCA_VXW, /* Header descriptor string */ \ MCA_VXW_HEADER}, /* Header type */ \ /* Program ID not checked, VAX-type, spectrum 0 only */ \ {{TRUE}, /* Type valid for spectrum 0 */ \ CIDHDRvax, /* Required header ID in IDHDR */ \ NULL, /* Program ID in IDPRG not checked */ \ HDSCR_ALL_VAX, /* Header descriptor string */ \ ALL_VAX_HEADER}, /* Header type */ \ /* Program ID not checked, VXW-type, spectrum 0 only */ \ {{TRUE}, /* Type valid for spectrum 0 */ \ CIDHDRvxw, /* Required header ID in IDHDR */ \ NULL, /* Program ID in IDPRG not checked */ \ HDSCR_ALL_VXW, /* Header descriptor string */ \ ALL_VXW_HEADER} /* Header type */ \
| #define INITSPCHDR |
Value:
{{0, \
}}
| #define INITSPEPNTR |
Value:
/* Spectrum 0 */ \ {0,0,0,0,0,0,0,0,0,0, /* 3 dim mode! */ \ SP0NAM, /* File name of spectrum */ \ NULL, NULL, NULL, \ &HEADER0, /* Pointer to extracted header */ \ &HEADER0.hdata.spcdat, /* Special header data */ \ &HEADER0, /* Pointer to extracted header */ \ &HEADER0.hdata.spcdat, /* Special header data */ \ NULL, \ {{0},{0},{0},{0}}},
| #define LFTCNT ACCppnn(lftcnt) |
| #define MAXHTYPS 4 |
| #define MAXSPECS 1 |
| #define MFILNA 70 |
| #define MSTROPT VX_FP_TASK |
| #define MSTROPT VX_FP_TASK |
| #define MSTRPRIO 100 |
| #define MSTRSTACK 12000 |
| #define MSTRTASK "tPeakMstr" |
| #define OUTCNT ACCppnn(outcnt) |
| #define PEXPMNT ffPARMTR.pexpmnt |
| #define pHEADER0 spepntr[0].xsphdr |
| #define PIDPRG ffPARMTR.idprg |
| #define PVERSION ffPARMTR.version |
| #define REJCNT ACCppnn(rejcnt) |
| #define RLTCNT ACCppnn(rltcnt) |
| #define RUNTIM ACCppnn(runtim) |
| #define SHOWHDR |
Value:
Updpar(0x80); /* Update special parameters if online analysis */ \ if(CHTDATA == MCA_VAX_HEADER) { \ printf("Length: %6lu\n", (unsigned long)SPELEN); \ printf("Offset: %6li\n", (long)SPOFFS); \ printf("Cmprss: %6hu\n", (unsigned short)CMPRSS); \ printf("Timer : %6lus\n", (unsigned long)RUNTIM); \ putchar('\n'); \ printf("%10lu Realtime\n", (unsigned long)RLTCNT); \ printf("%10lu Lifetime\n", (unsigned long)LFTCNT); \ printf("%10lu Processed data\n", (unsigned long)DATCNT); \ printf("%10lu Data out of range\n", (unsigned long)OUTCNT); \ printf("%10lu Rejected data\n", (unsigned long)REJCNT); \ printf("%10lu Data errors\n", (unsigned long)ERRCNT); \ }else if(CHTDATA == MCA_VXW_HEADER) { \ printf("Length: %6lu\n", (unsigned long)SPELEN); \ printf("Offset: %6li\n", (long)SPOFFS); \ printf("Cmprss: %6hu\n", (unsigned short)CMPRSS); \ printf("Timer : %6lus\n", (unsigned long)RUNTIM); \ putchar('\n'); \ printf("%10lu Realtime\n", (unsigned long)RLTCNT); \ printf("%10lu Lifetime\n", (unsigned long)LFTCNT); \ printf("%10lu Processed data\n", (unsigned long)DATCNT); \ printf("%10lu Data out of range\n", (unsigned long)OUTCNT); \ printf("%10lu Rejected data\n", (unsigned long)REJCNT); \ printf("%10lu Fifo overflows\n", (unsigned long)FULCNT); \ printf("%10lu Data errors\n", (unsigned long)ERRCNT); \ }
| #define SP0NAM ffPARMTR.sp0nam |
| #define SPOFFS ACCppnn(spoffs) |
| #define STARTEND ffPARMTR.startend |
| #define STARTUP ffPARMTR.startup |
| #define USHMAX 4 |
| enum headertypes |
1.5.6