.module spi.c
	.area text(rom, con, rel)
	.dbfile D:\avrvi\AVRVi_m128_Starter_Kit\Seg7\source\lib\spi.c
	.dbfunc e spi_init _spi_init fV
	.even
_spi_init::
	.dbline -1
	.dbline 21
; /************************************************
; 文件：spi.c
; 用途：SPI驅動
; 注意：
; 創建：2008.1.25
; 修改：2008.1.25
; Copy Right  (c)  www.avrvi.com  AVR與虛擬儀器
; ************************************************/
; #include "..\config.h"
; /*************************************************************************
; ** 函數名稱: spi_init(void)
; ** 功能描述: SPI初始化
; ** 輸　入: 
; ** 輸出	 : 
; ** 全局變量: 無
; ** 調用模塊: 
; ** 說明：
; ** 注意：
; **************************************************************************/
; void spi_init(void)
; {
	.dbline 22
;  	 DDRB |= (1<<MOSI)|(1<<SCK)|(1<<SS);//設置MOSI，SCK輸出
	in R24,0x17
	ori R24,7
	out 0x17,R24
	.dbline 23
;  	 SPCR = (1<<SPE)|(1<<MSTR)|(1<<SPR0)|(1<<SPR1);//使能SPI，主機模式
	ldi R24,83
	out 0xd,R24
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e SPI_MasterTransmit _SPI_MasterTransmit fV
;           Data -> R16
	.even
_SPI_MasterTransmit::
	.dbline -1
	.dbline 36
; }
; /*************************************************************************
; ** 函數名稱: SPI_MasterTransmit(char Data)
; ** 功能描述: SPI主機發送數據
; ** 輸　入: Data 需要通過SPI傳輸的數據
; ** 輸出	 : 
; ** 全局變量: 無
; ** 調用模塊: 
; ** 說明：
; ** 注意：
; **************************************************************************/
; void SPI_MasterTransmit(char Data)
; {
	.dbline 38
;  	 /* 啟動數據傳輸 */
;  	 SPDR = Data;
	out 0xf,R16
L3:
	.dbline 41
L4:
	.dbline 40
;  	 /* 等待傳輸結束 */
;  	 while(!(SPSR & (1<<SPIF)))
	sbis 0xe,7
	rjmp L3
	.dbline -2
L2:
	.dbline 0 ; func end
	ret
	.dbsym r Data 16 c
	.dbend