找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 4499|回复: 4
打印 上一主题 下一主题
收起左侧

汇编密码锁源程序

[复制链接]
跳转到指定楼层
楼主
ID:70976 发表于 2014-12-25 13:07 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 daniu 于 2014-12-25 13:18 编辑
  1. ORG     0000H
  2. MOV     SP,50H
  3. SJMP    MAIN


  4. MAIN:   LCALL   SM
  5.         CJNE    R7,#16,N0
  6.         SJMP    MAIN
  7. N0:     MOV    30H,R7
  8.         LCALL   SM
  9.         LCALL  XS
  10.         CJNE   R7,#16,N0
  11. MAIN0:  LCALL   SM
  12.         CJNE    R7,#16,N1
  13.         SJMP    MAIN0
  14. N1:     MOV    31H,R7
  15.         LCALL   SM
  16.         LCALL  XS
  17.         CJNE   R7,#16,N1
  18. MAIN1:  LCALL   SM
  19.         CJNE    R7,#16,N2
  20.         SJMP    MAIN1
  21. N2:     MOV    32H,R7
  22.         LCALL   SM        
  23.         LCALL  XS
  24.         CJNE   R7,#16,N2
  25. MAIN2:  LCALL   SM
  26.         CJNE    R7,#16,N3
  27.         SJMP    MAIN2
  28. N3:     MOV    33H,R7
  29.         LCALL   SM
  30.         LCALL  XS
  31.         CJNE   R7,#16,N3
  32. MAIN3:  LCALL   SM
  33.         CJNE    R7,#16,N4
  34.         SJMP    MAIN3
  35. N4:     MOV    34H,R7
  36.         LCALL   SM
  37.         LCALL  XS
  38.         CJNE   R7,#16,N4
  39. MAIN4:  LCALL   SM
  40.         CJNE    R7,#16,N5
  41.         SJMP    MAIN4
  42. N5:     MOV    35H,R7
  43.         LCALL   SM
  44.         LCALL   XS
  45.         CJNE   R7,#16,N5


  46. YZ:     MOV     A,30H
  47.         CJNE    A,#3,CW
  48.         MOV     A,31H
  49.         CJNE    A,#3,CW
  50.         MOV     A,32H
  51.         CJNE    A,#3,CW
  52.         MOV     A,33H
  53.         CJNE    A,#3,CW
  54.         MOV     A,34H
  55.         CJNE    A,#3,CW
  56.         MOV     A,35H
  57.         CJNE    A,#3,CW
  58.         CLR     P1.1
  59.         SJMP    $
  60.         RET

  61. CW:     CLR     P2.6
  62.         SJMP    $
  63.         RET

  64. XS:     MOV     DPTR,#TAB
  65.         MOV     A,30H
  66.         MOVC    A,@A+DPTR
  67.         MOV     SBUF,A
  68.         JNB     TI,$
  69.         CLR     TI

  70.         MOV     A,31H
  71.         MOVC    A,@A+DPTR
  72.         MOV     SBUF,A
  73.         JNB     TI,$
  74.         CLR     TI

  75.         MOV     A,32H
  76.         MOVC    A,@A+DPTR
  77.         MOV     SBUF,A
  78.         JNB     TI,$
  79.         CLR     TI

  80.         MOV     A,33H
  81.         MOVC    A,@A+DPTR
  82.         MOV     SBUF,A
  83.         JNB     TI,$
  84.         CLR     TI

  85.         MOV     A,34H
  86.         MOV     DPTR,#TAB
  87.         MOVC    A,@A+DPTR
  88.         MOV     SBUF,A
  89.         JNB     TI,$
  90.         CLR     TI

  91.         MOV     A,35H
  92.         MOVC    A,@A+DPTR
  93.         MOV     SBUF,A
  94.         JNB     TI,$
  95.         CLR     TI


  96.         LCALL   YS

  97.         RET


  98. SM:MOV  P0,#0F0H
  99.    MOV  R7,P0
  100.    CJNE R7,#0F0H,KX
  101.    SJMP KK
  102.    LCALL  YS
  103.    CJNE R7,#0F0H,KX
  104.    SJMP KK
  105. KX:MOV  P0,#0FH
  106.    MOV  A,P0
  107.    ORL  A,R7

  108.    CJNE A,#0EEH,K1
  109.    MOV  R7,#1
  110.    RET
  111. K1:CJNE A,#0EDH,K2
  112.    MOV  R7,#2
  113.    RET
  114. K2:CJNE A,#0EBH,K3
  115.    MOV  R7,#3
  116.    RET
  117. K3:CJNE A,#0E7H,K4
  118.    MOV  R7,#4
  119.    RET
  120. K4:CJNE A,#0DEH,K5
  121.    MOV  R7,#5
  122.    RET
  123. K5:CJNE A,#0DDH,K6
  124.    MOV  R7,#6
  125.    RET
  126. K6:CJNE A,#0DBH,K7
  127.    MOV  R7,#7
  128.    RET
  129. K7:CJNE A,#0D7H,K8
  130.    MOV  R7,#8
  131.    RET
  132. K8:CJNE A,#0BEH,K9
  133.    MOV  R7,#9
  134.    RET
  135. K9:CJNE A,#0BDH,K10
  136.    MOV  R7,#0
  137.    RET
  138. K10:CJNE A,#0BBH,K11
  139.    MOV  R7,#10
  140.    RET
  141. K11:CJNE A,#0B7H,K12
  142.    MOV  R7,#11
  143.    RET
  144. K12:CJNE A,#07EH,K13
  145.    MOV  R7,#12
  146.    RET
  147. K13:CJNE A,#07DH,K14
  148.    MOV  R7,#13
  149.    RET
  150. K14:CJNE A,#07BH,K15
  151.    MOV  R7,#14
  152.    RET
  153. K15:CJNE A,#077H,K16
  154.    MOV  R7,#15
  155.    RET
  156. K16:NOP
  157.    RET



  158. KK:MOV  R7,#16
  159.    RET


  160. YS:MOV   R6,#00FH
  161. Y1:MOV   R5,#0FFH
  162.    DJNZ  R5,$
  163.    DJNZ  R6,Y1
  164.    RET

  165. TAB:DB 088H,0BEH,0C4H,094H,0B2H
  166.     DB 091H,081H,0BCH,080H,090H
  167.     END
复制代码

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:72142 发表于 2015-1-13 14:59 | 只看该作者
那为什么没有仿真图呢
回复

使用道具 举报

板凳
ID:72142 发表于 2015-1-18 22:31 | 只看该作者
那为什么没有仿真图呢
回复

使用道具 举报

地板
ID:222985 发表于 2017-10-18 15:12 | 只看该作者
求仿真的图啊
回复

使用道具 举报

5#
ID:241001 发表于 2017-10-21 08:27 | 只看该作者
感谢分享感谢·················
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表