dpdj.lst

用单片机实现的计算器,有不明白的可以联系我,QQ64134703,专业毕业设计辅导

A51 MACRO ASSEMBLER  DPDJ                                                                 06/25/2008 23:05:37 PAGE     1


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

LOC  OBJ            LINE     SOURCE

  00A0                 1     RS BIT P2.0
  00A1                 2     RW BIT P2.1
  00A2                 3     E BIT P2.2
                       4     
                       5     
0000                   6     ORG 00H
                       7     
0000 758001            8     START:MOV P0,#01H
0003 11C7              9     ACALL ENABLE
0005 758001           10     MOV P0,#01H
0008 11C7             11     ACALL ENABLE
000A 758038           12     MOV P0,#38H
000D 11C7             13     ACALL ENABLE
000F 75800C           14     MOV P0,#0cH
0012 11C7             15     ACALL ENABLE
0014 758007           16     MOV P0,#07H
0017 11C7             17     ACALL ENABLE
0019 7580CA           18     MOV P0,#0CAH
001C 11C7             19     CALL ENABLE
                      20     
001E 7F00             21     MOV R7,#0
0020 7B00             22     MOV R3,#0
0022 755000           23     MOV 50H,#0
                      24     
                      25     
                      26     
                      27     
0025 120030           28     WAIT:  LCALL TESTKEY
0028 60FB             29            JZ WAIT
002A 1149             30            CALL GETKEY
002C 11B8             31                CALL XI
002E 0125             32            AJMP WAIT
0030                  33     TESTKEY:
0030 75900F           34            MOV P1,#0FH
0033 E590             35            MOV A,P1
0035 F4               36            CPL A
0036 540F             37            ANL A,#0FH
0038 22               38            RET
0039                  39     KEYTABLE:
0039 D7EBDBBB         40            DB  0D7H,0EBH,0DBH,0BBH   ;0，1，2，3
003D EDDDBDEE         41            DB  0EDH,0DDH,0BDH,0EEH   ;4,5,6,7
0041 DEBE777B         42            DB  0DEH,0BEH,077H,07BH   ;8,9,+,-
0045 7D7EB7E7         43            DB  07DH,07EH,0B7H,0E7H   ;*,/,=,ON/C
0049                  44     GETKEY:
0049 7E0A             45            MOV R6,#10
004B 1200D2           46            LCALL DELAY
004E 75900F           47            MOV P1,#0FH
0051 E590             48            MOV A,P1
0053 B50F03           49            CJNE A,0FH,K12
0056 020025           50            LJMP WAIT
0059 F5F0             51     K12:   MOV B,A
005B 7590EF           52            MOV P1,#0EFH
005E E590             53            MOV A,P1
0060 B4EF1B           54            CJNE A,#0EFH,K13
0063 7590DF           55            MOV P1,#0DFH
0066 E590             56            MOV A,P1
0068 B4DF13           57            CJNE A,#0DFH,K13
006B 7590BF           58            MOV P1,#0BFH
A51 MACRO ASSEMBLER  DPDJ                                                                 06/25/2008 23:05:37 PAGE     2

006E E590             59            MOV A,P1
0070 B4BF0B           60            CJNE A,#0BFH,K13
0073 75907F           61            MOV P1,#07FH
0076 E590             62            MOV A,P1
0078 B47F03           63            CJNE A,#07FH,K13
007B 020025           64            LJMP WAIT
007E 54F0             65     K13:   ANL A,#0F0H
0080 45F0             66            ORL A,B
0082 F5F0             67            MOV B,A
0084 7910             68            MOV R1,#16
0086 7A00             69            MOV R2,#0
0088 900039           70            MOV DPTR,#KEYTABLE
008B EA               71     K14:   MOV A,R2
008C 93               72            MOVC A,@A+DPTR
008D B5F00F           73            CJNE A,B,K16
0090 75900F           74            MOV P1,#0FH
0093 E590             75     K15:   MOV A,P1
0095 B40FFB           76            CJNE A,#0FH,K15
0098 7E0A             77            MOV R6,#10
009A 1200A5           78            LCALL DELAY1
009D EA               79            MOV A,R2
                      80     
