1. <span style="font-size:14px;">`timescale 1ns / 1ps
2. module test(
3. sda
4. );
5. reg scl;
6. inout sda;
7. reg sda_out;
8. wire    sda_in;
9. reg [7:0]   data;
10. reg start_flag, stop_flag;
11. assign sda = sda_out ? 1'bz : 1'b0;
12. assign sda_in = sda;
13. pullup( sda );
14. I2CTEST testmine(.SDA(sda), .SCL(scl));
15. initial
16. begin
17. scl = 0;
18. sda_out = 0;
19. data = 8'h27;
20. start_flag = 0;
21. #160000;
22. start ( );
23. end
24. always
25. begin
26. #50000 scl = ~scl;
27. end
28. always @ (posedge start_flag)
29. begin
30. repeat (8)
31. begin
32. wait ( scl == 0 );
33. #20000;
34. sda_out = data[7];
35. #40000;
36. data = data << 1;
37. end
38. wait (~ scl);
39. #20000;
40. sda_out = 1;
41. #160000;
42. stop ( );
43. end
44. always @ ( posedge stop_flag)
45. begin
46. //     sda_out = 0;
47. //     #50000;
48. sda_out = 1;
49. end
50. task start;
51. begin
52. wait (scl == 0);
53. #20000;
54. sda_out = 1;
55. wait ( scl == 1 );
56. #20000;
57. sda_out = 0;
58. start_flag = 1;
59. end
60. endtask
61. task stop;
62. begin
63. wait ( scl == 0 );
64. #20000;
65. sda_out = 0;
66. wait ( scl ==1 );
67. #20000;
68. sda_out = 1;
69. stop_flag = 1;
70. end
71. endtask
72. endmodule</span>

I2C程序