.module main.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 D:\Backup\我的文檔\MYDESG~1\AVR\ICC\AVRMEG~1\SPI接口實驗LED顯示\main.c
	.dbsym e disp _disp A[10:10]c
	.area text(rom, con, rel)
	.dbfile D:\Backup\我的文檔\MYDESG~1\AVR\ICC\AVRMEG~1\SPI接口實驗LED顯示\main.c
	.dbfunc e delay_ms _delay_ms fV
;              a -> R20
;              b -> R22
;              i -> R16
	.even
_delay_ms::
	xcall push_gset2
	.dbline -1
	.dbline 18
; /*
; 實驗四：
; 	SPI接口實險，LED數據管顯示。
; 	1、程序通過SPI接口輸出數據到HC595芯片驅動LED數據管簡單顯示。
; 	2、內部1 M晶振，程序采用單任務方式，軟件延時。
; 	3、進行此實驗請插上JP1的所有8個短路塊，JP6(SPI_EN)短路塊。
; 
; 	AVR  mega16學習板
; 	www.iccavr.com
; 	2006-01-10
; */
; 
; #include "iom16v.h"
; 
; unsigned char disp[] = {0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90};
; 
; /*延時函數*/
; void delay_ms(unsigned char i) {
	.dbline 21
	ldi R20,1
	xjmp L5
L2:
	.dbline 21
; 
; 	unsigned char a, b;
; 	for (a = 1; a < i; a++) {
	.dbline 22
	ldi R22,1
	xjmp L9
L6:
	.dbline 22
	.dbline 23
	.dbline 24
L7:
	.dbline 22
	inc R22
L9:
	.dbline 22
	tst R22
	brne L6
	.dbline 25
L3:
	.dbline 21
	inc R20
L5:
	.dbline 21
	cp R20,R16
	brlo L2
	.dbline -2
L1:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r a 20 c
	.dbsym r b 22 c
	.dbsym r i 16 c
	.dbend
	.dbfunc e SPI_MasterInit _SPI_MasterInit fV
	.even
_SPI_MasterInit::
	.dbline -1
	.dbline 29
; 		for (b = 1; b; b++) {
; 			;
; 			}
; 		}
; }
; 
; /*SPI接口初始化*/
; void SPI_MasterInit(void) {
	.dbline 31
; 
; 	DDRB |= (1<<PB5) | (1<<PB7);		/* 設置MOSI 和SCK 為輸出，其他為輸入 */
	in R24,0x17
	ori R24,160
	out 0x17,R24
	.dbline 32
; 	SPCR = (1<<SPE) | (1<<MSTR)
	ldi R24,83
	out 0xd,R24
	.dbline -2
L10:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e SPI_MasterTransmit _SPI_MasterTransmit fV
;              i -> R16
	.even
_SPI_MasterTransmit::
	.dbline -1
	.dbline 37
; 		| (1<<SPR1) | (1<<SPR0);		/* 使能SPI 主機模式，設置時鐘速率為fck/128 */
; }
; 
; /*SPI數據發送*/
; void SPI_MasterTransmit(unsigned char i) {
	.dbline 39
; 	
; 	SPDR = i;							/* 啟動數據傳輸 */
	out 0xf,R16
L12:
	.dbline 40
	.dbline 41
	.dbline 42
L13:
	.dbline 40
; 	while (!(SPSR & (1<<SPIF))) {		/* 等待傳輸結束 */
	sbis 0xe,7
	rjmp L12
	.dbline -2
L11:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 c
	.dbend
	.dbfunc e SPI_595_Out _SPI_595_Out fV
;              i -> R20
	.even
_SPI_595_Out::
	xcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 46
; 		;
; 		}
; }
; 
; /*595數據輸出*/
; void SPI_595_Out(unsigned char i) {
	.dbline 47
; 	PORTB &= ~(1 << 4);					/*準備鎖存*/
	cbi 0x18,4
	.dbline 48
; 	SPI_MasterTransmit(i);
	mov R16,R20
	xcall _SPI_MasterTransmit
	.dbline 49
; 	PORTB |= (1 << 4);					/*鎖存數據*/
	sbi 0x18,4
	.dbline -2
L15:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbend
	.dbfunc e main _main fV
;              i -> R20,R21
	.even
_main::
	.dbline -1
	.dbline 52
; }
; 
; void main(void) {
	.dbline 54
; 
; 	unsigned int i = 0;
	clr R20
	clr R21
	.dbline 56
; 
; 	DDRA = 0x00;						/*方向輸入*/
	clr R2
	out 0x1a,R2
	.dbline 57
; 	PORTA = 0xFF;						/*打開上拉*/
	ldi R24,255
	out 0x1b,R24
	.dbline 58
; 	DDRB = 0xFF;						/*方向輸出*/
	out 0x17,R24
	.dbline 59
; 	PORTB = 0xFF;						/*電平設置*/
	out 0x18,R24
	.dbline 60
; 	DDRC = 0x00;
	out 0x14,R2
	.dbline 61
; 	PORTC = 0xFF;
	out 0x15,R24
	.dbline 62
; 	DDRD = 0xFF;
	out 0x11,R24
	.dbline 63
; 	PORTD = 0xFF;
	out 0x12,R24
	.dbline 65
; 
; 	SPI_MasterInit();
	xcall _SPI_MasterInit
	xjmp L18
L17:
	.dbline 67
; 	while (1) 
; 	{
	.dbline 68
; 		i ++;
	subi R20,255  ; offset = 1
	sbci R21,255
	.dbline 69
; 		if (i > 9999)
	ldi R24,9999
	ldi R25,39
	cp R24,R20
	cpc R25,R21
	brsh L20
	.dbline 70
; 		 {
	.dbline 71
; 			i = 0;
	clr R20
	clr R21
	.dbline 72
; 			}
L20:
	.dbline 75
	ldi R18,1000
	ldi R19,3
	movw R16,R20
	xcall div16u
	ldi R18,10
	ldi R19,0
	xcall mod16u
	movw R30,R16
	ldi R24,<_disp
	ldi R25,>_disp
	add R30,R24
	adc R31,R25
	ldd R16,z+0
	xcall _SPI_595_Out
	.dbline 76
	cbi 0x18,3
	.dbline 77
	ldi R16,50
	xcall _delay_ms
	.dbline 79
	sbi 0x18,3
	.dbline 81
	ldi R18,100
	ldi R19,0
	movw R16,R20
	xcall div16u
	ldi R18,10
	ldi R19,0
	xcall mod16u
	movw R30,R16
	ldi R24,<_disp
	ldi R25,>_disp
	add R30,R24
	adc R31,R25
	ldd R16,z+0
	xcall _SPI_595_Out
	.dbline 82
	cbi 0x18,2
	.dbline 83
	ldi R16,50
	xcall _delay_ms
	.dbline 85
	sbi 0x18,2
	.dbline 87
	ldi R18,10
	ldi R19,0
	movw R16,R20
	xcall div16u
	ldi R18,10
	ldi R19,0
	xcall mod16u
	movw R30,R16
	ldi R24,<_disp
	ldi R25,>_disp
	add R30,R24
	adc R31,R25
	ldd R16,z+0
	xcall _SPI_595_Out
	.dbline 88
	cbi 0x18,1
	.dbline 89
	ldi R16,50
	xcall _delay_ms
	.dbline 91
	sbi 0x18,1
	.dbline 93
	ldi R18,10
	ldi R19,0
	movw R16,R20
	xcall mod16u
	movw R30,R16
	ldi R24,<_disp
	ldi R25,>_disp
	add R30,R24
	adc R31,R25
	ldd R16,z+0
	xcall _SPI_595_Out
	.dbline 94
	cbi 0x18,0
	.dbline 95
	ldi R16,50
	xcall _delay_ms
	.dbline 96
	sbi 0x18,0
	.dbline 98
L18:
	.dbline 66
	xjmp L17
X0:
	.dbline -2
L16:
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbend