⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mdls40466.s

📁 AVR单片机C语言编程及应用实例 适合初学者的学习研究 其中包含Atmega16中文资料及Protel部分电路图
💻 S
字号:
	.module MDLS40466.c
	.area text(rom, con, rel)
	.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\MDLS40466\MDLS40466.c
	.area code(ram, con, rel)
	.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\MDLS40466\MDLS40466.c
	.area lit(rom, con, rel)
_table::
	.byte 'I,32,'L,'I,'K,'E,32,'A,'V,'R,32,33,0
	.dbsym e table _table A[13:13]kc
_table1::
	.byte 'W,'W,'W,46,'T,'X,'M,'C,'U,46,'C,'O,'M,0
	.dbsym e table1 _table1 A[14:14]kc
_table2::
	.byte 'I,32,'L,'O,'V,'E,32,'Y,'O,'U,32,33,0
	.dbsym e table2 _table2 A[13:13]kc
_table3::
	.byte 'W,'W,'W,46,'Z,'J,'S,'R,'U,46,'N,'E,'T,0
	.dbsym e table3 _table3 A[14:14]kc
	.area text(rom, con, rel)
	.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\MDLS40466\MDLS40466.c
	.dbfunc e delay _delay fV
;              i -> R20,R21
;              j -> R22,R23
;             ms -> R16,R17
	.even
_delay::
	xcall push_xgsetF000
	.dbline -1
	.dbline 13
