1.s

AVR mega16双机通讯实验 从机接受数据并发送到lcd1602上显示

	.module _1.c
	.area data(ram, con, rel)
_disp::
	.blkb 2
	.area idata
	.byte 192,249
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.byte 164,176
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.byte 153,146
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.byte 130,248
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.byte 128,144
	.area data(ram, con, rel)
	.dbfile E:\MYAVRW~1\SPI双~1\1.c
	.dbsym e disp _disp A[10:10]c
	.area text(rom, con, rel)
	.dbfile E:\MYAVRW~1\SPI双~1\1.c
	.dbfunc e delayms _delayms fV
;              a -> R16
	.even
_delayms::
	.dbline -1
	.dbline 5
; #include < iom16v.h>
; #include <macros.h>
; unsigned char disp[] = {0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90};
; void delayms(void)
; {
	.dbline 7
; char a;
; for(a=0;a<141;a++)
	clr R16
	xjmp L5
L2:
	.dbline 8
L3:
	.dbline 7
	inc R16
L5:
	.dbline 7
	cpi R16,141
	brlo L2
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbsym r a 16 c
	.dbend
	.dbfunc e delay _delay fV
;              b -> R20,R21
;              a -> R22,R23
	.even
_delay::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 11
; ;
; }
; void delay(int a)
; {
	.dbline 13
; int b;
; for(b=0;b<a;b++)
	clr R20
	clr R21
	xjmp L10
L7:
	.dbline 14
	xcall _delayms
L8:
	.dbline 13
	subi R20,255  ; offset = 1
	sbci R21,255
L10:
	.dbline 13
	cp R20,R22
	cpc R21,R23
	brlt L7
	.dbline -2
L6:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r b 20 I
	.dbsym r a 22 I
	.dbend
	.dbfunc e Spi_init _Spi_init fV
	.even
_Spi_init::
	.dbline -1
	.dbline 17
; delayms();
; }
; void Spi_init()
; {
	.dbline 18
; DDRB|=(1<<7)|(1<<5)|(1<<4);
	in R24,0x17
	ori R24,176
	out 0x17,R24
	.dbline 19
; SPCR=0x73;
	ldi R24,115
	out 0xd,R24
	.dbline 20
; SPSR=0x00;
	clr R2
	out 0xe,R2
	.dbline -2
L11:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e Spi_Transmit _Spi_Transmit fV
;              a -> R16,R17
	.even
_Spi_Transmit::
	.dbline -1
	.dbline 23
; }
; void Spi_Transmit(int a)
; {
	.dbline 24
; PORTB&=~(1<<4);
	cbi 0x18,4
	.dbline 25
; SPCR |= (1<<MSTR); // MSTR有时会被清零，这里强制进入主机模式
	sbi 0xd,4
	.dbline 26
; SPDR=a;
	out 0xf,R16
L13:
	.dbline 27
L14:
	.dbline 27
; while(SPSR^0X80);
	ldi R24,128
	ldi R25,0
	in R2,0xe
	clr R3
	eor R2,R24
	eor R3,R25
	tst R2
	brne L13
	tst R3
	brne L13
X0:
	.dbline 28
; PORTB|=(1<<4);
	sbi 0x18,4
	.dbline -2
L12:
	.dbline 0 ; func end
	ret
	.dbsym r a 16 I
	.dbend
	.dbfunc e main _main fV
;           data -> R20
	.even
_main::
	.dbline -1
	.dbline 33
; 
; }
; 
; void main()
; {
	.dbline 35
; unsigned char data;
; DDRA=0x00;
	clr R2
	out 0x1a,R2
	.dbline 36
; PORTA=0xFF;
	ldi R24,255
	out 0x1b,R24
	.dbline 37
; DDRB=0xFF;
	out 0x17,R24
	.dbline 38
; PORTB=0xFF;
	out 0x18,R24
	.dbline 39
; DDRC=0x00;
	out 0x14,R2
	.dbline 40
; PORTC=0x00;
	out 0x15,R2
	.dbline 41
; DDRD=0x00;
	out 0x11,R2
	.dbline 42
; PORTD=0x00;
	out 0x12,R2
	.dbline 44
; 
; Spi_init();
	xcall _Spi_init
	xjmp L18
L17:
	.dbline 47
; 
; while(1)
; {
	.dbline 48
; for(data=0;data<111;data++)
	clr R20
	xjmp L23
L20:
	.dbline 50
	.dbline 51
	ldi R16,1000
	ldi R17,3
	xcall _delay
	.dbline 52
	mov R16,R20
	clr R17
	xcall _Spi_Transmit
	.dbline 54
L21:
	.dbline 48
	inc R20
L23:
	.dbline 48
	cpi R20,111
	brlo L20
	.dbline 61
L18:
	.dbline 46
	xjmp L17
X1:
	.dbline -2
L16:
	.dbline 0 ; func end
	ret
	.dbsym r data 20 c
	.dbend