[Script] HMs don't need to be taught [FireRed]

Is there some way to make it so you can use HMs outside of battle if you have the HM in your bag without having to actually teach it to a Pokemon? This would eliminate the need for HM slaves entirely. Thanks!