; #include <iom16v.h>
; #include <macros.h>
; #define  uchar unsigned char
; #define  uint  unsigned int
; #pragma data:code 
; const uchar table[]="I LIKE AVR !";
; const uchar table1[]="WWW.TXMCU.COM";
; const uchar table2[]="I LOVE YOU !";
; const uchar table3[]="WWW.ZJSRU.NET";
; uchar k;
; 
; void delay(uint ms)
; {
	.dbline 15
;         uint i,j;
; 	for(i=0;i<ms;i++)
	clr R20
	clr R21
	xjmp L5
L2:
	.dbline 16
; 	   {
	.dbline 17
; 	   for(j=0;j<1141;j++);
	clr R22
	clr R23
	xjmp L9
L6:
	.dbline 17
L7:
	.dbline 17
	subi R22,255  ; offset = 1
	sbci R23,255
L9:
	.dbline 17
	cpi R22,117
	ldi R30,4
	cpc R23,R30
	brlo L6
X0:
	.dbline 18
;        }
L3:
	.dbline 15
	subi R20,255  ; offset = 1
	sbci R21,255
L5:
	.dbline 15
	cp R20,R16
	cpc R21,R17
	brlo L2
X1:
	.dbline -2
L1:
	.dbline 0 ; func end
	xjmp pop_xgsetF000
	.dbsym r i 20 i
	.dbsym r j 22 i
	.dbsym r ms 16 i
	.dbend
	.dbfunc e write_com _write_com fV
;            com -> R10
	.even
_write_com::
	st -y,R10
	mov R10,R16
	.dbline -1
	.dbline 21
; }
; void write_com(uchar com)
; {
	.dbline 22
;        PORTD&=~BIT(4);
	cbi 0x12,4
	.dbline 23
; 	   PORTD&=~BIT(5);
	cbi 0x12,5
	.dbline 24
; 	   PORTB=com;
	out 0x18,R10
	.dbline 25
; 	   PORTD|=BIT(k);
	lds R17,_k
	ldi R16,1
	xcall lsl8
	in R2,0x12
	or R2,R16
	out 0x12,R2
	.dbline 26
; 	   delay(1);
	ldi R16,1
	ldi R17,0
	xcall _delay
	.dbline 27
; 	   PORTD&=~BIT(k);
	lds R17,_k
	ldi R16,1
	xcall lsl8
	mov R2,R16
	com R2
	in R3,0x12
	and R3,R2
	out 0x12,R3
	.dbline -2
L10:
	.dbline 0 ; func end
	ld R10,y+
	ret
	.dbsym r com 10 c
	.dbend
	.dbfunc e write_dat _write_dat fV
;            dat -> R10
	.even
_write_dat::
	st -y,R10
	mov R10,R16
	.dbline -1
	.dbline 31
; }
; 
; void write_dat(uchar dat)
; {     
	.dbline 32
;        PORTD|=BIT(4);
	sbi 0x12,4
	.dbline 33
; 	   PORTD&=~BIT(5);
	cbi 0x12,5
	.dbline 34
; 	   PORTB=dat;
	out 0x18,R10
	.dbline 35
; 	   PORTD|=BIT(k);
	lds R17,_k
	ldi R16,1
	xcall lsl8
	in R2,0x12
	or R2,R16
	out 0x12,R2
	.dbline 36
; 	   delay(1);
	ldi R16,1
	ldi R17,0
	xcall _delay
	.dbline 37
; 	   PORTD&=~BIT(k);
	lds R17,_k
	ldi R16,1
	xcall lsl8
	mov R2,R16
	com R2
	in R3,0x12
	and R3,R2
	out 0x12,R3
	.dbline -2
L11:
	.dbline 0 ; func end
	ld R10,y+
	ret
	.dbsym r dat 10 c
	.dbend
	.dbfunc e main _main fV
;              i -> R20
	.even
_main::
	.dbline -1
	.dbline 40
; }
; void  main()
; {
	.dbline 42
;       uchar i;
; 	  for(k=6;k<8;k++)
	ldi R24,6
	sts _k,R24
	xjmp L16
L13:
	.dbline 43
; 	  {
	.dbline 44
; 	  DDRB=0XFF;
	ldi R24,255
	out 0x17,R24
	.dbline 45
; 	  DDRD|=BIT(4)|BIT(5)|BIT(k);
	lds R17,_k
	ldi R16,1
	xcall lsl8
	mov R24,R16
	ori R24,48
	in R2,0x11
	or R2,R24
	out 0x11,R2
	.dbline 46
; 	  PORTD&=~BIT(k);
	lds R17,_k
	ldi R16,1
	xcall lsl8
	mov R2,R16
	com R2
	in R3,0x12
	and R3,R2
	out 0x12,R3
	.dbline 47
; 	  write_com(0X38);
	ldi R16,56
	xcall _write_com
	.dbline 48
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 49
; 	  write_com(0X01);/*清屏*/
	ldi R16,1
	xcall _write_com
	.dbline 50
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 51
; 	  write_com(0X0C);
	ldi R16,12
	xcall _write_com
	.dbline 52
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 53
; 	  write_com(0X06);
	ldi R16,6
	xcall _write_com
	.dbline 54
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 55
; 	  write_com(0X80+27);
	ldi R16,155
	xcall _write_com
	.dbline 56
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 57
; 	  if(k==6)
	lds R24,_k
	cpi R24,6
	brne L17
X2:
	.dbline 58
; 	  for(i=0;i<12;i++)
	clr R20
	xjmp L22
L19:
	.dbline 59
; 	  {
	.dbline 60
; 	     write_dat(table[i]);
	ldi R24,<_table
	ldi R25,>_table
	mov R30,R20
	clr R31
	add R30,R24
	adc R31,R25
	lpm R16,Z
	xcall _write_dat
	.dbline 61
; 		 delay(50);
	ldi R16,50
	ldi R17,0
	xcall _delay
	.dbline 62
; 	  }
L20:
	.dbline 58
	inc R20
L22:
	.dbline 58
	cpi R20,12
	brlo L19
X3:
	xjmp L18
L17:
	.dbline 64
;       else
; 	  	  for(i=0;i<12;i++)
	clr R20
	xjmp L26
L23:
	.dbline 65
; 	  {
	.dbline 66
; 	     write_dat(table2[i]);
	ldi R24,<_table2
	ldi R25,>_table2
	mov R30,R20
	clr R31
	add R30,R24
	adc R31,R25
	lpm R16,Z
	xcall _write_dat
	.dbline 67
; 		 delay(50);
	ldi R16,50
	ldi R17,0
	xcall _delay
	.dbline 68
; 	  }
L24:
	.dbline 64
	inc R20
L26:
	.dbline 64
	cpi R20,12
	brlo L23
X4:
L18:
	.dbline 69
; 	  write_com(0X80+0X43);
	ldi R16,195
	xcall _write_com
	.dbline 70
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 71
;        if(k==6)
	lds R24,_k
	cpi R24,6
	brne L27
X5:
	.dbline 72
; 	    for(i=0;i<13;i++)
	clr R20
	xjmp L32
L29:
	.dbline 73
; 	  {
	.dbline 74
; 	     write_dat(table1[i]);
	ldi R24,<_table1
	ldi R25,>_table1
	mov R30,R20
	clr R31
	add R30,R24
	adc R31,R25
	lpm R16,Z
	xcall _write_dat
	.dbline 75
; 		 delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 76
; 	  }
L30:
	.dbline 72
	inc R20
L32:
	.dbline 72
	cpi R20,13
	brlo L29
X6:
	xjmp L28
L27:
	.dbline 78
;       else
; 	    for(i=0;i<13;i++)
	clr R20
	xjmp L36
L33:
	.dbline 79
; 	  {
	.dbline 80
; 	     write_dat(table3[i]);
	ldi R24,<_table3
	ldi R25,>_table3
	mov R30,R20
	clr R31
	add R30,R24
	adc R31,R25
	lpm R16,Z
	xcall _write_dat
	.dbline 81
; 		 delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 82
; 	  }
L34:
	.dbline 78
	inc R20
L36:
	.dbline 78
	cpi R20,13
	brlo L33
X7:
L28:
	.dbline 83
; 	  for(i=0;i<10;i++)
	clr R20
	xjmp L40
L37:
	.dbline 84
; 	  {
	.dbline 85
; 	     write_com(0X1D);/*左移*/
	ldi R16,29
	xcall _write_com
	.dbline 86
; 		 delay(500);
	ldi R16,500
	ldi R17,1
	xcall _delay
	.dbline 87
; 	  }
L38:
	.dbline 83
	inc R20
L40:
	.dbline 83
	cpi R20,10
	brlo L37
X8:
	.dbline 88
; 	  }
L14:
	.dbline 42
	lds R24,_k
	subi R24,255    ; addi 1
	sts _k,R24
L16:
	.dbline 42
	lds R24,_k
	cpi R24,8
	brsh X10
	xjmp L13
X10:
X9:
	.dbline -2
L12:
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbend
	.area bss(ram, con, rel)
	.dbfile G:\学习\avr\天祥电子AVR视频教程\chengxu\MDLS40466\MDLS40466.c
_k::
	.blkb 1
	.dbsym e k _k c
; }

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -