m16_horse.s

LED渐变演示程序

	.module M16_Horse.c
	.area text(rom, con, rel)
	.dbfile G:\M16_Horse\M16_Horse.c
	.dbfunc e Delay _Delay fV
;              j -> R20
;              i -> R16
	.even
_Delay::
	rcall push_gset1
	.dbline -1
	.dbline 6
; #include<iom8.h>
; #define uchar unsigned char
; #define uint unsigned int
; 
; void Delay(uchar i)
; {
	.dbline 8
;  uchar j;
;  for(;i!=0;i--)
	rjmp L5
L2:
	.dbline 9
;  {
	.dbline 10
	ldi R20,250
	rjmp L9
L6:
	.dbline 10
L7:
	.dbline 10
	dec R20
L9:
	.dbline 10
	tst R20
	brne L6
	.dbline 11
L3:
	.dbline 8
	dec R16
L5:
	.dbline 8
	tst R16
	brne L2
	.dbline -2
L1:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r j 20 c
	.dbsym r i 16 c
	.dbend
	.dbfunc e Horse _Horse fV
;              i -> R16
	.even
_Horse::
	rcall push_gset1
	.dbline -1
	.dbline 15
;   for(j=250;j!=0;j--);
;  }
; }
; 
; void Horse(uchar i)
; {
	.dbline 16
;  switch(i)
	mov R20,R16
	clr R21
	cpi R20,0
	cpc R20,R21
	breq L14
X0:
	cpi R20,1
	ldi R30,0
	cpc R21,R30
	breq L15
	cpi R20,2
	ldi R30,0
	cpc R21,R30
	breq L16
	cpi R20,3
	ldi R30,0
	cpc R21,R30
	breq L17
	cpi R20,4
	ldi R30,0
	cpc R21,R30
	breq L18
	cpi R20,5
	ldi R30,0
	cpc R21,R30
	breq L19
	cpi R20,6
	ldi R30,0
	cpc R21,R30
	breq L20
	cpi R20,7
	ldi R30,0
	cpc R21,R30
	breq L21
	cpi R20,8
	ldi R30,0
	cpc R21,R30
	breq L22
	rjmp L12
X1:
	.dbline 17
;  {
L14:
	.dbline 18
;   case 0:PORTB=0x00;break;
	clr R2
	out 0x18,R2
	.dbline 18
	rjmp L12
L15:
	.dbline 19
;   case 1:PORTB=0x01;break;
	ldi R24,1
	out 0x18,R24
	.dbline 19
	rjmp L12
L16:
	.dbline 20
;   case 2:PORTB=0x03;break;
	ldi R24,3
	out 0x18,R24
	.dbline 20
	rjmp L12
L17:
	.dbline 21
;   case 3:PORTB=0x07;break;
	ldi R24,7
	out 0x18,R24
	.dbline 21
	rjmp L12
L18:
	.dbline 22
;   case 4:PORTB=0x0f;break;
	ldi R24,15
	out 0x18,R24
	.dbline 22
	rjmp L12
L19:
	.dbline 23
;   case 5:PORTB=0x1f;break;
	ldi R24,31
	out 0x18,R24
	.dbline 23
	rjmp L12
L20:
	.dbline 24
;   case 6:PORTB=0x3f;break;
	ldi R24,63
	out 0x18,R24
	.dbline 24
	rjmp L12
L21:
	.dbline 25
;   case 7:PORTB=0x7f;break;
	ldi R24,127
	out 0x18,R24
	.dbline 25
	rjmp L12
L22:
	.dbline 26
	ldi R24,255
	out 0x18,R24
	.dbline 26
	.dbline 27
L12:
	.dbline -2
L10:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r i 16 c
	.dbend
	.dbfunc e main _main fV
;              i -> R20
	.even
_main::
	.dbline -1
	.dbline 32
;   case 8:PORTB=0xff;break;
;   default:break;
;  }
; }
; 
; void main()
; {
	.dbline 34
;  uchar i;
;  DDRB=0xff;
	ldi R24,255
	out 0x17,R24
	.dbline 35
;  PORTB=0xff;
	out 0x18,R24
	.dbline 36
;  Delay(10);
	ldi R16,10
	rcall _Delay
	.dbline 37
;  PORTB=0x00;
	clr R2
	out 0x18,R2
	rjmp L25
L24:
	.dbline 39
;  while(1)
;  {
	.dbline 40
;   for(i=0;i<9;i++)
	clr R20
	rjmp L30
L27:
	.dbline 41
	.dbline 42
	mov R16,R20
	rcall _Horse
	.dbline 43
	ldi R16,100
	rcall _Delay
	.dbline 44
L28:
	.dbline 40
	inc R20
L30:
	.dbline 40
	cpi R20,9
	brlo L27
	.dbline 45
;   {
;    Horse(i);
;    Delay(100);
;   }
;   for(i=8;i!=0;i--)
	ldi R20,8
	rjmp L34
L31:
	.dbline 46
	.dbline 47
	mov R16,R20
	rcall _Horse
	.dbline 48
	ldi R16,100
	rcall _Delay
	.dbline 49
L32:
	.dbline 45
	dec R20
L34:
	.dbline 45
	tst R20
	brne L31
	.dbline 50
L25:
	.dbline 38
	rjmp L24
X2:
	.dbline -2
L23:
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbend