In Australia, a pack of smokes costs something like $20. No idea where the tax revenue goes, but the cost alone seems like it would be a great disincentive to smoke.