ir-dsy.lst

买板子时赠的实验例子

00A2 E525            134                  MOV   A,25H               ;取显示数据到A
00A4 9000C1          135                  MOV   DPTR,#TAB           ;取段码表地址
00A7 93              136                  MOVC  A,@A+DPTR           ;查显示数据对应段码
00A8 F580            137                  MOV   P0,A                ;段码放入P0口
00AA C2A7            138                  CLR   P2.7
00AC D2A6            139                  SETB  P2.6
00AE 1200FC          140                  LCALL  DELAY1
00B1 E526            141                  MOV   A,26H               ;取显示数据到A
00B3 9000C1          142                  MOV   DPTR,#TAB           ;取段码表地址
00B6 93              143                  MOVC  A,@A+DPTR           ;查显示数据对应段码
00B7 F580            144                  MOV   P0,A                ;段码放入P0口
00B9 C2A6            145                  CLR   P2.6
00BB D2A7            146                  SETB  P2.7
00BD 1200FC          147                  LCALL  DELAY1
00C0 22              148                  RET
                     149     ;-----------------------------------------------------
00C1                 150     TAB:
00C1 C0F9A4B0        151      DB  0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H
00C5 999282F8                
00C9 80908883        152      DB  80H,90H,88h,83h,0c6h,0a1h,86h,8eh        ;0－F
00CD C6A1868E                
                     153     ;-----------------------------------------------------
                     154     
                     155     ;--------------------------------------------------------
                     156     ;蜂鸣器响一声子程序
                     157     ;--------------------------------------------------------
00D1                 158     BEEP_BL:
00D1 7E64            159              MOV  R6,#100
00D3 11DE            160       BL1:   CALL  DEX1
00D5 B2B7            161              CPL  BEEP
00D7 DEFA            162              DJNZ  R6,BL1
00D9 7D14            163              MOV  R5,#20
00DB 11E4            164              CALL  DELAY
00DD 22              165              RET
00DE 7FB4            166      DEX1:   MOV  R7,#180
00E0 00              167      DEX2:   NOP
00E1 DFFD            168              DJNZ  R7,DEX2
00E3 22              169              RET
00E4                 170      DELAY:                    ;延时R5×10MS
00E4 7E19            171              MOV  R6,#25
00E6 7F64            172       D1:    MOV  R7,#100
00E8 DFFE            173              DJNZ  R7,$
00EA DEFA            174              DJNZ  R6,D1
00EC DDF6            175              DJNZ  R5,DELAY
00EE 22              176              RET
                     177     ;------------------------------------------------
                     178     ; DELAY  R5*0.14MS
00EF                 179     DEL:
00EF 7D01            180               MOV  R5,#1       ;IR解码使用
00F1 7E02            181     DEL0:     MOV  R6,#2
00F3 7F20            182     DEL1:     MOV  R7,#32
00F5 DFFE            183     DEL2:     DJNZ  R7,DEL2
00F7 DEFA            184               DJNZ  R6,DEL1
00F9 DDF6            185               DJNZ  R5,DEL0
00FB 22              186               RET
                     187     ;-------------------------------------------------
00FC                 188     DELAY1:                    ;数码管延时4MS
A51 MACRO ASSEMBLER  IR_DSY                                                               03/29/2005 16:10:00 PAGE     4

                     189     
00FC 7E14            190              MOV  R6,#20
00FE 7F64            191       DL2:   MOV  R7,#100
0100 DFFE            192              DJNZ  R7,$
0102 DEFA            193              DJNZ  R6,DL2
0104 22              194              RET
                     195     ;-------------------------------------------------
                     196             END               ;结束
                             
                             ;================================
                             ;DT9122D 遥控器（伟纳电子）
                             
                             ;******  红外遥控器键值表  ******
                             
                             ;  10     03      01      06
                             ;  09     1D      1F      0D
                             ;  19     1B      11      15
                             ;  17     12      16      4C
                             ;  40     48      04      00
                             ;  02     05      54      4D
                             ;  0A     1E      0E      1A
                             ;  1C     14      0F      0C
                             ;================================
                             
A51 MACRO ASSEMBLER  IR_DSY                                                               03/29/2005 16:10:00 PAGE     5

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


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

ACC. . . . . . . .  D ADDR   00E0H   A   
BEEP . . . . . . .  B ADDR   00B0H.7 A   
BEEP_BL. . . . . .  C ADDR   00D1H   A   
BL1. . . . . . . .  C ADDR   00D3H   A   
D1 . . . . . . . .  C ADDR   00E6H   A   
DEL. . . . . . . .  C ADDR   00EFH   A   
DEL0 . . . . . . .  C ADDR   00F1H   A   
DEL1 . . . . . . .  C ADDR   00F3H   A   
DEL2 . . . . . . .  C ADDR   00F5H   A   
DELAY. . . . . . .  C ADDR   00E4H   A   
DELAY1 . . . . . .  C ADDR   00FCH   A   
DEX1 . . . . . . .  C ADDR   00DEH   A   
DEX2 . . . . . . .  C ADDR   00E0H   A   
DL2. . . . . . . .  C ADDR   00FEH   A   
EA . . . . . . . .  B ADDR   00A8H.7 A   
I1 . . . . . . . .  C ADDR   003DH   A   
I2 . . . . . . . .  C ADDR   0044H   A   
I20. . . . . . . .  C ADDR   0046H   A   
I21. . . . . . . .  C ADDR   004DH   A   
I3 . . . . . . . .  C ADDR   0054H   A   
I4 . . . . . . . .  C ADDR   005DH   A   
I5 . . . . . . . .  C ADDR   0064H   A   
IE . . . . . . . .  D ADDR   00A8H   A   
IRCOM. . . . . . .  N NUMB   0020H   A   
IRIN . . . . . . .  B ADDR   00B0H.2 A   
IR_CHULI . . . . .  C ADDR   008FH   A   
IR_COMP. . . . . .  C ADDR   0089H   A   
IR_IN. . . . . . .  C ADDR   002FH   A   
IR_OUT . . . . . .  C ADDR   0082H   A   
IR_SHOW. . . . . .  C ADDR   00A2H   A   
L1 . . . . . . . .  C ADDR   0066H   A   
LL . . . . . . . .  C ADDR   0056H   A   
LOOP0. . . . . . .  C ADDR   000CH   A   
LOOP1. . . . . . .  C ADDR   001FH   A   
LOOP2. . . . . . .  C ADDR   0028H   A   
LOOP3. . . . . . .  C ADDR   002DH   A   
MAIN . . . . . . .  C ADDR   0005H   A   
N1 . . . . . . . .  C ADDR   007EH   A   
P0 . . . . . . . .  D ADDR   0080H   A   
P1 . . . . . . . .  D ADDR   0090H   A   
P2 . . . . . . . .  D ADDR   00A0H   A   
P3 . . . . . . . .  D ADDR   00B0H   A   
PSW. . . . . . . .  D ADDR   00D0H   A   
RELAY. . . . . . .  B ADDR   0090H.3 A   
SP . . . . . . . .  D ADDR   0081H   A   
TAB. . . . . . . .  C ADDR   00C1H   A   
TCON . . . . . . .  D ADDR   0088H   A   


REGISTER BANK(S) USED: 0 


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