《匠人手记》推荐网上购书渠道：   互动出版网（china-pub）   >>>   当当网（dangdang）   >>>   卓越亚马逊网    >>>   淘宝网（taobao）   >>>   更多购书渠道……   >>>

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

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

广告3号位 百宝日历 载入中... 百宝专栏 说明：请先返回首页，再点击下列专栏即可进入。 首页 相册 标签 匠人公告(87) 匠人笔记(144) 匠人文集(167) 写书近况(189) 团队撰写(96) 与非门专栏(566) 比尔熊专栏(12) 网络酷文(492) 程序宝典(477) 程序算法(28) 编程技巧(482) 资料宝藏(280) 硬件技术(178) 汽车电子(52) 藏经宝阁(47) 项目管理(15) 趣味设计(6) 社区热贴(5) 开发工具(19) 电脑应用(66) 供需信息(24) 最新货色 载入中... 粉丝评论 载入中... 载入中... 百宝信息 载入中... 百宝流量 （2006-07-01开始） 匠人手记 购书攻略、勘误表

开发板专卖——淘宝店  编程技巧： 优质代码的十诫  连载专题： 程序调试过程中的一些雕虫小技  国庆献礼：  匠人手记网络版-程序规划方法漫谈  社区热贴：有奖征文《我的一次调试经历》合集  趣味解析：二倍压整流电路 （带图）到底什么意思？  人在江湖： 直击 FTF2009-深圳 之1：走马观花 中颖单片机I2C程序 程序匠人 发表于 2006-12-1 13:11:00  阅读全文 | 回复(0) | 引用通告 | 编辑 中颖单片机I2C程序 ;**************************************************** ;Company: Sino Wealth Electronic (Shanghai) LTD ;File Name:eeprom.asm ;Begin Date: 2003/8/28 ;End Date: 2003/8/29 ;Function: READ OR WRITE DATA FROM/TO EEPROM(24C02)    SPEC Version: 0.3 ;SystemClock: RC=200K ;MCU: 69P20, Voltage:4.0V-6.0V; RAM:64*4BIT; ROM:1K*16BIT ;Bonding Option:NO ;Code by: Yanli    Email:yanli@sinowealth.com.cn ;**************************************************** ;***************************** ;* System Const Definition * ;***************************** IIC_SCL_MASK    EQU    1000B    ;OR WITH PORTC, PULL SCL HIGH IIC_SCL_LOW    EQU    0111B    ;AND WITH PORTC,PULL SCL LOW IIC_SDA_MASK    EQU    0100B    ;OR WITH PORTC, PULL SDA HIGH IIC_SDA_LOW    EQU    1011B    ;AND WITH PORTC,PULL SDA LOW IIC_SDA_INPUT    EQU    1011B    ;AND WITH PCOUT, SET PORT_SDA INPUT IIC_SDA_OUTPUT    EQU    0100B    ;OR WITH PCOUT,    SET PORT_SDA_OUTPUT ;******************************** ;* System Variable Definition * ;********************************    ;Used for EE_RDByte Function ;EE_RDAddressL    EQU    33H    ; ;EE_RDAddressH    EQU    34H    ; ;EE_RDDataL    EQU    35H    ; ;EE_RDDataH    EQU    36H    ; EE_RDByteTMP    EQU    37H    ; ;EE_RDByteRTN    EQU    38H    ; ;Used for EE_WRByte Function ;EE_WRAddressL    EQU    33H    ; ;EE_WRAddressH    EQU    34H    ; ;EE_WRDataL    EQU    35H    ; ;EE_WRDataH    EQU    36H    ; EE_WRByteTMP    EQU    37H    ; ;EE_WRByteRTN    EQU    38H    ; ;USED FOR WRITE AND READ BYTE FUNCTION EE_ADDRESSL    EQU    33H    ; EE_ADDRESSH    EQU    34H    ; EE_WRCOMMONRTN    EQU    38H    ; TMP1        EQU    31H TMP2        EQU    32H    EE_RDByte:        ;LDA    IE_BAK                ;Recover the IE        ;STA    IE               LDA    EE_RDAddressL,00H        STA    EE_ADDRESSL,00H        LDA    EE_RDAddressH,00H        STA    EE_ADDRESSH,00H        CALL    EE_WRCOMMON        STA    EE_WRCOMMONRTN,00H        BNZ    EE_RDBYTE_EEROR           ;***********************************************        ;GENERATE START        ;***********************************************               ORIM    PORTC,IIC_SDA_MASK        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SDA_LOW        ANDIM    PORTC,IIC_SCL_LOW    ;START        ORIM    PORTC,IIC_SDA_MASK        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;1               ANDIM    PORTC,IIC_SDA_LOW        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ORIM    PORTC,IIC_SDA_MASK        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;1               ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ;***********************************************        ;WRITE ADDR:000        ;***********************************************               ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ;***********************************************        ;READ OPCODE BIT:1        ;***********************************************               ORIM    PORTC,IIC_SDA_MASK           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;1        ;***********************************************        ;RECEIVE ACK BIT        ;***********************************************               LDI    PCOUT, 1001B        ORIM    PORTC,IIC_SDA_MASK    ULL UP        ORIM    PORTC,IIC_SCL_MASK        ;LDI    TMP1,IIC_SDA_MASK        ;AND    PORTC,00H        ;BNZ    EE_WRCOMMON_EEROR        LDA    PORTC, 00H        BA2    $-1        LDI    PCOUT,1001B               LDI    PORTC,0001B        ;***********************************************        ;READ BYTE        ;***********************************************               LDI    TMP1,04H EE_RDBYTE_H1:        LDA    EE_RDDataH,00H        ADDM    EE_RDDataH,00H        ;LEFT SHIFT        ORIM    PORTC,IIC_SCL_MASK        LDI    TMP2,IIC_SDA_MASK        AND    PORTC,00H        BNZ    EE_RDBYTE_H2        LDI    TMP2,00H        ADDM    EE_RDDataH,00H        ;READ 0        JMP    EE_RDBYTE_H3 EE_RDBYTE_H2:        LDI    TMP2,01H        ADDM    EE_RDDataH,00H        ;READ 1 EE_RDBYTE_H3:        ANDIM    PORTC,IIC_SCL_LOW        ORIM    PORTC,IIC_SDA_MASK    ULL UP        SBIM    TMP1,01H        BNZ    EE_RDBYTE_H1        ;DATAH OVER               ;LDI    PCOUT,1001B               ;LDI    PORTC,0001B        LDI    TMP1,04H EE_RDBYTE_L1:        LDA    EE_RDDataL,00H        ADDM    EE_RDDataL,00H        ORIM    PORTC,IIC_SCL_MASK        LDI    TMP2,IIC_SDA_MASK        AND    PORTC,00H        BNZ    EE_RDBYTE_L2        LDI    TMP2,00H        ADDM    EE_RDDataL,00H        JMP    EE_RDBYTE_L3 EE_RDBYTE_L2:        LDI    TMP2,01H        ADDM    EE_RDDataL,00H EE_RDBYTE_L3:        ANDIM    PORTC,IIC_SCL_LOW        ORIM    PORTC,IIC_SDA_MASK    ULL UP        SBIM    TMP1,01H        BNZ    EE_RDBYTE_L1        ;DATAL OVER        ;***********************************************        ;NO ACK        ;***********************************************               ;ORIM    PCOUT,IIC_SDA_OUTPUT        LDI    PCOUT, 1101B        ORIM    PORTC,IIC_SDA_MASK    ;PULL UP        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW        LDI    TMP1,00H        STA    EE_RDByteRTN,00H        JMP    EE_RDBYTE_EXIT                EE_RDBYTE_EEROR:        ANDIM    PORTC,IIC_SCL_LOW        ORIM    PCOUT,IIC_SDA_OUTPUT        LDI    TMP1,0FH        STA    EE_WRByteRTN,00H        EE_RDBYTE_EXIT:        ;***********************************************        ;GENERATE STOP        ;***********************************************               ANDIM    PORTC,IIC_SDA_LOW               ORIM    PORTC,IIC_SCL_MASK        ORIM    PORTC,IIC_SDA_MASK        ;LDA    IE                ;Protect the IE        ;STA    IE_BAK                       ;LDA    RomBankTMP,00H        ;STA    ROMBANK        JMP    I2C_READ_BYTE_OVER        ;        RTNI ;*********************** Function ****************************** ;** Name:    EE_WRByte                      ** ;** Description:Read one Byte from EEPROM(24C02)        ** ;** Input Para:    271H~270H -- EE_WRAddressH,EE_WRAddressL    ** ;**        273H~272H -- EE_WRDataH,EE_WRDataL        ** ;** Output Para:EE_WRByteRTN -- /0:Success;0:Failed        ** ;** Used Var:    EE_WRByteTMP -- temp for Operation        ** ;** Used Reg:    DPH/DPM/DPL,TBR,INX                ** ;***************************************************************** EE_WRByte:        ;LDA    IE_BAK                ;Recover the IE        ;STA    IE               LDI    IRQ, 00H        LDI    IE, 00H               LDA    EE_WRAddressL,00H        STA    EE_ADDRESSL,00H        LDA    EE_WRAddressH,00H        STA    EE_ADDRESSH,00H        CALL    EE_WRCOMMON        STA    EE_WRCOMMONRTN,00H        BNZ    EE_WRBYTE_EEROR           ;***********************************************        ;WRITE DATA(8 BITS)        ;***********************************************               LDI    TMP1,04H EE_WRBYTE_DATAH1:        LDA    EE_WRDataH,00H        ADDM    EE_WRDataH,00H        BC    EE_WRBYTE_DATAH2        ANDIM    PORTC,IIC_SDA_LOW    ;0        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW        JMP    EE_WRBYTE_DATAH3 EE_WRBYTE_DATAH2:           ORIM    PORTC,IIC_SDA_MASK    ;1        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW EE_WRBYTE_DATAH3:        SBIM    TMP1,01H        BNZ    EE_WRBYTE_DATAH1    ;DATAH OVER               LDI    TMP1,04H EE_WRBYTE_DATAL1:        LDA    EE_WRDataL,00H        ADDM    EE_WRDataL,00H        BC    EE_WRBYTE_DATAL2        ANDIM    PORTC,IIC_SDA_LOW    ;0        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW        JMP    EE_WRBYTE_DATAL3 EE_WRBYTE_DATAL2:           ORIM    PORTC,IIC_SDA_MASK    ;1        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW EE_WRBYTE_DATAL3:        SBIM    TMP1,01H        BNZ    EE_WRBYTE_DATAL1    ;DATAL OVER        ;***********************************************        ;RECEIVE ACK BIT        ;***********************************************               LDI    PCOUT, 1001B        ORIM    PORTC,IIC_SDA_MASK    ;PULL UP        ORIM    PORTC,IIC_SCL_MASK        ;LDI    TMP1,IIC_SDA_MASK        ;AND    PORTC,00H        ;BNZ    EE_WRCOMMON_EEROR        LDA    PORTC, 00H        BA2    $-1        LDI    PCOUT,1101B        LDI    PORTC,0001B        LDI    TMP1,00H        STA    EE_WRByteRTN,00H        JMP    EE_WRBYTE_EXIT        EE_WRBYTE_EEROR:        ANDIM    PORTC,IIC_SCL_LOW        ORIM    PCOUT,IIC_SDA_OUTPUT        ;LDI    TMP1,0FH        LDI    EE_WRByteRTN,0FH        EE_WRBYTE_EXIT:        ;***********************************************        ;GENERATE STOP        ;***********************************************               ANDIM    PORTC,IIC_SDA_LOW               ORIM    PORTC,IIC_SCL_MASK        ORIM    PORTC,IIC_SDA_MASK        ;LDA    IE                ;Protect the IE        ;STA    IE_BAK        ;LDI    IRQ, 00H        ;LDI    IE,0000B                       ;LDA    RomBankTMP,00H        ;STA    ROMBANK        JMP    I2C_WRITE_BYTE_OVER ;        RTNI ;        ;        ;        EE_WRCOMMON:        LDI    PCOUT, 0FH        ;SOME INITIAL SETTING        LDI    PULL, 1100B        LDI    PORTC, 0001B        ;VCC,           LDI    TMP1, 00H        LDI    TMP2, 00H        ORIM    PORTC,IIC_SDA_MASK        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SDA_LOW        ANDIM    PORTC,IIC_SCL_LOW    ;GENERATE START        ;***********************************************        ;WRITE COMMAND:1010        ;***********************************************               ORIM    PORTC,IIC_SDA_MASK        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;1               ANDIM    PORTC,IIC_SDA_LOW        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ORIM    PORTC,IIC_SDA_MASK        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;1               ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ;***********************************************        ;WRITE ADDR:0000        ;***********************************************               ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ;***********************************************        ;WRITE OPCODE BIT:0        ;***********************************************               ANDIM    PORTC,IIC_SDA_LOW           ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW    ;0        ;***********************************************        ;RECEIVE ACK BIT        ;***********************************************               ;ANDIM    PCOUT,IIC_SDA_INPUT        ;ORIM    PORTC,IIC_SDA_MASK    ;PULL UP        LDI    PCOUT, 1001B        ORIM    PORTC, IIC_SDA_MASK        ORIM    PORTC,IIC_SCL_MASK        ;LDI    TMP1,IIC_SDA_MASK        ;AND    PORTC,00H        LDA    PORTC, 00H        BA2    $-1        ;BNZ    EE_WRCOMMON_EEROR        ;ORIM    PCOUT,IIC_SDA_OUTPUT        LDI    PCOUT, 1101B        LDI    PORTC,0001B        ;ANDIM    PORTC,IIC_SCL_LOW        ;ORIM    PORTC, IIC_SDA_MASK        ;***********************************************        ;WRITE ADDRESS(8 BITS)        ;***********************************************               LDI    TMP1,04H EE_WRCOMMON_ADDRH1:        LDA    EE_ADDRESSH,00H        ADDM    EE_ADDRESSH,00H        BC    EE_WRCOMMON_ADDRH2        ANDIM    PORTC,IIC_SDA_LOW    ;0        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW        JMP    EE_WRCOMMON_ADDRH3 EE_WRCOMMON_ADDRH2:           ORIM    PORTC,IIC_SDA_MASK    ;1        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW EE_WRCOMMON_ADDRH3:        SBIM    TMP1,01H        BNZ    EE_WRCOMMON_ADDRH1    ;ADDRH OVER               LDI    TMP1,04H EE_WRCOMMON_ADDRL1:        LDA    EE_ADDRESSL,00H        ADDM    EE_ADDRESSL,00H        BC    EE_WRCOMMON_ADDRL2        ANDIM    PORTC,IIC_SDA_LOW    ;0        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW        JMP    EE_WRCOMMON_ADDRL3 EE_WRCOMMON_ADDRL2:           ORIM    PORTC,IIC_SDA_MASK    ;1        ORIM    PORTC,IIC_SCL_MASK        ANDIM    PORTC,IIC_SCL_LOW EE_WRCOMMON_ADDRL3:        SBIM    TMP1,01H        BNZ    EE_WRCOMMON_ADDRL1    ;ADDRL OVER        ;***********************************************        ;RECEIVE ACK BIT        ;***********************************************               ;ANDIM    PCOUT,IIC_SDA_INPUT        LDI    PCOUT, 1001B        ORIM    PORTC,IIC_SDA_MASK    ;PULL UP        ORIM    PORTC,IIC_SCL_MASK               ;LDI    TMP1,IIC_SDA_MASK        ;AND    PORTC,00H        ;BNZ    EE_WRCOMMON_EEROR        LDA    PORTC, 00H        BA2    $-1        LDI    PCOUT,1101B        LDI    PORTC,0001B        ;ANDIM    PORTC,IIC_SCL_LOW        LDI    TMP1,00H        STA    EE_WRCOMMONRTN,00H        RTNI        EE_WRCOMMON_EEROR:        ;LDI    TMP1,0FH        LDI    EE_WRCOMMONRTN,0FH        RTNI 看《匠人手记》，与匠人同行！北航出版，正在热卖！ 标签：中颖 单片机 I2C 程序  上一篇：一些实用的单片机c程序 下一篇：西游记十大杰出青年 发表评论： 昵称： 密码： 主页： 标题： 载入中... 芯片专题 器件专题 软件专题 硬件专题 综合专题 项目专题 原创专题 EMC Freescale PIC MSP430  AVR ARM 器件检测 LCD LED 按键 触摸键 E2PROM 电池 电机 电阻 电容 电感 指令系统 软件算法 编程规范 滤波算法 串行通讯 PCB设计 I2C PWM 红外遥控 充电技术 中断 ADC  新手入门 项目管理 电磁兼容 低功耗 汽车电子 电子秤 电磁炉 电动车 报警器 匠人手记 匠人夜话 网络心路 一周热点串烧 从零开始玩PIC DIY旋转时钟 广告5号位 [投放]

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

	推荐阅读
