《匠人手记》推荐网上购书渠道： EDN网（ednchina）购书入口   >>> 互动出版网（china-pub）购书入口   >>> 当当网（dangdang）购书入口   >>> 淘宝网（taobao）购书入口   >>> 更多购书渠道……   >>>

设为首页｜加入收藏｜联系匠人｜管理入口｜21IC首页｜21IC博客｜21IC社区｜侃单片机｜回复的贴｜参与的贴

[加入团队] [加入Q群] [广告赞助] [交换连接] [代理工具] [免责声明]      匠人的原创栏目：[匠人公告] [匠人文集] [匠人笔记] [写书近况]

天气预报 百宝日历 百宝专栏 首页 相册 标签 电脑应用(65) 供需信息(22) 写书近况(82) 匠人文集(115) 硬件技术(171) 匠人公告(86) 与非门专栏(545) 匠人笔记(115) 团队撰写(96) 汽车电子(52) 编程技巧(465) 程序宝典(476) 网络酷文(472) 开发工具(19) 资料宝藏(274) 项目管理(11) 藏经宝阁(42) 趣味设计(5) 社区热贴(2) 比尔盖茨熊专栏(0)  百宝信息 载入中... 百宝流量 （2006-07-01开始） 匠人手记

匠人DIY：旋转时钟系列、天梯 之 从零开始玩PIC  匠人原创：浅谈“鲁棒性”、戏说“看门狗”  匠人原创：焊了一块51学习板 、上海书城暗访记 、  匠人笔记：渐明渐暗动态流水灯效果（C源程序）  社区动态：《匠人手记》义拍赈灾活动圆满结束   网络酷文：MISRA2004概览（C编程规范）    匠人手记：购书攻略、勘误表、书友会、书友Q群  书友近况：网络——互动的力量、精致兰花大高帽！ EMC单片机的IIC程序包 程序匠人 发表于 2005-8-8 23:41:00  阅读全文 | 回复(0) | 引用通告 | 编辑 EMC单片机的IIC程序包       EMC单片机的IIC程序包         作者：apex_ch    文章来源：21ICBBS    点击数：731    更新时间：2004-11-26          本程序已经稳定使用很长一段时间了，如果非要追根求源，应该追溹到1998年，由于本系统是基于IIC       EEPROM的，故对2401的读写采用了阻塞的方式，读不到数据或写不入数据就不退出。         本程序是基于447的，也在163上运行过，不过IO的初始化操作需要作些修改，其他可以完全不用修改。         程序开头的几行ADD A,@0xFF是非常有用的，在以后的文章中会有描述。         程序如下：       ;SYSTEM CLOCK 4MHz       ;IO port define           SDA    == 4           SCL    == 3           MSDA    == 0           MSCL    == 1           MCS    == 2           MRST    == 5                 ;Register define           TREG    == 0X10           TCNT    == 0X11           GCNT    == 0X12           IICADDR    == 0X1E           IICBUF    == 0X28           IICDAT0    == 0X28           IICDAT1    == 0X29           IICDAT2    == 0X2A           IICDAT3    == 0X2B           IICDAT4    == 0X2C           IICDAT5    == 0X2D           IICDAT6    == 0X2E           IICDAT7    == 0X2F                     INCLUDE "EM78P447S.H"                     ORG    0X000           ADD    A,@0XFF           ADD    A,@0XFF           ADD    A,@0XFF           ADD    A,@0XFF           ADD    A,@0XFF       START:           DISI           SET P6 P7 PULL UP EN           CONTR           MOV    TREG,A           BC    TREG,7           MOV    A,TREG           CONTW           SET SCL SDA OUTPUT HIGH           MOV    A,@0XFF           MOV    TREG,A           BC    TREG,SCL    SCL OUTPUT           BC    TREG,SDA    SDA OUTPUT           MOV    A,TREG           IOW    IOC6           BS    R6,SCL        SCL HIGH           BS    R6,SDA        SDA HIGH       ;********************************************************************       ;读入的测试程序，读取2401的0x00～0x07地址内容       READ_2401:           MOV    A,@0X00           MOV    IICADDR,A           CALL    IIC_R8BYT           RET       ;********************************************************************       ;写入的测试程序，向2401的0x00～0x07地址写入0x00       WRITE_2401:           MOV    A,@0X00           MOV    IICADDR,A           CLR    IICDAT           CLR    IICDAT           CLR    IICDAT           CLR    IICDAT           CLR    IICDAT           CLR    IICDAT           CLR    IICDAT           CLR    IICDAT           CALL    IIC_W8BYT           RET       ;********************************************************************       ;与Microchip的2401接口程序       ;********************************************************************       ;IIC_W8BYT,向2401的指定地址写入8个字节数据       ;地址由IICADDR指定，数据存在IICDAT0～IICDAT7       IIC_W8BYT:           CALL    IIC_START           MOV    A,@0XA0           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_W8BYT           MOV    A,IICADDR           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_W8BYT           WRITE 8 BYTES TO 24C01           MOV    A,@IICBUF           MOV    R4,A           MOV    A,@8           MOV    GCNT,A       IIC_W8BYT1:           MOV    A,R0           INC    R4           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_W8BYT           DJZ    GCNT           JMP    IIC_W8BYT1           CALL    IIC_STOP           RET       ;********************************************************************       ;IIC_W1BYT,向2401的指定地址写入1个字节数据       ;地址由IICADDR指定，数据存在IICDAT0       IIC_W1BYT:           CALL    IIC_START           MOV    A,@0XA0           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_W1BYT           MOV    A,IICADDR           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_W1BYT           WRITE 1 BYTES TO 24C01           MOV    A,@IICBUF           MOV    A,IICDAT0           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_W1BYT1           CALL    IIC_STOP           RET       ;********************************************************************       ;IIC_R8BYT，从2401的指定地址（IICADDR）读入8个字节数据       IIC_R8BYT:           CALL    IIC_START           MOV    A,@0XA0           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_R8BYT           MOV    A,IICADDR           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_R8BYT           CALL    IIC_START           MOV    A,@0XA1           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_R8BYT           READ 8 BYTES FROM 24C01           MOV    A,@IICBUF           MOV    R4,A           MOV    A,@7           MOV    GCNT,A       IIC_R8BYT1:           CALL    IIC_RBYT           MOV    R0,A           INC    R4           CALL    IIC_SACK           DJZ    GCNT           JMP    IIC_R8BYT1           CALL    IIC_RBYT           MOV    R0,A           CALL    IIC_SNACK           CALL    IIC_STOP           RET       ;********************************************************************       ;IIC_R1BYT,向2401的指定地址读出1个字节数据       ;地址由IICADDR指定，数据存在IICDAT0       IIC_R1BYT:           CALL    IIC_START           MOV    A,@0XA0           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_R1BYT           MOV    A,IICADDR           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_R1BYT           CALL    IIC_START           MOV    A,@0XA1           CALL    IIC_WBYT           CALL    IIC_CACK           JBC    R3,GP        IF GP=1 OPTION AGAIN           JMP    IIC_R1BYT           READ 1 BYTES FROM 24C01           CALL    IIC_RBYT           MOV    IICDAT0,A           CALL    IIC_SNACK           CALL    IIC_STOP           RET       ;********************************************************************       ;IIC_START       IIC_START:           BS    R6,SCL        SCL=1           BS    R6,SDA        SDA=1           CALL    IIC_DELAY           BC    R6,SDA        SDA=0           CALL    IIC_DELAY           RET                 ;********************************************************************       ;IIC_STOP       IIC_STOP:           BS    R6,SCL        SCL=1           BC    R6,SDA        SDA=0           CALL    IIC_DELAY           BS    R6,SDA        SDA=1           CALL    IIC_DELAY           RET       ;********************************************************************       ;IIC_CACK IF ACK,FIIC=0       IIC_CACK:           SET SDA INPUT           IOR    IOC6           MOV    TREG,A           BS    TREG,SDA           MOV    A,TREG           IOW    IOC6           BS    R6,SCL        SCL=1           BC    R3,GP           JBC    R6,SDA           BS    R3,GP           BC    R6,SCL        SCL=0           SET SDA OUTPUT           IOR    IOC6           MOV    TREG,A           BC    TREG,SDA           MOV    A,TREG           IOW    IOC6           RET       ;********************************************************************       ;IIC_SACK       IIC_SACK:           BC    R6,SDA        SDA=0           NOP           BS    R6,SCL        SCL=1           CALL    IIC_DELAY           BC    R6,SCL        SCL=0           CALL    IIC_DELAY           RET                 ;********************************************************************       ;IIC_SNACK       IIC_SNACK:           BS    R6,SDA        SDA=1           NOP           BS    R6,SCL        SCL=1           CALL    IIC_DELAY           BC    R6,SCL        SCL=0           CALL    IIC_DELAY           RET       ;********************************************************************       ;IIC_WBYT       IIC_WBYT:           MOV    TREG,A           MOV    A,@8           MOV    TCNT,A       IIC_WBYT1:           BC    R6,SCL        SCL=0           JBC    TREG,7           JMP    IIC_WBIT1           JMP    IIC_WBIT0       IIC_WBIT1:           BS    R6,SDA           JMP    IIC_WBYT2       IIC_WBIT0:           BC    R6,SDA        SDA=X           JMP    IIC_WBYT2       IIC_WBYT2:           RLC    TREG           CALL    IIC_DELAY           BS    R6,SCL        SCL=1           CALL    IIC_DELAY           DJZ    TCNT           JMP    IIC_WBYT1           BC    R6,SCL        SCL=0           CALL    IIC_DELAY           RET                 ;********************************************************************       ;IIC_RBYT       IIC_RBYT:           MOV    A,@8           MOV    TCNT,A           SET SDA INPUT           IOR    IOC6           OR    A,@0X10           IOW    IOC6       IIC_RBYT1:           BS    R6,SCL        SCL=1           JBC    R6,SDA           JMP    IIC_RBIT1           JMP    IIC_RBIT0       IIC_RBIT1:           BS    TREG,0           JMP    IIC_RBYT2       IIC_RBIT0:           BC    TREG,0        SDA=X           JMP    IIC_RBYT2       IIC_RBYT2:           RLC    TREG           BC    R6,SCL        SCL=0           CALL    IIC_DELAY           DJZ    TCNT           JMP    IIC_RBYT1           STORE READ RESULT           RRC    TREG           MOV    A,TREG           MOV    TCNT,A           SET SDA OUTPUT           IOR    IOC6           AND    A,@0XEF           IOW    IOC6           RESTORE READ RESULT           MOV    A,TCNT           RET       ;********************************************************************       ;       IIC_DELAY:           NOP           NOP           RET                     ORG    0XFFF           JMP    START   看《匠人手记》，与匠人同行！北航出版，正在热卖！ 上一篇：一些实用的单片机c程序 下一篇：51单片机 Keil C 延时程序的简单研究 发表评论： 昵称： 密码： (游客无须输入密码) 主页： 标题： 载入中... 芯片专题 器件专题 软件专题 硬件专题 综合专题 项目专题 原创专题 EMC Freescale PIC MSP430  AVR ARM 器件检测 LCD LED 按键 触摸键 E2PROM 电池 电机 电阻 电容 电感 指令系统 软件算法 编程规范 滤波算法 串行通讯 PCB设计 I2C PWM 红外遥控 充电技术 中断 ADC  新手入门 项目管理 电磁兼容 低功耗 汽车电子 电子秤 电磁炉 电动车 报警器 匠人手记 匠人夜话 网络心路 一周热点串烧 从零开始玩PIC DIY旋转时钟 广告5号位 [投放] 学习板、开发板、编程器、下载器、仿真器（查看详情……）

