CLEAR
FOR i=15 TO 0 STEP -1
?? IIF(BITTEST(0h1A2B, i), "1", "0") &&0010101100011010
ENDFOR
?
FOR i=15 TO 0 STEP -1
?? IIF(BITTEST(0x2B1A, i), "1", "0") &&0010101100011010
ENDFOR
?
FOR i=15 TO 0 STEP -1
?? IIF(BITTEST(11034, i), "1", "0") &&0010101100011010
ENDFOR