Click above to get retro games delivered to your door ever month!

 rotateleft()        Rotate left the bits in a uint by the given number
------------------------------------------------------------------------------
 Declaration
   bit.hdr

 Syntax
   func uint rotateleft extern
   param value uint uNumber, ;
         value uint uBits

   uNumber is a numeric expression.
   uBits is the number of bits to rotate.

 Return
   The result of the rotate operation.

 Description
   rotateleft() rotates the 16 bits in uNumber to the left by the number
   specified by uBits. Bits "shifted out" are inserted at the rightmost
   position.

   When uNumber has the following binary representation

   1 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1

   rotateleft( uNumber, 1 ) returns a result having the following binary
   representation:

   0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1

   The leading "1" was moved to the rightmost position, and the other bits
   were shifted to the left.

 Example
   #define EXAMPLE_MATH
   #include example.hdr

   proc Test_rotateleft
   vardef
      uint nNum
   enddef
   nNum := 1000000000000111B
   ? nNum
   ? rotateleft( nNum, 1 )
   endproc

   proc main
   Test_rotateleft()
   endproc