Index: trunk/MagicSoft/Mars/macros/tutorials/disprfl.C
===================================================================
--- trunk/MagicSoft/Mars/macros/tutorials/disprfl.C	(revision 8315)
+++ trunk/MagicSoft/Mars/macros/tutorials/disprfl.C	(revision 8315)
@@ -0,0 +1,53 @@
+/* ======================================================================== *\
+!
+! *
+! * This file is part of MARS, the MAGIC Analysis and Reconstruction
+! * Software. It is distributed to you in the hope that it can be a useful
+! * and timesaving tool in analysing Data of imaging Cerenkov telescopes.
+! * It is distributed WITHOUT ANY WARRANTY.
+! *
+! * Permission to use, copy, modify and distribute this software and its
+! * documentation for any purpose is hereby granted without fee,
+! * provided that the above copyright notice appear in all copies and
+! * that both that copyright notice and this permission notice appear
+! * in supporting documentation. It is provided "as is" without express
+! * or implied warranty.
+! *
+!
+!
+!   Author(s): Thomas Bretz, 2/2007 <mailto:tbretz@astro.uni-wuerzburg.de>
+!
+!   Copyright: MAGIC Software Development, 2000-2007
+!
+!
+\* ======================================================================== */
+
+void disprfl()
+{
+    MParList  plist;
+    MTaskList tlist;
+    plist.AddToList(&tlist);
+
+    MGeomCamMagic geomcam;
+    plist.AddToList(&geomcam);
+
+    MDirIter files("/magic/montecarlo/reflector/reflex/gammas/HE/zbin0", "Gamma*.rfl");
+
+    MReadRflFile read;
+    read.AddFiles(files);
+    tlist.AddToList(&read);
+
+    MHReflector refl;
+    MFillH fill(&refl);
+
+    tlist.AddToList(&fill);
+
+    MStatusDisplay *d = new MStatusDisplay;
+
+    MEvtLoop evtloop;
+    evtloop.SetParList(&plist);
+    evtloop.SetDisplay(d);
+
+    if (!evtloop.Eventloop())
+        return;
+}