我们从2011年坚守至今,只想做存粹的技术论坛。  由于网站在外面,点击附件后要很长世间才弹出下载,请耐心等待,勿重复点击不要用Edge和IE浏览器下载,否则提示不安全下载不了

 找回密码
 立即注册
搜索
查看: 1030|回复: 2

[资料贡献] I2C

[复制链接]

该用户从未签到

26

主题

13

回帖

68

积分

一级逆天

积分
68

社区居民终身成就奖

QQ
发表于 2015-12-28 21:38:41 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区

您需要 登录 才可以下载或查看,没有账号?立即注册

×
`timescale 1ns / 1ps
module test(
sda
);

    reg    scl;
    inout sda;
    reg    sda_out;
    wire    sda_in;
    reg    [7:0]    data;
   
    reg start_flag, stop_flag;
   
    assign sda = sda_out ? 1'bz : 1'b0;
    assign sda_in = sda;
    pullup( sda );
   
   
    I2CTEST testmine(.SDA(sda), .SCL(scl));

    initial
        begin
           scl = 0;
            sda_out = 0;
            data = 8'h27;
            start_flag = 0;
            #160000;
            start ( );
        end
   
    always
    begin
       #50000 scl = ~scl;
   end
      
    always @ (posedge start_flag)
    begin
       repeat (8)
          begin
             wait ( scl == 0 );
                #20000;
                sda_out = data[7];
                #40000;
                data = data << 1;
            end
            wait (~ scl);
            #20000;
            sda_out = 1;
            #160000;
            stop ( );
    end
   
    always @ ( posedge stop_flag)
    begin
//       sda_out = 0;
//       #50000;
       sda_out = 1;
    end   

   
    task start;   
    begin
        wait (scl == 0);
        #20000;
        sda_out = 1;
        wait ( scl == 1 );
        #20000;
        sda_out = 0;
        start_flag = 1;
    end
    endtask
        
    task stop;
    begin
        wait ( scl == 0 );
        #20000;
        sda_out = 0;
        wait ( scl ==1 );
        #20000;
        sda_out = 1;
        stop_flag = 1;
        end
    endtask
        
endmodule</span>
回复

使用道具 举报

该用户从未签到

121

主题

1262

回帖

84

积分

二级逆天

积分
84

社区居民忠实会员社区劳模原创达人终身成就奖金点子奖

QQ
发表于 2015-12-29 08:49:28 | 显示全部楼层
回复

使用道具 举报

该用户从未签到

0

主题

40

回帖

10

积分

一级逆天

积分
10

社区居民

QQ
发表于 2015-12-29 13:48:38 | 显示全部楼层
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

公告:服务器刚移机,
大家请不要下载东西。
会下载失败


Copyright ©2011-2024 NTpcb.com All Right Reserved.  Powered by Discuz! (NTpcb)

本站信息均由会员发表,不代表NTpcb立场,如侵犯了您的权利请发帖投诉

( 闽ICP备2024076463号-1 ) 论坛技术支持QQ群171867948 ,论坛问题,充值问题请联系QQ1308068381

平平安安
TOP
快速回复 返回顶部 返回列表