I was playing around with "&" and these are a couple of things I found.
Checkerboard done in the least code I can manage
size = 50 : cls 128
for y = 0 to 7
for x = 0 to 7
odd = (x+y)&1
ink -2+odd*2,0
box x*size,y*size,(x+1)*size,(y+1)*size
next x
next y
wait key
rem one line
size = 50 : cls 128 : for y = 0 to 7 : for x = 0 to 7 : ink -2+((x+y)&1)*2,0 : box x*size,y*size,(x+1)*size,(y+1)*size : next x : next y : wait key
Stripes
set display mode 1024,768,32
hide mouse
sync rate 0
sync on
create bitmap 1,1024,768
ink -2,0
space = 1
rem change angle
for ddd = 0 to 20
ddd# = ddd/10.0
for y = 1 to 300
for x = 1 to 300
r = x+y*ddd#
r = ((r&32)=32)*255
` g = ((x+y)&2)*255
` b = ((x+y)&4)*255
ink rgb(r,255-r,255-r),0
dot 2+x*space,2+y*space
next x
next y
ink -2,0
text 320,0,str$(ddd)
copy bitmap 1,0
sync:cls
if ddd=0 then wait 1000 else wait 200
next ddd
rem change size
for size = 1 to 256 step size
for y = 1 to 600
for x = 1 to 400
r = (((x+y)&size)=size)*255
` g = ((x+y)&2)*255
` b = ((x+y)&4)*255
ink rgb(r,255-r,255-r),0
dot 2+x*space,2+y*space
next x
next y
ink -2,0
text 420,0,str$(size)
copy bitmap 1,0
sync:cls
wait 200
next size
