Category

Development Platform
Home > SourceCode/Document > Embeded-SCM Develop > SCM > View Code
pingan.LST
Package: play_music.rar　[view]
Upload User: sxhope
Upload Date: 2022-07-23
Package Size: 93k
Code Size: 8k
Category:

SCM

Development Platform:

Asm

pingan.LST：Code Content
  1. A51 MACRO ASSEMBLER  PINGAN                                                               09/12/2007 21:30:13 PAGE     1
  4. MACRO ASSEMBLER A51 V8.00
  5. OBJECT MODULE PLACED IN pingan.OBJ
  6. ASSEMBLER INVOKED BY: C:KeilC51BINA51.EXE pingan.asm SET(SMALL) DEBUG EP
  8. LOC  OBJ            LINE     SOURCE
  10.                        1     ;P3.3小喇叭---生日快乐。
  11.                        2     ;***************************************************************************
  12.                        3     ;*  E-mail:sxj1974@163.com (51c51 test web)  51单片机学习网，自学单片机的网站 *
  13.                        4     ;* Create by :石学军 www.51c51.com   www.8951.com 更多例程请登陆网站                 *
  14.                        5     ;*************************************************************************** 
  15. 0000                   6     ORG 0000H
  16. 0000 020014            7     LJMP START
  17. 000B                   8     ORG 000BH
  18. 000B 0520              9     INC 20H ;中断服务,中断计数器加1
  19. 000D 758CD8           10     MOV TH0,#0D8H
  20. 0010 758AEF           11     MOV TL0,#0EFH ;12M晶振，形成10毫秒中断
  21. 0013 32               12     RETI
  22. 0014                  13     START: 
  23. 0014 758150           14     MOV SP,#50H
  24. 0017 758CD8           15     MOV TH0,#0D8H
  25. 001A 758AEF           16     MOV TL0,#0EFH
  26. 001D 758901           17     MOV TMOD,#01H
  27. 0020 75A882           18     MOV IE,#82H
  28. 0023                  19     MUSIC0:
  29. 0023 00               20     NOP
  30. 0024 90007D           21     MOV DPTR,#DAT ;表头地址送DPTR
  31. 0027 752000           22     MOV 20H,#00H ;中断计数器清0
  32. 002A 75F000           23     MOV B,#00H ;表序号清0
  33. 002D                  24     MUSIC1:
  34. 002D 00               25     NOP
  35. 002E E4               26     CLR A
  36. 002F 93               27     MOVC A,@A+DPTR ;查表取代码
  37. 0030 6033             28     JZ END0 ;是00H,则结束
  38. 0032 B4FF03           29     CJNE A,#0FFH,MUSIC5
  39. 0035 020054           30     LJMP MUSIC3
  40. 0038                  31     MUSIC5:
  41. 0038 00               32     NOP
  42. 0039 FE               33     MOV R6,A
  43. 003A A3               34     INC DPTR
  44. 003B E5F0             35     MOV A,B
  45. 003D 93               36     MOVC A,@A+DPTR ;取节拍代码送R7
  46. 003E FF               37     MOV R7,A
  47. 003F D28C             38     SETB TR0 ;启动计数
  48. 0041                  39     MUSIC2:
  49. 0041 00               40     NOP
  50. 0042 B2A1             41     CPL P2.1
  51. 0044 EE               42     MOV A,R6
  52. 0045 FB               43     MOV R3,A
  53. 0046 120072           44     LCALL DEL
  54. 0049 EF               45     MOV A,R7
  55. 004A B520F4           46     CJNE A,20H,MUSIC2 ;中断计数器(20H)=R7否?
  56.                       47     ;不等,则继续循环
  57. 004D 752000           48     MOV 20H,#00H ;等于,则取下一代码
  58. 0050 A3               49     INC DPTR
  59.                       50     ; INC B
  60. 0051 02002D           51     LJMP MUSIC1
  61. 0054                  52     MUSIC3:
  62. 0054 00               53     NOP
  63. 0055 C28C             54     CLR TR0 ;休止100毫秒
  64. 0057 7A0D             55     MOV R2,#0DH
  65. 0059                  56     MUSIC4:
  66. 0059 00               57     NOP
  67. 005A 7BFF             58     MOV R3,#0FFH
  68. A51 MACRO ASSEMBLER  PINGAN                                                               09/12/2007 21:30:13 PAGE     2
  70. 005C 120072           59     LCALL DEL
  71. 005F DAF8             60     DJNZ R2,MUSIC4
  72. 0061 A3               61     INC DPTR
  73. 0062 02002D           62     LJMP MUSIC1
  74. 0065                  63     END0:
  75. 0065 00               64     NOP
  76. 0066 7A64             65     MOV R2,#64H ;歌曲结束,延时1秒后继续
  77. 0068                  66     MUSIC6:
  78. 0068 7B00             67     MOV R3,#00H
  79. 006A 120072           68     LCALL DEL
  80. 006D DAF9             69     DJNZ R2,MUSIC6
  81. 006F 020023           70     LJMP MUSIC0
  82. 0072                  71     DEL:
  83. 0072 00               72     NOP
  84. 0073                  73     DEL3: 
  85. 0073 7C02             74     MOV R4,#02H
  86. 0075                  75     DEL4: 
  87. 0075 00               76     NOP
  88. 0076 DCFD             77     DJNZ R4,DEL4
  89. 0078 00               78     NOP
  90. 0079 DBF8             79     DJNZ R3,DEL3
  91. 007B 22               80     RET
  92. 007C 00               81     NOP
  93. 007D                  82     DAT:
  94. 007D 26202020         83     db 26h,20h,20h,20h,20h,20h,26h,10h,20h,10h,20h,80h,26h,20h,30h,20h
  95. 0081 20202610                
  96. 0085 20102080                
  97. 0089 26203020                
  98. 008D 30203910         84     db 30h,20h,39h,10h,30h,10h,30h,80h,26h,20h,20h,20h,20h,20h,1ch,20h
  99. 0091 30103080                
  100. 0095 26202020                
  101. 0099 20201C20                
  102. 009D 20802B20         85     db 20h,80h,2bh,20h,26h,20h,20h,20h,2bh,10h,26h,10h,2bh,80h,26h,20h
  103. 00A1 26202020                
  104. 00A5 2B102610                
  105. 00A9 2B802620                
  106. 00AD 30203020         86     db 30h,20h,30h,20h,39h,10h,26h,10h,26h,60h,40h,10h,39h,10h,26h,20h
  107. 00B1 39102610                
  108. 00B5 26604010                
  109. 00B9 39102620                
  110. 00BD 30203020         87     db 30h,20h,30h,20h,39h,10h,26h,10h,26h,80h,26h,20h,2bh,10h,2bh,10h
  111. 00C1 39102610                
  112. 00C5 26802620                
  113. 00C9 2B102B10                
  114. 00CD 2B203010         88     db 2bh,20h,30h,10h,39h,10h,26h,10h,2bh,10h,2bh,20h,2bh,40h,40h,20h
  115. 00D1 39102610                
  116. 00D5 2B102B20                
  117. 00D9 2B404020                
  118. 00DD 20102010         89     db 20h,10h,20h,10h,2bh,10h,26h,30h,30h,80h,18h,20h,18h,20h,26h,20h
  119. 00E1 2B102630                
  120. 00E5 30801820                
  121. 00E9 18202620                
  122. 00ED 20202040         90     db 20h,20h,20h,40h,26h,20h,2bh,20h,30h,20h,30h,20h,1ch,20h,20h,20h
  123. 00F1 26202B20                
  124. 00F5 30203020                
  125. 00F9 1C202020                
  126. 00FD 20801C20         91     db 20h,80h,1ch,20h,1ch,20h,1ch,20h,30h,20h,30h,60h,39h,10h,30h,10h
  127. 0101 1C201C20                
  128. 0105 30203060                
  129. 0109 39103010                
  130. 010D 20202B10         92     db 20h,20h,2bh,10h,26h,10h,2bh,10h,26h,10h,26h,10h,2bh,10h,2bh,80h
  131. 0111 26102B10                
  132. 0115 26102610                
  133. 0119 2B102B80                
  134. 011D 18201820         93     db 18h,20h,18h,20h,26h,20h,20h,20h,20h,60h,26h,10h,2bh,20h,30h,20h
  135. 0121 26202020                
  136. A51 MACRO ASSEMBLER  PINGAN                                                               09/12/2007 21:30:13 PAGE     3
  138. 0125 20602610                
  139. 0129 2B203020                
  140. 012D 30201C20         94     db 30h,20h,1ch,20h,20h,20h,20h,80h,26h,20h,30h,10h,30h,10h,30h,20h
  141. 0131 20202080                
  142. 0135 26203010                
  143. 0139 30103020                
  144. 013D 39202610         95     db 39h,20h,26h,10h,2bh,10h,2bh,20h,2bh,40h,40h,10h,40h,10h,20h,10h
  145. 0141 2B102B20                
  146. 0145 2B404010                
  147. 0149 40102010                
  148. 014D 20102B10         96     db 20h,10h,2bh,10h,26h,30h,30h,80h,00H
  149. 0151 26303080                
  150. 0155 00                      
  151.                       97     
  152.                       98     END 
  153. A51 MACRO ASSEMBLER  PINGAN                                                               09/12/2007 21:30:13 PAGE     4
  155. SYMBOL TABLE LISTING
  156. ------ ----- -------
  159. N A M E             T Y P E  V A L U E   ATTRIBUTES
  161. B. . . . . . . . .  D ADDR   00F0H   A   
  162. DAT. . . . . . . .  C ADDR   007DH   A   
  163. DEL. . . . . . . .  C ADDR   0072H   A   
  164. DEL3 . . . . . . .  C ADDR   0073H   A   
  165. DEL4 . . . . . . .  C ADDR   0075H   A   
  166. END0 . . . . . . .  C ADDR   0065H   A   
  167. IE . . . . . . . .  D ADDR   00A8H   A   
  168. MUSIC0 . . . . . .  C ADDR   0023H   A   
  169. MUSIC1 . . . . . .  C ADDR   002DH   A   
  170. MUSIC2 . . . . . .  C ADDR   0041H   A   
  171. MUSIC3 . . . . . .  C ADDR   0054H   A   
  172. MUSIC4 . . . . . .  C ADDR   0059H   A   
  173. MUSIC5 . . . . . .  C ADDR   0038H   A   
  174. MUSIC6 . . . . . .  C ADDR   0068H   A   
  175. P2 . . . . . . . .  D ADDR   00A0H   A   
  176. SP . . . . . . . .  D ADDR   0081H   A   
  177. START. . . . . . .  C ADDR   0014H   A   
  178. TH0. . . . . . . .  D ADDR   008CH   A   
  179. TL0. . . . . . . .  D ADDR   008AH   A   
  180. TMOD . . . . . . .  D ADDR   0089H   A   
  181. TR0. . . . . . . .  B ADDR   0088H.4 A   
  184. REGISTER BANK(S) USED: 0 
  186. ASSEMBLY COMPLETE.  0 WARNING(S), 0 ERROR(S)