1: begin
           sum <= 0;     // Szumma kinullázása
              index2 <= 0;  // Az index beállítása a vektor elso elemére
              step2 <= 21;

                X <= InVector[0];
                Y <= InVector[1];

         end

        21:begin

                A[15:8] <= 0;
                A[7:0] <= X;
                i <= 7;
                step2 <= 22;
            end

       22: begin
                A <= 2*A;
                step2 <= 23;
                end
            23:
                begin

                if (A[15:8] >= Y)
                    begin
                        A[15:8] <= A[15:8]-Y;
                        Q[i] <= 1;
                    end
                else
                    begin
                        Q[i] <= 0;
                    end

                i <= i-1;

                if(i == 0)
                begin
                    step2 <= 3;
                end
                else
                begin
                    step2 <= 22;
                end


            end
       3: begin              // A kétbájtos szumma beírása az OutVecor
                               // elso két elemébe
                OutVector[0] <= Q;
                  OutVector[1] <= A[15:8];
                 OutN <= 2;     // bajtszam beallitasa
              ProcRdy <= 1;  // A feldolgozas befejeztenek jelzes
              step2 <= 4;
             end