[LOGIC4 SY 27SN 27SF 3SK 0]
[UpCase L_ A$a>= A$z<= &*:A 32-;A|L+]
[ChkLen L-L-L_L_ 1=C=_ 0=D=_ A=` A=~ &+ :;100{C B* A>>:LE;B=*C=_ 1=+D=_|}|C D L+L+L+L+]
[MASK8 i256\][MASK16 i65536\][MASK32 i2 32^\][MASK64 i2 64^\]
[SHL8 2*<MASK8>][SHL16 2*<MASK16>][SHL32 2*<MASK32>][SHL64 2*<MASK64>]
[SHR8 2/<MASK8>][SHR16 2/<MASK16>][SHR32 2/<MASK32>][SHR64 2/<MASK64>]
[NOT8 _1-<MASK8>][NOT16 _1-<MASK16>][NOT32 _1-<MASK32>][NOT64 _1-<MASK64>]
[NEG8 _<MASK8>][NEG16 _<MASK16>][NEG32 _<MASK32>][NEG64 _<MASK64>]
[AND 65536L_ 1L_ L_L_ 0 6{A D\ B D\ &* C*+ D=*C=_ A D/i=A=_ B D/i=B=_ A=0 B=0 &*:LE|}L+L+L+L+]
[OR  65536L_ 1L_ L_L_ 0 6{A D\ B D\ &+ C*+ D=*C=_ A D/i=A=_ B D/i=B=_ A=0 B=0 &*:LE|}L+L+L+L+]
[XOR 65536L_ 1L_ L_L_ 0 6{A D\ B D\ &- C*+ D=*C=_ A D/i=A=_ B D/i=B=_ A=0 B=0 &*:LE|}L+L+L+L+]
[HexIn SY0L_0 ~{j<UpCase>L_ A 8==:B>0:1=-B=_ A=$=_ 16/i;LE|;A$F<= A$A>= &*:1=+B=_ A$A-10+ LY16*+ ; A$9<=A $0>= &*:1=+B=_ A$0-LY16*+;LE|||L+}L+]
[h SY0L_0 [hex1 $'<UpCase>L_ A 8==:B>0:1=-B=_ A=$=_ 16/i;L+>hex2 |;A$F<= A$A>= &*:1=+B=_ A$A-10+ LY16*+ ; A$9<=A $0>= &*:1=+B=_ A$0-LY16*+;L+>hex2 |||L+>hex1 [hex2 L+]
[H SY20SI L-L-L-=A A<0:"-"Aa=A=_| A=`:" ";A=~:"~";A=0:"0";A 16<ChkLen>=B=_=C=_ B 1+{A C/i =^10>=:10-$A+;$0+| =$=_ A C\=A=_ 16=/C=_}|||L+L+L+SZ]
[Hn SY20SI L_L-L-L-=A A<0:"-"Aa=A=_| A=`:" ";A=~:"~";A=0:D{"0"};A 16<ChkLen>=B=_=C=_ D B1+-=^>0:{"0"};=_| B 1+{A C/i =^10>=:10-$A+;$0+| =$=_ A C\=A=_ 16=/C=_}|||L+L+L+SZ]
[H8  SY =^<0:=^256_<=:20SI"UNDER";=^256+ 2<Hn>=_|;=^256>=:20SI"OVER";2<Hn>||SZ]
[H16 SY =^<0:=^65536_<=:20SI"UNDER";=^65536+ 4<Hn>=_|;=^65536>=:20SI"OVER";4<Hn>||SZ]
[H32 SY =^<0:=^2 32^_<=:20SI"UNDER";=^2 32^+ 8<Hn>=_|;=^2 32^>=:20SI"OVER";8<Hn>||SZ]
[H64 SY =^<0:=^2 64^_<=:20SI"UNDER";=^2 64^+ 16<Hn>=_|;=^2 64^>=:20SI"OVER";16<Hn>||SZ]
[OctIn SY0L_0 ~{jL_ A 8==:B>0:1=-B=_ A=$=_8/i;LE|;A$7<= A$0>= &*:1=+B=_ A$0-LY8*+;LE||L+}L+]
[o SY0L_0 [oct1 $'L_ A 8==:B>0:1=-B=_ A=$=_8/i;L+>oct2 |;A$7<= A$0>= &*:1=+B=_ A$0-LY8*+;L+>oct2 ||L+>oct1 [oct2 L+]
[O SY20SI L-L-L-=A A<0:"-"Aa=A=_| A=`:" ";A=~:"~";A=0:"0";A 8<ChkLen>=B=_=C=_ B 1+{A C/i $0+ =$=_ A C\=A=_ 8=/C=_}|||L+L+L+SZ]
[BinIn SY0L_0 ~{jL_ A 8==:B>0:1=-B=_ A=$=_2/i;LE|;A$1<= A$0>= &*:1=+B=_ A$0-LY2*+;LE||L+}L+]
[b SY0L_0 [bin1 $'L_ A 8==:B>0:1=-B=_ A=$=_2/i;L+>bin2 |;A$1<= A$0>= &*:1=+B=_ A$0-LY2*+;L+>bin2 ||L+>bin1 [bin2 L+]
[B SY20SI L-L-L-=A A<0:"-"Aa=A=_| A=`:" ";A=~:"~";A=0:"0";A 2<ChkLen>=B=_=C=_ B 1+{A C/i $0+ =$=_ A C\=A=_ 2=/C=_}|||L+L+L+SZ]
;hFF ->255         ;o77 ->63          ;b1111 ->15
255<H> ->"FF"      63<O> ->"77"       15<B> ->"1111"
255_<H> -> "-FF"   63_<O> ->"-77"     15_<B> ->"-1111"
255 3<Hn> ->"0FF"  255 4<Hn> ->"00FF" 255 1<Hn> ->"FF"
15<H8> ->"0F"      1_<H8> ->"FF"      1000<H8> ->"OVER"
255<H16> ->"00FF"  1_<H16> ->"FFFF"   100000<H16> ->"OVER"
65535<H32> ->"0000FFFF"   1_<H32> ->"FFFFFFFF"   2 64^<H32> ->"OVER"
[sample "123456789H AND 100FF00FFH = " <h>123456789 <h>100FF00FF <AND> <H>]