匠人手记：从零开始玩转PIC 之 旋转时钟  社区逸事： 新华山论剑 之 21IC版	编程技巧：浅谈单片机程序设计中的“分层思想”  人在职场：一位职场新人的困惑与苦恼	程序算法：卡尔曼滤波简介＋ 算法实现代码

友情连接

[更多酷站连接]         [欢迎交换连接] [百宝箱之与非门分舵] [电脑圈圈的家当] [IC921的博客] [hotpower 的水潭] [八楼的呼吸] [柔月阁] [PIC论坛] [SMARTCODE电子书斋] [阿摆手记] [电子伙伴] [xwj的文君阁] [所长的BLOG] [海边淘沙] [单片机开发联盟] [数字电视之家] [软件开发之窗] [unaided的笔记] [小飞的笔记] [ICC AVR开发网] [我爱研发网] [infernal的笔记] [网址之家] [好东西网址大全] [美萍中文精选] [水牛的仓库] [逍遥电子] [ningpanda的博客] [雄鹰的空中加油站] [一网见天下] [Armoric的笔记] [股剩是怎样炼成的] [嵌入式365] [C-Design] [AVR猎手的地盘] [中国高校自动化网] [SunK] [工控365网] [煮透社] [白沙的香烟盒]

《匠人的百宝箱》