Добре время суток, помогите в решение задачи, заранее спасибо:

Разработать процедуру BigRorCount (var M1; len, count: word), где M1 - сверхбольшой целое
положительное число (байт массив длиной len), count - количество разрядов сдвига.
Операция - циклический сдвиг вправо (в сторону младших разрядов) на количество
двоичных разрядов, заданной параметром count. При этом count младших разрядов
поступают на место старших разрядов. Должны использоваться команды для 32
разрядных данных. Если значение len не кратно 4, то при необходимости для последних
байт ис команды для 8 - разрядных данных.