lesson6.s

基于51的液晶1602 显示程序。含1602显示pdf格式说明

	.module lesson6.c
	.area text(rom, con, rel)
	.dbfile D:\Proteus\Proteus练习\03液晶1602\程序\lesson6.c
	.area code(ram, con, rel)
	.dbfile D:\Proteus\Proteus练习\03液晶1602\程序\lesson6.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,'a,'m,32,'g,'o,'n,'n,'a,32,'t,'o,32,0
	.dbsym e table2 _table2 A[15:15]kc
_table3::
	.byte 'w,'o,'r,'k,32,'a,'s,32,'h,'a,'r,'d,32,'a,'s,32
	.byte 0
	.dbsym e table3 _table3 A[17:17]kc
_table4::
	.byte 'i,32,'c,'a,'n,44,32,'a,'n,'d,32,'s,'e,'e,32,0
	.dbsym e table4 _table4 A[16:16]kc
_table5::
	.byte 'w,'h,'a,'t,32,'h,'a,'p,'p,'e,'n,32,33,0
	.dbsym e table5 _table5 A[14:14]kc
	.area text(rom, con, rel)
	.dbfile D:\Proteus\Proteus练习\03液晶1602\程序\lesson6.c
	.dbfunc e delay _delay fV
;              i -> R10,R11
;              j -> R12,R13
;             ms -> R16,R17
	.even
_delay::
	xcall push_xgset003C
	.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 am gonna to " ; 
