Many thanks to Loren for allowing me to use her lovely codes! :)

Donated by Loren (strict-machine.org):