⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 lc72131.lst

📁 LC72131完整程序
💻 LST
📖 第 1 页 / 共 5 页
字号:
A51 MACRO ASSEMBLER  LC72131                                                              06/26/2007 14:21:06 PAGE     1


MACRO ASSEMBLER A51 V8.00
OBJECT MODULE PLACED IN LC72131.OBJ
ASSEMBLER INVOKED BY: C:\Keil\C51\BIN\A51.EXE LC72131.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

0000                   1                                                        ORG  0000H
0000 021481            2     START:  LJMP MAIN
0003                   3             ORG  0003H          
0003 020B05            4             LJMP AA50D 
000B                   5             ORG  000BH
000B 021036            6             LJMP AAA53
000E 7E0CB69E          7     TA00E:  DB 7EH,0CH,0B6H,9EH,0CCH
0012 CC                      
0013 DAFA0EFE          8             DB 0DAH,0FAH,0EH,0FEH,0DEH
0017 DE                      
                       9     
0018 12134C           10     ppp2:   lcall   aad48
001B C2AF             11             clr     0afh
001D 855E5A           12             mov     5ah,5eh
0020 855F5B           13             mov     5bh,5fh
0023 7809             14             mov     r0,#09h
0025 E55A             15     ppp5:   mov     a,5ah
0027 C3               16             clr     c
0028 94D6             17             subb    a,#0d6h        ;0d6h*9=1926
002A F55A             18             mov     5ah,a
002C E55B             19             mov     a,5bh
002E 5001             20             jnc     ppp3
0030 14               21             dec     a
0031 F55B             22     ppp3:   mov     5bh,a
0033 D8F0             23             djnz    r0,ppp5
                      24     
0035 E55A             25             mov     a,5ah
0037 C3               26             clr     c
0038 9426             27             subb    a,#26h         ;-38
003A F55A             28             mov     5ah,a
003C E55B             29             mov     a,5bh
003E 5001             30             jnc     ppp6
0040 14               31             dec     a
0041 F55B             32     ppp6:   mov     5bh,a          ;-98.2mhz=1964
                      33     
0043 75F000           34     ppp12:  mov     b,#00h
0046 E55B             35             mov     a,5bh
0048 B40002           36             cjne    a,#00h,ppp15
004B 8018             37             sjmp    ppp14
004D C3               38     ppp15:  clr     c
004E E55A             39             mov     a,5ah
0050 9414             40             subb    a,#14h
0052 F55A             41             mov     5ah,a
0054 E55B             42             mov     a,5bh
0056 5001             43             jnc     ppp13
0058 14               44             dec     a
0059 F55B             45     ppp13:  mov     5bh,a
005B E5F0             46             mov     a,b
005D 04               47             inc     a
005E F5F0             48             mov     b,a
0060 E55B             49             mov     a,5bh
0062 B400E8           50             cjne    a,#00h,ppp15
                      51     
0065 C3               52     ppp14:  clr     c
0066 E55A             53             mov     a,5ah
0068 9414             54             subb    a,#14h
006A 4009             55             jc      ppp17
006C F55A             56             mov     5ah,a
A51 MACRO ASSEMBLER  LC72131                                                              06/26/2007 14:21:06 PAGE     2

006E E5F0             57             mov     a,b
0070 04               58             inc     a
0071 F5F0             59             mov     b,a
0073 80F0             60             sjmp    ppp14
                      61     
0075 E5F0             62     ppp17:  mov     a,b
0077 2457             63             add     a,#57h
0079 F55B             64             mov     5bh,a
007B E55A             65             mov     a,5ah
007D 75F005           66             mov     b,#05h
0080 A4               67             mul     ab
0081 2432             68             add     a,#32h
0083 F55A             69             mov     5ah,a
0085 C3               70             clr     c
0086 9464             71             subb    a,#64h
0088 4007             72             jc      ppp19
008A F55A             73             mov     5ah,a
008C E55B             74             mov     a,5bh
008E 04               75             inc     a
008F F55B             76     ppp18:  mov     5bh,a
                      77     
0091 90000E           78     ppp19:  mov     dptr,#ta00e;pp00
0094 E55B             79             mov     a,5bh
0096 75F00A           80             mov     b,#0ah
0099 84               81             div     ab
009A C5F0             82             xch     a,b
009C B40105           83             cjne    a,#01h,yyy0
009F 433812           84             orl     38h,#12h
00A2 8003             85             sjmp    yyy1
00A4 93               86     yyy0:   movc    a,@a+dptr
00A5 4237             87             orl     37h,a
00A7 433840           88     yyy1:   orl     38h,#40h      ;.
00AA C5F0             89             xch     a,b
00AC 75F00A           90             mov     b,#0ah
00AF 84               91             div     ab
00B0 C5F0             92             xch     a,b
00B2 B40105           93             cjne    a,#01h,yyy3
00B5 433612           94             orl     36h,#12h
00B8 8003             95             sjmp    yyy4
00BA 93               96     yyy3:   movc    a,@a+dptr
00BB 4235             97             orl     35h,a
00BD C5F0             98     yyy4:   xch     a,b
00BF B40103           99             cjne    a,#01h,ppp21
00C2 433412          100             orl     34h,#12h
                     101             
