its very urgent...can you do it for me

[shiva]

divisible_by_5

design a state machine for a serial input number to be divisible by 5. if the number is divisible by 5 (101, 1010,…..) output 1.

 

[xischaune]

you need some code ??? or just the state diagram or wat

 

[shiv_emf]

Hi
r the numbers expressed in BCD format or unsigned binary .... in either cases ... u shud check last 3 bit ...is whether they r 000 or 101 then give output as "1"

 

[shiv_emf]

someone has replied to this n deleted .....yeah i agree
in case 8 (1000) ... 000 is nt satisfying !!
may b BCD shud b fallowed

 

[shiva]

i want only state diagram if you can....if you can suggest me circuit itll be better

 

[nand_gates]

I posted the code for same question here few months back.
Here I am posting it again.
There register in which ur shifting the random bit stream is infinite.
Here for illustration perpose i have taken 128 bit shift register, same is
applicable to infinite bit shift register.
The idea here is simple. We know that for decimal no.s if the no. ends with
0 or 5 its divisible by 5. We just extend this idea for bianary no.s. If decimal
equivalent of binay no. has 0 or 5 at last digit position its divisible by 5.
See the code below its behavioral one but you can easily convert it in RTL!
Hope this helps.

module divisibleby5();
   reg [127:0] my_reg;
   reg [4:0]   bcd_lsb;
   reg         divisible_by_5;
   reg         clk;
   reg         din;
   
   initial begin
      clk = 0;
      din = $random;
      my_reg = 128'h0000000000000000;
      bcd_lsb = 0;
      divisible_by_5 = 0;
      $monitor ("my_reg = %d divisible_by_5 = %b bcd_lsb = %h", my_reg, divisible_by_5, bcd_lsb);
      fork
         forever #5 clk = ~clk;
         forever begin
            @(posedge clk);
            my_reg = {my_reg[126:0], din};
            bcd_lsb = 2*bcd_lsb + din;
            if (bcd_lsb > 9 || bcd_lsb[4])
              bcd_lsb[4:0] = bcd_lsb[3:0] + 6;
            divisible_by_5 = (bcd_lsb[3:0] == 0 || bcd_lsb[3:0] == 5);
            din = $random;
         end
         #1000 $finish;
      join
   end
endmodule // divisibleby5