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

📄 12ad.ls1

📁 应用tlc1543及cd4067对35路信号进行采集
💻 LS1
📖 第 1 页 / 共 5 页
字号:
0017 FF              465             MOV     R7,A
0018 C3              466             CLR     C
0019 9404            467             SUBB    A,#04H
001B EE              468             MOV     A,R6
001C 9400            469             SUBB    A,#00H
001E 4003            470             JC      $ + 5H
0020 020000   F      471             LJMP    ?C0028
                     472     ;         {
                     473                             ; SOURCE LINE # 67
                     474     ;          if(i==0) xdp=0xefff;       //选4051片子
                     475                             ; SOURCE LINE # 68
0023 EF              476             MOV     A,R7
0024 4E              477             ORL     A,R6
0025 7007            478             JNZ     ?C0019
0027 900000   F      479             MOV     DPTR,#xdp?146
002A 74EF            480             MOV     A,#0EFH
002C 801C            481             SJMP    ?C0067
002E                 482     ?C0019:
                     483     ;          else if(i==1) xdp=0xdfff;
                     484                             ; SOURCE LINE # 69
002E EF              485             MOV     A,R7
002F 6401            486             XRL     A,#01H
0031 4E              487             ORL     A,R6
0032 7007            488             JNZ     ?C0021
0034 900000   F      489             MOV     DPTR,#xdp?146
0037 74DF            490             MOV     A,#0DFH
0039                 491     ?C0066:
0039 800F            492             SJMP    ?C0067
003B                 493     ?C0021:
                     494     ;          else if(i==2) xdp=0xbfff;
                     495                             ; SOURCE LINE # 70
003B EF              496             MOV     A,R7
003C 6402            497             XRL     A,#02H
003E 4E              498             ORL     A,R6
003F 900000   F      499             MOV     DPTR,#xdp?146
0042 7004            500             JNZ     ?C0023
0044 74BF            501             MOV     A,#0BFH
0046 8002            502             SJMP    ?C0065
0048                 503     ?C0023:
                     504     ;          else xdp=0x7fff;
                     505                             ; SOURCE LINE # 71
0048 747F            506             MOV     A,#07FH
004A                 507     ?C0065:
004A                 508     ?C0067:
004A F0              509             MOVX    @DPTR,A
004B A3              510             INC     DPTR
004C 74FF            511             MOV     A,#0FFH
004E F0              512             MOVX    @DPTR,A
004F                 513     ?C0020:
                     514     ;                k=0x00;
                     515                             ; SOURCE LINE # 72
004F E4              516             CLR     A
0050 900000   F      517             MOV     DPTR,#k?149
0053 F0              518             MOVX    @DPTR,A
0054 A3              519             INC     DPTR
A51 MACRO ASSEMBLER  12AD                                                                 06/12/2005 10:08:42 PAGE     9

0055 F0              520             MOVX    @DPTR,A
                     521     ;          
                     522     ;          for(j=0;j<8;j++)
                     523                             ; SOURCE LINE # 74
0056 900000   F      524             MOV     DPTR,#j?148
0059 F0              525             MOVX    @DPTR,A
005A A3              526             INC     DPTR
005B F0              527             MOVX    @DPTR,A
005C                 528     ?C0025:
                     529     ;             {   
                     530                             ; SOURCE LINE # 75
                     531     ;             *xdp=k;
                     532                             ; SOURCE LINE # 76
005C 900000   F      533             MOV     DPTR,#k?149
005F A3              534             INC     DPTR
0060 E0              535             MOVX    A,@DPTR
0061 FF              536             MOV     R7,A
0062 900000   F      537             MOV     DPTR,#xdp?146
0065 E0              538             MOVX    A,@DPTR
0066 FC              539             MOV     R4,A
0067 A3              540             INC     DPTR
0068 E0              541             MOVX    A,@DPTR
0069 F582            542             MOV     DPL,A
006B 8C83            543             MOV     DPH,R4
006D EF              544             MOV     A,R7
006E F0              545             MOVX    @DPTR,A
                     546     ;             adresult[8*i+j][t]=Read1543(ch);
                     547                             ; SOURCE LINE # 77
006F 900000   F      548             MOV     DPTR,#ch?150
0072 E0              549             MOVX    A,@DPTR
0073 FF              550             MOV     R7,A
0074 120000   F      551             LCALL   _Read1543
0077 AC06            552             MOV     R4,AR6
0079 AD07            553             MOV     R5,AR7
007B 900000   F      554             MOV     DPTR,#i?147
007E E0              555             MOVX    A,@DPTR
007F FE              556             MOV     R6,A
0080 A3              557             INC     DPTR
0081 E0              558             MOVX    A,@DPTR
0082 7803            559             MOV     R0,#03H
0084                 560     ?C0056:
0084 C3              561             CLR     C
0085 33              562             RLC     A
0086 CE              563             XCH     A,R6
0087 33              564             RLC     A
0088 CE              565             XCH     A,R6
0089 D8F9            566             DJNZ    R0,?C0056
008B FF              567             MOV     R7,A
008C 900000   F      568             MOV     DPTR,#j?148+01H
008F E0              569             MOVX    A,@DPTR
0090 2F              570             ADD     A,R7
0091 FF              571             MOV     R7,A
0092 900000   F      572             MOV     DPTR,#j?148
0095 E0              573             MOVX    A,@DPTR
0096 3E              574             ADDC    A,R6
0097 FE              575             MOV     R6,A
0098 900000   F      576             MOV     DPTR,#adresult
009B 75F00C          577             MOV     B,#0CH
009E EF              578             MOV     A,R7
009F 120000   F      579             LCALL   ?C?OFFXADD
00A2 EE              580             MOV     A,R6
00A3 75F00C          581             MOV     B,#0CH
00A6 A4              582             MUL     AB
00A7 2583            583             ADD     A,DPH
00A9 F583            584             MOV     DPH,A
00AB C083            585             PUSH    DPH
A51 MACRO ASSEMBLER  12AD                                                                 06/12/2005 10:08:42 PAGE    10

00AD C082            586             PUSH    DPL
00AF 900000   F      587             MOV     DPTR,#t?145
00B2 E0              588             MOVX    A,@DPTR
00B3 D082            589             POP     DPL
00B5 D083            590             POP     DPH
00B7 75F002          591             MOV     B,#02H
00BA 120000   F      592             LCALL   ?C?OFFXADD
00BD EC              593             MOV     A,R4
00BE F0              594             MOVX    @DPTR,A
00BF A3              595             INC     DPTR
00C0 ED              596             MOV     A,R5
00C1 F0              597             MOVX    @DPTR,A
                     598     ;                       //adresult[8*i+j][t]=Read1543(ch);
                     599     ;             k++;
                     600                             ; SOURCE LINE # 79
00C2 900000   F      601             MOV     DPTR,#k?149+01H
00C5 E0              602             MOVX    A,@DPTR
00C6 04              603             INC     A
00C7 F0              604             MOVX    @DPTR,A
00C8 7006            605             JNZ     ?C0057
00CA 900000   F      606             MOV     DPTR,#k?149
00CD E0              607             MOVX    A,@DPTR
00CE 04              608             INC     A
00CF F0              609             MOVX    @DPTR,A
00D0                 610     ?C0057:
                     611     ;             }
                     612                             ; SOURCE LINE # 80
00D0 900000   F      613             MOV     DPTR,#j?148+01H
00D3 E0              614             MOVX    A,@DPTR
00D4 04              615             INC     A
00D5 F0              616             MOVX    @DPTR,A
00D6 7006            617             JNZ     ?C0058
00D8 900000   F      618             MOV     DPTR,#j?148
00DB E0              619             MOVX    A,@DPTR
00DC 04              620             INC     A
00DD F0              621             MOVX    @DPTR,A
00DE                 622     ?C0058:
00DE C3              623             CLR     C
00DF 900000   F      624             MOV     DPTR,#j?148+01H
00E2 E0              625             MOVX    A,@DPTR
00E3 9408            626             SUBB    A,#08H
00E5 900000   F      627             MOV     DPTR,#j?148
00E8 E0              628             MOVX    A,@DPTR
00E9 9400            629             SUBB    A,#00H
00EB 5003            630             JNC     $ + 5H
00ED 020000   F      631             LJMP    ?C0025
                     632     ;         }
                     633                             ; SOURCE LINE # 81