00C5 90000E          102     ppp21:  mov     dptr,#ta00e;pp00
00C8 E55A            103             mov     a,5ah
00CA 75F00A          104             mov     b,#0ah
00CD 84              105             div     ab
00CE C5F0            106             xch     a,b
00D0 93              107             movc    a,@a+dptr
00D1 423B            108             orl     3bh,a
00D3 C5F0            109     yyy7:   xch     a,b
00D5 75F00A          110             mov     b,#0ah
00D8 84              111             div     ab
00D9 C5F0            112             xch     a,b
00DB B40104          113             cjne    a,#01h,yyy8
00DE 433A12          114             orl     3ah,#12h
00E1 22              115             ret
00E2 93              116     yyy8:   movc    a,@a+dptr
00E3 4239            117             orl     39h,a
00E5 D2AF            118             setb    0afh
00E7 22              119             ret
00E8 7E0CB69E        120     pp00:   db 7eh,0ch,0b6h,9eh,0cch,0dah,0fah,0eh,0feh,0deh
00EC CCDAFA0E                
00F0 FEDE                    
A51 MACRO ASSEMBLER  LC72131                                                              06/26/2007 14:21:06 PAGE     3

                     121     
00F2 7808            122     send0:  mov     r0,#08h
00F4 13              123     send1:  rrc     a
00F5 9296            124             mov     96h,c
00F7 D297            125             setb    97h
00F9 00              126             nop
00FA 00              127             nop
00FB 00              128             nop
00FC 00              129             nop
00FD C297            130             clr     97h
00FF 00              131             nop
0100 00              132             nop
0101 00              133             nop
0102 00              134             nop
0103 D8EF            135             djnz    r0,send1
0105 22              136             ret
                     137     
0106 C2A5            138     send:   clr     0a5h
0108 C297            139             clr     97h
010A C296            140             clr     96h
010C D2A5            141             setb    0a5h
010E 00              142             nop
010F 00              143             nop
0110 E55E            144             mov     a,5eh
0112 11F2            145             acall   send0
0114 E55F            146             mov     a,5fh
0116 11F2            147             acall   send0
0118 E55C            148             mov     a,5ch
011A 11F2            149             acall   send0
011C C2A5            150             clr     0a5h
011E 22              151             ret
                     152     
011F C2AF            153     tttt:   clr     0afh
0121 E55E            154             mov     a,5eh
0123 B4FF07          155             cjne    a,#0ffh,cccc1
0126 755E00          156             mov     5eh,#00h
0129 055F            157             inc     5fh
012B 212F            158             ajmp    cccc
012D 055E            159     cccc1:  inc     5eh
                     160            
012F 120106          161     cccc:   lcall   send
0132 D2A6            162             setb    0a6h
0134 120179          163             lcall   dly120
0137 D2AF            164             setb    0afh
0139 22              165             ret
                     166     
013A C2AF            167     qqqq:   clr     0afh
013C C3              168             clr     c
013D E55E            169             mov     a,5eh
013F B4000A          170             cjne    a,#00h,qqq1
0142 755EFF          171             mov     5eh,#0ffh
0145 E55F            172             mov     a,5fh
0147 14              173             dec     a
0148 F55F            174             mov     5fh,a
014A 2151            175             ajmp    qqqq0
014C E55E            176     qqq1:   mov     a,5eh
014E 14              177             dec     a
014F F55E            178             mov     5eh,a
0151 120106          179     qqqq0:  lcall   send
0154 D2A6            180             setb    0a6h
0156 120179          181             lcall   dly120
0159 D2AF            182             setb    0afh
015B 22              183             ret
                     184     
015C 7E14            185     dly100: mov     r6,#14h
015E 7FFF            186     dly4:   mov     r7,#0ffh
A51 MACRO ASSEMBLER  LC72131                                                              06/26/2007 14:21:06 PAGE     4

0160 00              187     dly3:   nop
0161 DFFD            188             djnz    r7,dly3
0163 DEF9            189             djnz    r6,dly4
0165 22              190             ret
                     191     
0166 7E14            192     dly50:  mov     r6,#14h
0168 7FFF            193     dly1a:  mov     r7,#0ffh
016A 208608          194     dly1b:  jb      86h,dlyc
016D DFFB            195             djnz    r7,dly1b
016F DEF7            196             djnz    r6,dly1a
0171 755D01          197             mov     5dh,#01h
0174 22              198             ret
0175 755D00          199     dlyc:   mov     5dh,#00h
0178 22              200             ret
                     201     
0179 7E40            202     dly120: mov     r6,#40h
017B 7FFF            203     dly1:   mov     r7,#0ffh
017D 30860A          204     dly0:   jnb     86h,dly5
0180 00              205             nop
0181 DFFA            206             djnz    r7,dly0
0183 DEF6            207             djnz    r6,dly1
0185 755D00          208             mov     5dh,#00h
0188 8002            209             sjmp    dly8
018A 3166            210     dly5:   acall   dly50
018C 22              211     dly8:   ret
                     212     
018D 120E5B          213     AA018:  LCALL   AA85C
0190 753119          214             MOV     31H,#19H
0193 7807            215             MOV     R0,#07H
0195 B295            216     BB020:  CPL     95H
0197 D202            217     BB022:  SETB    02H
0199 2002FD          218     BB024:  JB      02H,BB024
019C D8F7            219             DJNZ    R0,BB020
019E 900000          220             MOV     DPTR,#0000H
01A1 31C6            221             ACALL   AA043
01A3 E517            222             MOV     A,17H         
01A5 C4              223             SWAP    A        
01A6 03              224             RR      A 

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -