/ ZXDev/Lib/Basic: optimize PORTOUT.