00F0                 634     ?C0018:
00F0 900000   F      635             MOV     DPTR,#i?147+01H
00F3 E0              636             MOVX    A,@DPTR
00F4 04              637             INC     A
00F5 F0              638             MOVX    @DPTR,A
00F6 7006            639             JNZ     ?C0059
00F8 900000   F      640             MOV     DPTR,#i?147
00FB E0              641             MOVX    A,@DPTR
00FC 04              642             INC     A
00FD F0              643             MOVX    @DPTR,A
00FE                 644     ?C0059:
00FE 020000   F      645             LJMP    ?C0016
                     646     ; }
                     647                             ; SOURCE LINE # 82
0101                 648     ?C0028:
0101 22              649             RET     
                     650     ; END OF _Getad
                     651     
A51 MACRO ASSEMBLER  12AD                                                                 06/12/2005 10:08:42 PAGE    11

                     652     ; 
                     653     ; /**********************排序子程序****************************/
                     654     ; 
                     655     ; void Sort(uchar n)          
                     656     
----                 657             RSEG  ?PR?_Sort?12AD
0000                 658     _Sort:
                     659             USING   0
                     660                             ; SOURCE LINE # 86
                     661     ;---- Variable 'n?251' assigned to Register 'R1' ----
0000 A907            662             MOV     R1,AR7
                     663     ; {
                     664                             ; SOURCE LINE # 87
                     665     ;     uint i,j,k,temp;
                     666     ;     for(i=0;i<34;i++)           //共34路
                     667                             ; SOURCE LINE # 89
                     668     ;---- Variable 'i?252' assigned to Register 'R4/R5' ----
0002 E4              669             CLR     A
0003 FD              670             MOV     R5,A
0004 FC              671             MOV     R4,A
0005                 672     ?C0029:
                     673     ;         {for(j=0;j<n;j++)      //n个数排序
                     674                             ; SOURCE LINE # 90
0005 E4              675             CLR     A
0006 900000   F      676             MOV     DPTR,#j?253
0009 F0              677             MOVX    @DPTR,A
000A A3              678             INC     DPTR
000B F0              679             MOVX    @DPTR,A
000C                 680     ?C0032:
000C E9              681             MOV     A,R1
000D FF              682             MOV     R7,A
000E C3              683             CLR     C
000F 900000   F      684             MOV     DPTR,#j?253+01H
0012 E0              685             MOVX    A,@DPTR
0013 9F              686             SUBB    A,R7
0014 900000   F      687             MOV     DPTR,#j?253
0017 E0              688             MOVX    A,@DPTR
0018 9400            689             SUBB    A,#00H
001A 4003            690             JC      $ + 5H
001C 020000   F      691             LJMP    ?C0031
                     692     ;             for(k=0;k<n-j;k++)
                     693                             ; SOURCE LINE # 91
001F E4              694             CLR     A
0020 900000   F      695             MOV     DPTR,#k?254
0023 F0              696             MOVX    @DPTR,A
0024 A3              697             INC     DPTR
0025 F0              698             MOVX    @DPTR,A
0026                 699     ?C0035:
0026 E9              700             MOV     A,R1
0027 FF              701             MOV     R7,A
0028 900000   F      702             MOV     DPTR,#j?253

⌨️ 快捷键说明

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