SHL           BX,1            ;prépare une table
                                                  ;pré-calculée sur 
                                                  ;sur 16bits 
                    OR            AX,ShiftTable[BX] ;précalcule le bit et effectue
                                                    ;une opération OR 
                    :             
ShiftTable          LABEL         WORD 
BIT_PATTERN=0001H   
                    REPT          16 
                    DW            BIT_PATTERN 
BIT_PATTERN=BIT_PATTERN SHL       1         
                    ENDM