eeprom.lst

单片机C和汇编程序代码,其中有EEPROM,LCD的使用.

A51 MACRO ASSEMBLER  EEPROM                                                               04/13/2008 14:40:49 PAGE     1


MACRO ASSEMBLER A51 V6.12
OBJECT MODULE PLACED IN .\EEPROM.OBJ
ASSEMBLER INVOKED BY: D:\keil\C51\BIN\A51.EXE .\EEPROM.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

  00B7                 1     SDA24  EQU P3.7 
  00B6                 2     SCLK24 EQU P3.6 
0000                   3     ORG 0000
0000 0130              4     AJMP    MAIN
0030                   5     ORG 0030H
0030                   6     MAIN:
                       7     
0030 7455              8     mov a,#55h
0032 F5F0              9     mov b,a
0034 7400             10     mov a,#00h
0036 120071           11     lcall wt24
0039 7400             12     mov a,#00h
003B 120042           13     lcall rd24
003E F580             14     mov p0,a
0040 0140             15     ajmp $
                      16     
                      17     
0042 C0E0             18     RD24:  PUSH ACC     ;读24C02子程序。
0044 D2B7             19             SETB SDA24
0046 C2B6             20             CLR SCLK24
0048 1190             21             CALL START24    ;启动
004A 74A0             22             MOV A,#0A0H
004C 11A7             23             CALL SHIFT8     ;移位
004E 11A2             24             CALL ACK    ;响应
0050 D0E0             25             POP ACC
0052 11A7             26             CALL SHIFT8
0054 11A2             27             CALL ACK
0056 1190             28             CALL START24
0058 74A1             29             MOV A,#0A1H
005A 11A7             30             CALL SHIFT8
005C 11A2             31             CALL ACK
005E D2B7             32             SETB SDA24
0060 7F08             33             MOV R7,#8
0062 E4               34             CLR A
0063 D2B7             35             SETB SDA24
0065 23               36     RD000:  RL A        ;8个位
0066 D2B6             37             SETB SCLK24
0068 A2B7             38             MOV C,SDA24
006A 92E0             39             MOV ACC.0,C
006C C2B6             40             CLR SCLK24
006E DFF5             41             DJNZ R7,RD000
0070 22               42             RET
                      43     ;-------------------------------
                      44     ;写入24C02程序：
0071 C0E0             45     WT24:   PUSH ACC
0073 D2B7             46             SETB SDA24
0075 C2B6             47             CLR SCLK24
0077 1190             48             CALL START24
0079 74A0             49             MOV A,#0A0H
007B 11A7             50             CALL SHIFT8
007D 11A2             51             CALL ACK
007F D0E0             52             POP ACC
0081 11A7             53             CALL SHIFT8
0083 11A2             54             CALL ACK
0085 E5F0             55             MOV A,B
0087 11A7             56             CALL SHIFT8
0089 11A2             57             CALL ACK
008B 119B             58             CALL STOP
A51 MACRO ASSEMBLER  EEPROM                                                               04/13/2008 14:40:49 PAGE     2

008D 11B3             59             CALL DELAY2
008F 22               60             RET
                      61     ; -------------------------------
                      62     ;开始条件
0090 C2B7             63     START24:CLR SDA24
0092 D2B7             64             SETB SDA24
0094 D2B6             65             SETB SCLK24
0096 C2B7             66             CLR SDA24
0098 C2B6             67             CLR SCLK24
009A 22               68             RET
                      69     
                      70     ;停止条件
009B C2B7             71     STOP:   CLR SDA24
009D D2B6             72             SETB SCLK24
009F D2B7             73             SETB SDA24
00A1 22               74             RET
                      75     
                      76     ;应答信号
00A2 D2B6             77     ACK:    SETB SCLK24
00A4 C2B6             78             CLR SCLK24
00A6 22               79             RET
                      80     
                      81     ;读、写示