Shortcut or macro to force/unforce roaming?

[moovius]

Is there a shortcut, script, etc to quickly access the roaming settings under services? Or even a program that could quickly switch between roaming and automatic?

If it doesn't exist... any suggestions on making a solution on my own?

My Sprint signal is next to nothing at work and I end up having to click into services and forcing it to roam because it just drops calls like crazy otherwise.
I just want a way to switch back and forth without having to navigate all those menus.

Thanks for any input.