hongwai.lis

红外的运用

                        .module hongwai.c
                        .area text(rom, con, rel)
 0000                   .dbfile E:\zh\avr\8515板\hs0038\hongwai.c
 0000                   .dbfunc e delay _delay fV
 0000           ;              i -> R16,R17
 0000           ;              j -> R18,R19
                        .even
 0000           _delay::
 0000                   .dbline -1
 0000                   .dbline 4
 0000           ; #include<io8515v.h>
 0000           ; #include<macros.h>
 0000           ; void delay()
 0000           ; {
 0000                   .dbline 6
 0000           ;       int i,j;
 0000           ;       for(i=0;i<250;i++)
 0000 0027              clr R16
 0002 1127              clr R17
 0004           L2:
 0004                   .dbline 7
 0004 2227              clr R18
 0006 3327              clr R19
 0008           L6:
 0008                   .dbline 7
 0008           L7:
 0008                   .dbline 7
 0008 2F5F              subi R18,255  ; offset = 1
 000A 3F4F              sbci R19,255
 000C                   .dbline 7
 000C 283C              cpi R18,200
 000E E0E0              ldi R30,0
 0010 3E07              cpc R19,R30
 0012 D4F3              brlt L6
 0014           L3:
 0014                   .dbline 6
 0014 0F5F              subi R16,255  ; offset = 1
 0016 1F4F              sbci R17,255
 0018                   .dbline 6
 0018 0A3F              cpi R16,250
 001A E0E0              ldi R30,0
 001C 1E07              cpc R17,R30
 001E 94F3              brlt L2
 0020                   .dbline -2
 0020           L1:
 0020                   .dbline 0 ; func end
 0020 0895              ret
 0022                   .dbsym r i 16 I
 0022                   .dbsym r j 18 I
 0022                   .dbend
 0022                   .dbfunc e m8515_init _m8515_init fV
                        .even
 0022           _m8515_init::
 0022                   .dbline -1
 0022                   .dbline 10
 0022           ;       for(j=0;j<200;j++);
 0022           ; }
 0022           ; void m8515_init()
 0022           ; {
 0022                   .dbline 11
 0022           ;  DDRA=0XFF;
 0022 8FEF              ldi R24,255
 0024 8ABB              out 0x1a,R24
 0026                   .dbline 12
 0026           ;  PORTA=0XAA;
 0026 8AEA              ldi R24,170
 0028 8BBB              out 0x1b,R24
 002A                   .dbline 13
 002A           ;  DDRB=0X00;
 002A 2224              clr R2
 002C 27BA              out 0x17,R2
 002E                   .dbline 14
 002E           ;  PORTB=0Xff;
 002E 8FEF              ldi R24,255
 0030 88BB              out 0x18,R24
 0032                   .dbline 15
 0032           ;  DDRC=0X00;
 0032 24BA              out 0x14,R2
 0034                   .dbline 16
 0034           ;  PORTC=0XFF;
 0034 85BB              out 0x15,R24
 0036                   .dbline 17
 0036           ;  DDRD=0X00;
 0036 21BA              out 0x11,R2
 0038                   .dbline 18
 0038           ;  PORTD=0XFF;
 0038 82BB              out 0x12,R24
 003A                   .dbline -2
 003A           L10:
 003A                   .dbline 0 ; func end
 003A 0895              ret
 003C                   .dbend
 003C                   .dbfunc e main _main fV
 003C           ;            sig -> <dead>
                        .even
 003C           _main::
 003C                   .dbline -1
 003C                   .dbline 21
 003C           ; }             
 003C           ; void main()
 003C           ; {
 003C                   .dbline 23
 003C           ;   unsigned char sig;
 003C           ;   m8515_init();
 003C F2DF              rcall _m8515_init
 003E 14C0              rjmp L13
 0040           L12:
 0040                   .dbline 25
 0040           ;   while(1)
 0040           ;     {
 0040                   .dbline 26
 0040           ;        DDRB=0X00;
 0040 2224              clr R2
 0042 27BA              out 0x17,R2
 0044                   .dbline 27
 0044           ;        PORTA=0xff;
 0044 8FEF              ldi R24,255
 0046 8BBB              out 0x1b,R24
 0048           L15:
 0048                   .dbline 28
 0048           L16:
 0048                   .dbline 28
 0048           ;        while(PINB==0xff);
 0048 86B3              in R24,0x16
 004A 8F3F              cpi R24,255
 004C E9F3              breq L15
 004E           L18:
 004E                   .dbline 29
 004E           L19:
 004E                   .dbline 29
 004E           ;        while(PINB!=0xff);
 004E 86B3              in R24,0x16
 0050 8F3F              cpi R24,255
 0052 E9F7              brne L18
 0054                   .dbline 30
 0054           ;        PORTA=0x00;delay();
 0054 2224              clr R2
 0056 2BBA              out 0x1b,R2
 0058                   .dbline 30
 0058 D3DF              rcall _delay
 005A           L21:
 005A                   .dbline 31
 005A           L22:
 005A                   .dbline 31
 005A           ;        while(PINB==0xff);
 005A 86B3              in R24,0x16
 005C 8F3F              cpi R24,255
 005E E9F3              breq L21
 0060                   .dbline 32
 0060           ;        delay();
 0060 CFDF              rcall _delay
 0062           L24:
 0062                   .dbline 33
 0062           L25:
 0062                   .dbline 33
 0062 86B3              in R24,0x16
 0064 8F3F              cpi R24,255
 0066 E9F7              brne L24
 0068                   .dbline 34
 0068           L13:
 0068                   .dbline 24
 0068 EBCF              rjmp L12
 006A           X0:
 006A                   .dbline -2
 006A           L11:
 006A                   .dbline 0 ; func end
 006A 0895              ret
 006C                   .dbsym l sig 1 c
 006C                   .dbend