009E 22               81            RET
009F 0A               82     K16:   INC R2
00A0 D9E9             83            DJNZ R1,K14
00A2 020025           84            LJMP WAIT
00A5 7F50             85                delay1:mov r7,#80
00A7 DFFE             86     dloop: djnz r7,dloop
00A9 DEFC             87            djnz r6,dloop
00AB 22               88            ret
                      89     
00AC 22               90     LESS:  RET
00AD                  91     CLEAR: 
00AD 758001           92            MOV P0,#01H
00B0 11C7             93            ACALL ENABLE
00B2 758001           94            MOV P0,#01H
00B5 11C7             95            ACALL ENABLE
00B7 22               96                RET
00B8 C0E0             97     xi:        push acc
                      98     
00BA 2430             99                add a,#30h
                     100                
00BC C2A2            101                clr e
00BE C2A1            102                clr rw
00C0 D2A0            103                setb rs
00C2 F580            104                mov p0,a
                     105                
00C4 D0E0            106                pop acc
00C6 22              107                ret
00C7 C2A0            108     ENABLE:CLR RS
00C9 C2A1            109        CLR RW
00CB C2A2            110        CLR E
00CD 11D2            111        ACALL DELAY
00CF D2A2            112        SETB E
00D1 22              113        RET
00D2                 114     DELAY:
00D2 7580FF          115        MOV P0,#0FFH
00D5 C2A0            116        CLR RS
00D7 D2A1            117        SETB RW
00D9 C2A2            118        CLR E
00DB 00              119        NOP
00DC D2A2            120        SETB E
00DE 2087F1          121        JB P0.7,DELAY
00E1 22              122        RET
                     123        END
                             
A51 MACRO ASSEMBLER  DPDJ                                                                 06/25/2008 23:05:37 PAGE     3

SYMBOL TABLE LISTING
------ ----- -------


N A M E             T Y P E  V A L U E   ATTRIBUTES

ACC. . . . . . . .  D ADDR   00E0H   A   
B. . . . . . . . .  D ADDR   00F0H   A   
CLEAR. . . . . . .  C ADDR   00ADH   A   
DELAY. . . . . . .  C ADDR   00D2H   A   
DELAY1 . . . . . .  C ADDR   00A5H   A   
DLOOP. . . . . . .  C ADDR   00A7H   A   
E. . . . . . . . .  B ADDR   00A0H.2 A   
ENABLE . . . . . .  C ADDR   00C7H   A   
GETKEY . . . . . .  C ADDR   0049H   A   
K12. . . . . . . .  C ADDR   0059H   A   
K13. . . . . . . .  C ADDR   007EH   A   
K14. . . . . . . .  C ADDR   008BH   A   
K15. . . . . . . .  C ADDR   0093H   A   
K16. . . . . . . .  C ADDR   009FH   A   
KEYTABLE . . . . .  C ADDR   0039H   A   
LESS . . . . . . .  C ADDR   00ACH   A   
P0 . . . . . . . .  D ADDR   0080H   A   
P1 . . . . . . . .  D ADDR   0090H   A   
P2 . . . . . . . .  D ADDR   00A0H   A   
RS . . . . . . . .  B ADDR   00A0H.0 A   
RW . . . . . . . .  B ADDR   00A0H.1 A   
START. . . . . . .  C ADDR   0000H   A   
TESTKEY. . . . . .  C ADDR   0030H   A   
WAIT . . . . . . .  C ADDR   0025H   A   
XI . . . . . . . .  C ADDR   00B8H   A   


REGISTER BANK(S) USED: 0 


ASSEMBLY COMPLETE.  0 WARNING(S), 0 ERROR(S)