bit swap in byte

Author Message
matherp
Guru

Joined: 11/12/2012
Location: United Kingdom
Posts: 7456
Posted: 06:56am 26 Jul 2022      

This one is probably faster

for b%=0 to 255:? bin$((b% * &H0202020202 and &H010884422010) mod 1023,8):next