BaBar Event Display: tcl script to skip events.

At tcl prompt, you have to set a variable skipEvt:

>  set  skipEvt  xxx
>  source skipEvt.tcl

to skip xxx events and process the next one.

The skipEvt.tcl script is just:

# define the path
path disable DrawPath               # or whatever the name of your path
path create SkipEvt BearInitSequence
module disable PrintModule
ev cont -nev $skipEvt

path delete SkipEvt
path enable DrawPath               # or whatever the name of your path
ev cont -nev 1