; const uchar table3[]="work as hard as ";
; const uchar table4[]="i can, and see ";
; const uchar table5[]="what happen !";
; void delay(uint ms)
; {
	.dbline 15
;         uint i,j;
; 	for(i=0;i<ms;i++)
	clr R10
	clr R11
	xjmp L5
L2:
	.dbline 16
; 	   {
	.dbline 17
; 	   for(j=0;j<1141;j++);
	clr R12
	clr R13
	xjmp L9
L6:
	.dbline 17
L7:
	.dbline 17
	movw R24,R12
	adiw R24,1
	movw R12,R24
L9:
	.dbline 17
	movw R24,R12
	cpi R24,117
	ldi R30,4
	cpc R25,R30
	brlo L6
X0:
	.dbline 18
;        }
L3:
	.dbline 15
	movw R24,R10
	adiw R24,1
	movw R10,R24
L5:
	.dbline 15
	cp R10,R16
	cpc R11,R17
	brlo L2
X1:
	.dbline -2
L1:
	.dbline 0 ; func end
	xjmp pop_xgset003C
	.dbsym r i 10 i
	.dbsym r j 12 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(6);
	sbi 0x12,6
	.dbline 26
; 	   delay(1);
	ldi R16,1
	ldi R17,0
	xcall _delay
	.dbline 27
; 	   PORTD&=~BIT(6);
	cbi 0x12,6
	.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(6);
	sbi 0x12,6
	.dbline 36
; 	   delay(1);
	ldi R16,1
	ldi R17,0
	xcall _delay
	.dbline 37
; 	   PORTD&=~BIT(6);
	cbi 0x12,6
	.dbline -2
L11:
	.dbline 0 ; func end
	ld R10,y+
	ret
	.dbsym r dat 10 c
	.dbend
	.dbfunc e main _main fV
;              i -> R10
	.even
_main::
	.dbline -1
	.dbline 41
; 
; }
; void  main()
; {
	.dbline 43
;           uchar i;
; 	  DDRB=0XFF;
	ldi R24,255
	out 0x17,R24
	.dbline 44
; 	  DDRD|=BIT(4)|BIT(5)|BIT(6);
	in R24,0x11
	ori R24,112
	out 0x11,R24
	.dbline 45
; 	  PORTD&=~BIT(6);
	cbi 0x12,6
	.dbline 47
; 	  
; 	  write_com(0X38);  //设置16*2显示 ，5*7点阵，8位数据接口
	ldi R16,56
	xcall _write_com
	.dbline 48
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	xjmp L14
L13:
	.dbline 50
; 	  while(1)
; 	{
	.dbline 51
; 	  write_com(0X01);  //显示清屏
	ldi R16,1
	xcall _write_com
	.dbline 52
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 53
; 	  write_com(0X0C); //显示开关，光标设置
	ldi R16,12
	xcall _write_com
	.dbline 54
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 55
; 	  write_com(0X06);//显示开关，光标设置
	ldi R16,6
	xcall _write_com
	.dbline 56
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 57
; 	  write_com(0X80+0X00);// 数据指针设置
	ldi R16,128
	xcall _write_com
	.dbline 58
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 60
; 
; 	  for(i=0;i<16;i++)
	clr R10
	xjmp L19
L16:
	.dbline 61
; 	  {
	.dbline 62
; 	     write_dat(table2[i]);
	ldi R24,<_table2
	ldi R25,>_table2
	mov R30,R10
	clr R31
	add R30,R24
	adc R31,R25
	lpm R16,Z
	xcall _write_dat
	.dbline 64
; 		
; 	  }
L17:
	.dbline 60
	inc R10
L19:
	.dbline 60
	mov R24,R10
	cpi R24,16
	brlo L16
X2:
	.dbline 65
; 	  write_com(0X80+0X40);
	ldi R16,192
	xcall _write_com
	.dbline 66
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 67
; 	    for(i=0;i<16;i++)
	clr R10
	xjmp L23
L20:
	.dbline 68
; 	  {
	.dbline 69
; 	     write_dat(table3[i]);
	ldi R24,<_table3
	ldi R25,>_table3
	mov R30,R10
	clr R31
	add R30,R24
	adc R31,R25
	lpm R16,Z
	xcall _write_dat
	.dbline 71
; 		
; 	  }
L21:
	.dbline 67
	inc R10
L23:
	.dbline 67
	mov R24,R10
	cpi R24,16
	brlo L20
X3:
	.dbline 72
;       delay(1000);
	ldi R16,1000
	ldi R17,3
	xcall _delay
	.dbline 73
; 	  write_com(0X01);  //显示清屏
	ldi R16,1
	xcall _write_com
	.dbline 74
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 75
; 	  	  write_com(0X01);  //显示清屏
	ldi R16,1
	xcall _write_com
	.dbline 76
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 77
; 	  	  write_com(0X0C); //显示开关，光标设置
	ldi R16,12
	xcall _write_com
	.dbline 78
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 79
; 	  write_com(0X06);//显示开关，光标设置
	ldi R16,6
	xcall _write_com
	.dbline 80
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 82
; 
; 	  	  write_com(0X80+0X00);// 数据指针设置
	ldi R16,128
	xcall _write_com
	.dbline 83
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 85
; 
; 	  for(i=0;i<16;i++)
	clr R10
	xjmp L27
L24:
	.dbline 86
; 	  {
	.dbline 87
; 	     write_dat(table4[i]);
	ldi R24,<_table4
	ldi R25,>_table4
	mov R30,R10
	clr R31
	add R30,R24
	adc R31,R25
	lpm R16,Z
	xcall _write_dat
	.dbline 89
; 		
; 	  }
L25:
	.dbline 85
	inc R10
L27:
	.dbline 85
	mov R24,R10
	cpi R24,16
	brlo L24
X4:
	.dbline 90
; 	  write_com(0X80+0X40);
	ldi R16,192
	xcall _write_com
	.dbline 91
; 	  delay(5);
	ldi R16,5
	ldi R17,0
	xcall _delay
	.dbline 92
; 	    for(i=0;i<14;i++)
	clr R10
	xjmp L31
L28:
	.dbline 93
; 	  {
	.dbline 94
; 	     write_dat(table5[i]);
	ldi R24,<_table5
	ldi R25,>_table5
	mov R30,R10
	clr R31
	add R30,R24
	adc R31,R25
	lpm R16,Z
	xcall _write_dat
	.dbline 96
; 		
; 	  }
L29:
	.dbline 92
	inc R10
L31:
	.dbline 92
	mov R24,R10
	cpi R24,14
	brlo L28
X5:
	.dbline 97
; 	   delay(1000);
	ldi R16,1000
	ldi R17,3
	xcall _delay
	.dbline 98
; 	  }
L14:
	.dbline 49
	xjmp L13
X6:
	.dbline -2
L12:
	.dbline 0 ; func end
	ret
	.dbsym r i 10 c
	.dbend
; }