NB. !/ B ---------------------------------------------------------------

1 1 0 1 -: !/ 0 0 1 1 ,: 0 1 0 1

bang=: 4 : 'x!y'

(!/"1 -: bang/"1) x=.?3 5 17$2
(!/"2 -: bang/"2) x
(!/"3 -: bang/"3) x

(!/"1 -: bang/"1) x=.?3 5 32$2
(!/"2 -: bang/"2) x
(!/"3 -: bang/"3) x

(!/"1 -: bang/"1) x=.?3 8 32$2
(!/"2 -: bang/"2) x
(!/"3 -: bang/"3) x

f=: 3 : '(!/ -: bang/) y ?@$ 2'
,f"1 x=.7 8 9,."0 1 [ _1 0 1+  255
,f"1 |."1 x
,f"1 x=.7 8 9,."0 1 [ _1 0 1+4*255
,f"1 |."1 x

4!:55 ;:'f bang x'