10.lst

这是一个流水灯加汽灯控制程序。采用四位的拨码开关

A51 MACRO ASSEMBLER  10                                                                     14/06/07 18:35:31 PAGE     1


DOS MACRO ASSEMBLER A51 X4.86
OBJECT MODULE PLACED IN 10.O
ASSEMBLER INVOKED BY: C:\OMF51\BIN\A51.EXE C:\10\10.AQD DB SB XR RB(0) PR(10.LST) OJ(10.O) 

LOC  OBJ            LINE     SOURCE

0000 C297              1     L0:CLR P1.7
0002 20B00B            2     JB P3.0,L1
0005 120074            3     LCALL DELAY5MS
0008 7D3F              4     X1:MOV R5,#3FH
000A 12003A            5     LCALL DISPLAY
000D 30B0F8            6     JNB P3.0,X1
0010 20B10B            7     L1:JB P3.1,L2
0013 120074            8     LCALL DELAY5MS
0016 7DFC              9     X2:MOV R5,#0FCH
0018 12003A           10     LCALL DISPLAY
001B 30B1F8           11     JNB P3.1,X2
001E 20B20B           12     L2:JB P3.2,L3
0021 120074           13     LCALL DELAY5MS
0024 7D3C             14     X3:MOV R5,#3CH
0026 12003A           15     LCALL DISPLAY
0029 30B2F8           16     JNB P3.2,X3
002C 20B7D1           17     L3:JB P3.7,L0
002F 120074           18     LCALL DELAY5MS
0032 120046           19     X4:LCALL DISPLAY1
0035 30B7FA           20     JNB P3.7,X4
0038 80C6             21     JMP L0
003A 8D90             22     DISPLAY:MOV P1,R5
003C 12007D           23     LCALL DELAY200MS
003F 7590FF           24     MOV P1,#0FFH
0042 12007D           25     LCALL DELAY200MS
0045 22               26     RET
0046 753112           27     DISPLAY1:MOV 31H,#18
0049 753000           28     MOV 30H,#0
004C 7F03             29     PLAY2:MOV R7,#3
004E AE30             30     PLAY1:MOV R6,30H
0050 EE               31     PLAY:MOV A,R6
0051 90008A           32     MOV DPTR,#TABEL
0054 93               33     MOVC A,@A+DPTR
0055 F590             34     MOV P1,A
0057 12007D           35     LCALL DELAY200MS
005A 0E               36     INC R6
005B EE               37     MOV A,R6
005C B531F1           38     CJNE A,31H,PLAY
005F DFED             39     DJNZ R7,PLAY1
0061 BE2D01           40     CJNE R6,#45,L5
0064 22               41     RET
0065 8E30             42     L5:MOV 30H,R6
0067 B41205           43     CJNE A,#18,L4
006A 753123           44     MOV 31H,#35
006D 80DD             45     JMP PLAY2
006F 75312D           46     L4:MOV 31H,#45
0072 80D8             47     JMP PLAY2
0074 7A19             48     DELAY5MS:MOV R2,#25
0076 7B64             49     L6:MOV R3,#100
0078 DBFE             50     DJNZ R3,$
007A DAFA             51     DJNZ R2,L6
007C 22               52     RET
007D 7C02             53     DELAY200MS:MOV R4,#2
007F 7AD8             54     L8:MOV R2,#216
0081 7BE6             55     L7:MOV R3,#230
0083 DBFE             56     DJNZ R3,$
0085 DAFA             57     DJNZ R2,L7
0087 DCF6             58     DJNZ R4,L8
A51 MACRO ASSEMBLER  10                                                                     14/06/07 18:35:31 PAGE     2

0089 22               59     RET
008A FEFDFBF7         60     TABEL:DB 0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,7FH,0FFH,7FH,0BFH,0DFH,0EFH,0F7H,0FBH,0FDH,0FEH
                             ,0FFH
008E EFDFBF7F                
0092 FF7FBFDF                
0096 EFF7FBFD                
009A FEFF                    
009C FCF9F3E7         61     DB 0FCH,0F9H,0F3H,0E7H,0CFH,9FH,3FH,0FFH,3FH,0FFH,9FH,0CFH,0E7H,0F3H,0F9H,0FCH,0FFH
00A0 CF9F3FFF                
00A4 3FFF9FCF                
00A8 E7F3F9FC                
00AC FF                      
00AD E7DBBD7E         62     DB 0E7H,0DBH,0BDH,7EH,0FFH,7EH,0BDH,0DBH,0E7H,0FFH
00B1 FF7EBDDB                
00B5 E7FF                    
*** WARNING #42 IN 62 (C:\10\10.AQD, LINE 62): MISSING 'END' STATEMENT
A51 MACRO ASSEMBLER  10                                                                     14/06/07 18:35:31 PAGE     3

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


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

DELAY200MS . . . .  C ADDR   007DH   A      23 25 35 53#
DELAY5MS . . . . .  C ADDR   0074H   A      3 8 13 18 48#
DISPLAY. . . . . .  C ADDR   003AH   A      5 10 15 22#
DISPLAY1 . . . . .  C ADDR   0046H   A      19 27#
L0 . . . . . . . .  C ADDR   0000H   A      1# 17 21
L1 . . . . . . . .  C ADDR   0010H   A      2 7#
L2 . . . . . . . .  C ADDR   001EH   A      7 12#
L3 . . . . . . . .  C ADDR   002CH   A      12 17#
L4 . . . . . . . .  C ADDR   006FH   A      43 46#
L5 . . . . . . . .  C ADDR   0065H   A      40 42#
L6 . . . . . . . .  C ADDR   0076H   A      49# 51
L7 . . . . . . . .  C ADDR   0081H   A      55# 57
L8 . . . . . . . .  C ADDR   007FH   A      54# 58
P1 . . . . . . . .  D ADDR   0090H   A      1 22 24 34
P3 . . . . . . . .  D ADDR   00B0H   A      2 6 7 11 12 16 17 20
PLAY . . . . . . .  C ADDR   0050H   A      31# 38
PLAY1. . . . . . .  C ADDR   004EH   A      30# 39
PLAY2. . . . . . .  C ADDR   004CH   A      29# 45 47
TABEL. . . . . . .  C ADDR   008AH   A      32 60#
X1 . . . . . . . .  C ADDR   0008H   A      4# 6
X2 . . . . . . . .  C ADDR   0016H   A      9# 11
X3 . . . . . . . .  C ADDR   0024H   A      14# 16
X4 . . . . . . . .  C ADDR   0032H   A      19# 20


REGISTER BANK(S) USED: 0 


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