站内搜索 日志标题日志内容 站外搜索 百度  google mp3  歌词  图片  FLASH  知道  文档 新闻  词典  地图  mp3  软件  天网  雅虎  爱问  搜狗  讯雷  网讯  华军  天空  21IC器件搜索 货源价格资料 百宝箱分站 《匠人的百宝箱》21IC站 《匠人的百宝箱》21IC笔记团队 《匠人的百宝箱》MCUBLOG站 《匠人的百宝箱》MCUBLOG笔记团队 《匠人的百宝箱》EDN站 《匠人手记》EDN书友会 《匠人的百宝箱》与非网站 《匠人的百宝箱》新浪站 《匠人的百宝箱》百度站 《匠人的百宝箱》网易126站 《匠人的百宝箱》网易163站 《匠人的百宝箱》互动出版网站 广告4号位 [投放]

新鲜货色	匠人手记	近期动态
载入中...	《匠人手记》购书全攻略   书友近况：淘书手记、答疑与讨论：什么是散转程序   《匠人手记》新书艳照  EDN《匠人手记》签名售书优惠活动开始报名啦！  欢迎加入《匠人手记》EDN书友会  欢迎加入《匠人手记》书友会Q群  《匠人手记》终稿目录  《匠人手记》封面，请大家先睹为快  上周六收到了北航寄来的《匠人手记》清样，让大家先睹为快	《匠人的百宝箱》21IC笔记团队  社区动态：《匠人手记》义拍活动，得款直接捐献灾区  浅谈A/D  太阳能应用图片集粹1  Keil C动态内存管理机制分析及改进  一种触摸实现方式  modelsim仿真UART接收功能  关于射频表无法用红外改写时间的问题  一定要珍惜的十种人  PADS2007安装问题解决方案
匠人原创	粉丝评论	往日酷贴
匠人原创：心灵的震撼——写在512地震之后  社区动态：《戒色》新片发布会(网友聚会恶搞系列)  匠人文集：两粒电子的爱情、出书的那些日子……    匠人夜话：论21ic的论坛文化、续。性格决定命运   选狼还是选狮子、狮子的结局…  《匠人夜话》27：七年之痒—写在升任21icbbs站长之际  匠人自制低成本电容式触控板  匠人漫画：人生，就是一场永无止境的攀登  一阶滤波算法之深入研究	载入中... 载入中...	网络酷文：博客，改变的不仅仅是图书   网络酷文：C语言宏定义技巧、C语言 条件编译详解   21IC上海2008-04聚会报名进行中。。。   两分钟让你明白什么是ERP！[转]   神奇的Duff's Device 算法   实用一线通讯电路及软件设计方法   程序员的“七年之痒”   史上最短但最精彩的武侠小说   网络无厘头文学《缺钙水浒》（爆笑）  你的博客还能持续多久（转贴）  电动车无刷电机控制器软件设计要点（作者:谢渊斌）

大千八卦	友情连接
新浪新闻： 新浪财经： AK58新闻： 新浪股票： 新浪股票： 证券之星： 行情数据 分时走时图 K线分析 新闻资讯 代码查询 BBS论坛 个股资料	[更多酷站连接]     [欢迎交换连接] [百宝箱之与非门分舵] [电脑圈圈的家当] [IC921的博客] [柔月阁] [八楼的呼吸] [hotpower 的水潭] [xwj的文君阁] [所长的BLOG] [阿摆手记] [电子伙伴] [unaided的笔记] [小飞的笔记] [单片机开发联盟] [网址之家] [好东西网址大全] [美萍中文精选] [数字电视之家] [SMARTCODE电子书斋] [软件开发之窗] [Armoric的笔记] [我爱研发网] [infernal的笔记] [雄鹰的空中加油站] [SunK] [逍遥电子] [ningpanda的博客] [C-Design] [一网见天下] [海边淘沙] [嵌入式365] [水牛的仓库] [股剩是怎样炼成的] [PIC论坛] [ICC AVR开发网] [中国高校自动化网]

!!! 《匠人的百宝箱》 !!!