软件开发MAIN:
        CLR        FAST
        SETB        IRIN
        LCALL        COPY        ;读取24C02中的数据作为遥控开关比较数据
        MOV        3AH,#20                ;控制蜂鸣器时间
        LCALL        FS_SPK                ;蜂鸣器响一声(没有检测到24C02，蜂鸣器开机不响)
软件开发WU2402:
        MOV        LCD,#00000001B        ;清屏并复位光标
        LCALL        WR_COMM                ;调用写指令子程序
        LCALL        INIT_LCD        ;调用初始化子程序
        MOV        SP,#60H
        LCALL DISP        ;显示

        SETB        EA                 ;打开CPU总中断请求
        MOV        TMOD,#00010001B        ;模式1定时模式
        MOV        TH0,#00H
        MOV        TL0,#00H
        SETB        IT0                 ;设定INT0的触发方式为脉冲负边沿触发
        SETB        EX0

软件开发UUUU:
        JNB S1,A2
        JB K1,UUUU   ;有按键就发送遥控码
        CLR EA        ;关闭中断，让遥控码发送完成不受干扰
        MOV A,2CH
        CPL A
        MOV 2CH,A
        LCALL TTTT
        SETB EA
        JMP UUUU
;============================按键程序====================================
A2:        LCALL DELAY_10MS
        JB S1,A2_EN
        CPL SSR                ;开关动作一次
A2_EN:
        RET
DELAY_10MS:
        MOV R6,#25
XX0:        MOV R7,#20        
XX1:        DJNZ R7,$
        DJNZ R6,XX0
        RET
；=========================读出24C02数据==================
copy:
        mov r0,#2Ah        ;r0作为间接寻址
        mov address,#00h;地址清零

;        mov 2Ah,#0        ;清零准备装入上次24C02存储的数据
;        mov 2Bh,#0        ;读出的数据放在2AH/2BH/2CH中
;        mov 2Ch,#0
;        mov 2Dh,#0

        mov         r5,#4         
s:        mov         r2,#10100000b        ;写存储器1010（为24c系列统一识别码）001（为芯片地址码A2/A1/A0）最后一位是读写位        
        mov         r4,#10100001b        ;读存储器
        MOV R3,#50
        Lcall         read                ;调用读存储器程序
        inc         address                ;地址加1
        inc        r0
        djnz         r5,s                ;减1后不为0继续返回S
        ret

;----------------------------------
read:        lcall start                ;启动总线
        mov         a,r2
        lcall send
        lcall ack
        jc         read                ;               
        mov         a,address
        lcall send
        lcall ack
read_a:
        lcall start
        mov         a,r4
        lcall send
        lcall ack
        jc         read_a
rece:
        lcall receive
        mov         @r0,a                ;读到数据存储到@R0指定地址
        lcall ack
        lcall stop
        ret