HT cut for NLO

Hi all,
Sorry for such a naive question, but can someone give me an example cuts.f to apply a HT cut for an NLO sample?
I tried, but my fortran is essentially non-existent, so I didn't manage to get it to compile.
Best,
Josh