spi.s

来自「avr单片机atmage16驱动小灯的一些例程 并且包括一些收发数据的程序利用」· S 代码 · 共 128 行

	.module spi.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:\ICCAVR\project\AVRMEG~2\icc\019-TEST\spi.c
	.dbsym e disp _disp A[10:10]c
	.area text(rom, con, rel)
	.dbfile E:\ICCAVR\project\AVRMEG~2\icc\019-TEST\spi.c
	.dbfunc e SPI_MasterInit _SPI_MasterInit fV
	.even
_SPI_MasterInit::
	.dbline -1
	.dbline 19
; 
; #include "iom16v.h"
; 
; /*
; 实验四：
; 	SPI接口实险，LED数据管显示。
; 	1、程序通过SPI接口输出数据到HC595芯片驱动LED数据管简单显示。
; 	2、内部1 M晶振，程序采用单任务方式，软件延时。
; 	3、进行此实验请插上JP1的所有8个短路块，JP6(SPI_EN)短路块。
; 
; 	AVR  mega16学习板
; 	www.iccavr.com
; 	2006-01-10
; */
; 
; unsigned char disp[] = {0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90};
; 
; /*SPI接口初始化*/
; void SPI_MasterInit(void) {
	.dbline 21
; 
; 	DDRB |= 0xF0;		/* 设置MOSI 和SCK 为输出，其他为输入 */
	in R24,0x17
	ori R24,240
	out 0x17,R24
	.dbline 22
; 	SPCR = (1<<SPE) | (1<<MSTR)
	ldi R24,83
	out 0xd,R24
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e SPI_MasterTransmit _SPI_MasterTransmit fV
;              i -> R16
	.even
_SPI_MasterTransmit::
	.dbline -1
	.dbline 27
; 		| (1<<SPR1) | (1<<SPR0);		/* 使能SPI 主机模式，设置时钟速率为fck/128 */
; }
; 
; /*SPI数据发送*/
; void SPI_MasterTransmit(unsigned char i) {
	.dbline 29
; 	
; 	SPDR = i;							/* 启动数据传输 */
	out 0xf,R16
L3:
	.dbline 30
	.dbline 31
	.dbline 32
L4:
	.dbline 30
; 	while (!(SPSR & (1<<SPIF))) {		/* 等待传输结束 */
	sbis 0xe,7
	rjmp L3
	.dbline -2
L2:
	.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 36
; 		;
; 		}
; }
; 
; /*595数据输出*/
; void SPI_595_Out(unsigned char i) {
	.dbline 37
; 	PORTB &= ~(1 << 4);					/*准备锁存*/
	cbi 0x18,4
	.dbline 38
; 	SPI_MasterTransmit(i);
	mov R16,R20
	xcall _SPI_MasterTransmit
	.dbline 39
; 	PORTB |= (1 << 4);					/*锁存数据*/
	sbi 0x18,4
	.dbline -2
L6:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbend