加入收藏 | 设为首页 | 会员中心 | 我要投稿 | RSSRSS-巴斯仪表网
您当前的位置:首页 > 电子DIY > 其它电子制作DIY

简易串行存储器拷贝器

时间:2013-08-25  来源:123485.com  作者:9stone

汇编源程序:

 ORG 0000H
     LJMP MAIN
     ORG 002DH
MAIN:MOV SP,#40H
     MOV 34H,#0FFH
     MOV P1,0FFH
M1:  CPL P1.2
     LCALL YS
     JB P1.3,M1
     LCALL YS
     JB P1.3,M1
M2:  JNB P1.3,M2
     CLR P1.2
     MOV R7,#04H
     MOV R6,#10H
     MOV 30H,#0A0H
M14: MOV 32H,#00H
M13: MOV 31H,#40H
     MOV R1,#20H
MA:  DJNZ 31H,M4
     MOV 34H,#88H
     LJMP M1
M4:  LCALL QD
     MOV A,30H
     LCALL FA
     JNB F0,M3
     SJMP MA
M3:  MOV A,32H
     LCALL FA
     JB F0,MA
     LCALL QD
     MOV A,30H
     ADD A,#01H
     LCALL FA
     JB F0,MA
M7:  LCALL DU
     MOV @R1,A
     CJNE R1,#2FH,M5
     LCALL FYD
     LCALL TZ
     SJMP M6
M5:  LCALL YD
     INC R1
     SJMP M7
M6:  MOV 31H,#0FFh
     MOV R1,#20H
M9:  DJNZ 31H,M8
     MOV 34H,#30H
     LJMP M1
M8:  LCALL QD
     MOV A,30H
     ADD A,#08h
     LCALL FA
     JB F0,M9
     MOV A,32H
         LCALL FA
         JB F0,M9
M15: MOV A,@R1
     LCALL FA
         JB F0,M9
         CJNE R1,#2FH,M10
         LCALL TZ
         MOV 34H,#0AH
         LCALL YS
         DJNZ R6,M11
         DJNZ R7,M12
         NOP
         NOP
         NOP
         LJMP MAIN
M10: INC R1
     SJMP M15
M11: MOV A,32H
     ADD A,#10H
         MOV 32H,A
         LJMP M13
M12: MOV A,30H
     ADD A,#02H
         MOV 30H,A
         LJMP M14
    ORG 0200H
YS:  MOV R5,34H
LOOP1:MOV R4,#0FFH
LOOP2:DJNZ R4,LOOP2
      DJNZ R5,LOOP1
      RET
    ORG 0100H
QD: SETB P1.7
    SETB P1.6
    NOP
    NOP
    CLR P1.7
    NOP
    NOP
    CLR P1.6
    RET
 
    ORG  0140H
FA: MOV R0,#08H
FA2: RLC A
    JC  FA1
    SJMP FA3
FA4:DJNZ R0,FA2
    SJMP FA5
FA1:SETB P1.7
    SETB P1.6
    NOP
    NOP
    CLR P1.6
    CLR P1.7
    SJMP FA4
FA3:CLR P1.7
    SETB P1.6
    NOP
    NOP
    CLR P1.6
    SJMP FA4
FA5:SETB P1.7
    SETB P1.6
    CLR F0
    MOV A,P1
    JNB ACC.7,FA6
    SETB F0
FA6:CLR P1.6
    NOP
    RET
DU:MOV R0,#08H
DU2:SETB P1.7
   SETB P1.6
   MOV A,P1
   JNB ACC.7,DU0
   SJMP DU1
DU3:DJNZ R0,DU2
   RET
DU0:CLR C
   MOV A,R2
  RLC A
   MOV R2,A
   CLR P1.6
   SJMP DU3
DU1:SETB C
    MOV A,R2
    RLC A
    MOV R2,A
    CLR P1.6
    SJMP DU3
   ORG 0110H
TZ:CLR P1.7
   SETB P1.6
   NOP
   NOP
   SETB P1.7
   NOP
   NOP
   CLR P1.6
   RET
   ORG 0120
YD:CLR P1.7
   SETB P1.6
   NOP
   NOP
   CLR P1.6
   NOP
   NOP
   SETB P1.7
   RET
   ORG 0130H
FYD:SETB P1.7
    SETB P1.6
    NOP
    NOP
    CLR P1.6
    CLR P1.7
    RET
    END




 


分享到:
来顶一下
返回首页
返回首页
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表
栏目导航->其它电子制作DIY
  • 数字仪表DIY
  • LED照明DIY
  • 电子工具DIY
  • 电源DIY
  • 音响功放DIY
  • 其它电子制作DIY
  • 推荐资讯
    使用普通运放的仪表放大器
    使用普通运放的仪表放
    3V与5V混合系统中逻辑器接口问题
    3V与5V混合系统中逻辑
    数字PID控制及其改进算法的应用
    数字PID控制及其改进
    恶劣环境下的高性价比AD信号处理数据采集系统
    恶劣环境下的高性价比
    栏目更新
    栏目热门