{
  Hades* myHades=new Hades;
  HRuntimeDb* rtdb=gHades->getRuntimeDb();
  HSpectrometer* spec=gHades->getSetup();

  Int_t emcMods[]={1,0,0,0,0,0};
  spec->addDetector(new HEmcDetector);
  spec->getDetector("Emc")->setModules(0,emcMods);

  HParAsciiFileIo* output=new HParAsciiFileIo;
  output->open("emc_params.txt","out");
  rtdb->setOutput(output);

  HEmcTrb3Lookup* pLookup=(HEmcTrb3Lookup*)(rtdb->getContainer("EmcTrb3Lookup"));
  Int_t trbnetAddress[] = { 0x8a00, 0x8a01, 0x8a02, 0x8a03 };
  for(Int_t s=0;s<4;s++) {
    for(Int_t c=1;c<=64;c++) {
      pLookup->fill(trbnetAddress[s], c, 1, (c-1)+s*64);
    }
  }
  pLookup->setChanged(kTRUE);
  pLookup->setInputVersion(1,1);

  HEmcCalPar* pCalPar=(HEmcCalPar*)(rtdb->getContainer("EmcCalPar"));
  pCalPar->setChanged(kTRUE);
  pCalPar->setInputVersion(1,1);

  rtdb->addRun(1);
  pLookup->print();
  rtdb->print();

  delete myHades;
}