spi.s

ISD1720芯片实现录音,定点录音,播放,定点播放等.

	.module SPI.c
	.area text(rom, con, rel)
	.dbfile E:\写的程序\AVR(C)/1602显示.c
	.dbfunc e delay_1us _delay_1us fV
	.even
_delay_1us::
	.dbline -1
	.dbline 22
; #include "1602显示.c"
; #include "4X4键盘.c"
; 
; void spi_sent_init(void)
; { PORTB |= (1<<PB4)|(1<<PB5)|(1<<PB6)|(1<<PB7); 
;   DDRB |= (1<<DDB5)|(1<<DDB7)|(1<<DDB4);       //设置MOSI,SCK和SS为输出 
;   SPCR = (1<<SPE)|(1<<DORD)|(1<<MSTR)|(1<<SPR1)|(1<<SPR0);//设置为主机,LSB先发送
;   SPSR = 0x00;              //预分频为128
; }
; 
; unsigned char SPI_sent(unsigned int Data)
; { 
;   unsigned char sign;
;   PORTB &=~ (1<<PB4);            //强制接收方进入从模式
;   SPCR |= (1<<MSTR);             // MSTR有时会被清零，这里强制进入主机模式
;   SPDR = Data;              //启动数据传输 
;   while(!(SPSR&(1<<SPIF)));      //等待传输结束 
;   PORTB |= (1<<PB4);
;   sign=SPSR;
;   sign=SPDR;
;   return sign;            
; }
	.dbline 23
; /**********************************************************
	nop
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e delay_nus _delay_nus fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nus::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 27
;    注意下面接到的数据是发的两位，原因可能是多接收了一位
; /************************************************************/
; void SPI_receive_int(void)
; {
	.dbline 28
;    /* 设置MISO为输出，其他为输入 */
	clr R20
	clr R21
	.dbline 29
;     DDRB=0x02;
	xjmp L6
L3:
	.dbline 30
	xcall _delay_1us
L4:
	.dbline 29
	subi R20,255  ; offset = 1
	sbci R21,255
L6:
	.dbline 29
	cp R20,R22
	cpc R21,R23
	brlo L3
	.dbline -2
L2:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.dbfunc e delay_1ms _delay_1ms fV
;              i -> R16,R17
	.even
_delay_1ms::
	.dbline -1
	.dbline 34
; 	PORTB|=BIT(4);
; }
; unsigned char SPI_receive()
; {
;    unsigned char receive;
	.dbline 36
	clr R16
	clr R17
	xjmp L11
L8:
	.dbline 36
L9:
	.dbline 36
	subi R16,255  ; offset = 1
	sbci R17,255
L11:
	.dbline 36
;    SPCR = (1<<SPE)|(1<<DORD);/* 使能 SPI */
;    while(!(SPSR & (1<<SPIF)));/* 等待接收结束 */
	cpi R16,116
	ldi R30,4
	cpc R17,R30
	brlo L8
	.dbline -2
L7:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e delay_nms _delay_nms fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nms::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 40
;    receive=SPSR;
;    receive=SPDR;
;    return receive;/* 返回数据 */
; }
	.dbline 41
; 
	clr R20
	clr R21
	.dbline 42
; void main(void)
	xjmp L16
L13:
	.dbline 43
	xcall _delay_1ms
L14:
	.dbline 42
	subi R20,255  ; offset = 1
	sbci R21,255
L16:
	.dbline 42
	cp R20,R22
	cpc R21,R23
	brlo L13
	.dbline -2
L12:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.dbfunc e LCD_init _LCD_init fV
	.even
_LCD_init::
	.dbline -1
	.dbline 72
; {
;    unsigned char F_data=1,j=0;
;   // /*
;    LCD_init();
;    while(1)
;    {
;    if(!(PINB&0x08))
;    {
;    SPI_receive_int();
;    F_data=SPI_receive();
;    LCD_write_chang_data(0,0,F_data);
;    }
;    }
;   // */
;   /*
; 	spi_sent_init();
;   while(1)
;    {
;     DDRD=0xFF;
;     if(key_press())
; 	{
; 	F_data=key_scan();
;     //PORTB&=0xF7;
; 	j=SPI_sent(F_data);
; 	LCD_init();
;     LCD_write_chang_data(0,0,F_data);
;     }
;    }
;   // */
; }
	.dbline 73
; }
	ldi R24,255
	out 0x1a,R24
	.dbline 74
; }
	out 0x1b,R24
	.dbline 75
; }
	out 0x14,R24
	.dbline 76
; }
	out 0x15,R24
	.dbline 77
; }
	ldi R16,15
	ldi R17,0
	xcall _delay_nms
	.dbline 78
; }
	clr R18
	clr R19
	ldi R16,40
	ldi R17,0
	xcall _LCD_write_char
	.dbline 79
; }
	clr R18
	clr R19
	ldi R16,12
	ldi R17,0
	xcall _LCD_write_char
	.dbline 80
; }
	clr R18
	clr R19
	ldi R16,1
	ldi R17,0
	xcall _LCD_write_char
	.dbline 81
; }
	clr R18
	clr R19
	ldi R16,6
	ldi R17,0
	xcall _LCD_write_char
	.dbline -2
L17:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD_en_write _LCD_en_write fV
	.even
_LCD_en_write::
	.dbline -1
	.dbline 85
; }
; }
; }
; }
	.dbline 86
; }
	sbi 0x15,7
	.dbline 87
; }
	ldi R16,1
	ldi R17,0
	xcall _delay_nus
	.dbline 88
; }
	cbi 0x15,7
	.dbline -2
L18:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD_write_char _LCD_write_char fV
;      data_temp -> R22,R23
;   command_temp -> R20,R21
;           data -> R12,R13
;        command -> R10,R11
	.even
_LCD_write_char::
	xcall push_gset4
	movw R12,R18
	movw R10,R16
	.dbline -1
	.dbline 100
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 102
; }
; }
	movw R20,R10
	.dbline 103
; }
	movw R22,R12
	.dbline 104
; }
	xcall _LCD_wait_Ready
	.dbline 105
; }
	cbi 0x15,6
	.dbline 106
; }
	cpi R20,0
	cpc R20,R21
	brne L20
X0:
	.dbline 107
; }
	.dbline 108
; }
	sbi 0x15,5
	.dbline 109
; }
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 110
; }
	movw R24,R22
	andi R24,240
	andi R25,0
	in R2,0x1b
	clr R3
	or R2,R24
	or R3,R25
	out 0x1b,R2
	.dbline 111
; }
	xjmp L21
L20:
	.dbline 113
; }
; }
	.dbline 114
; }
	cbi 0x15,5
	.dbline 115
; }
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 116
; }
	movw R24,R20
	andi R24,240
	andi R25,0
	in R2,0x1b
	clr R3
	or R2,R24
	or R3,R25
	out 0x1b,R2
	.dbline 117
; }
L21:
	.dbline 118
; }
	xcall _LCD_en_write
	.dbline 119
; }
	lsl R20
	rol R21
	lsl R20
	rol R21
	lsl R20
	rol R21
	lsl R20
	rol R21
	.dbline 120
; }
	lsl R22
	rol R23
	lsl R22
	rol R23
	lsl R22
	rol R23
	lsl R22
	rol R23
	.dbline 121
; }
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 122
; }
	tst R10
	brne L22
	tst R11
	brne L22
X1:
	.dbline 123
; }
	movw R24,R22
	andi R24,240
	andi R25,0
	in R2,0x1b
	clr R3
	or R2,R24
	or R3,R25
	out 0x1b,R2
	xjmp L23
L22:
	.dbline 125
; }
; }
	movw R24,R20
	andi R24,240
	andi R25,0
	in R2,0x1b
	clr R3
	or R2,R24
	or R3,R25
	out 0x1b,R2
L23:
	.dbline 126
; }
	xcall _LCD_en_write
	.dbline 127
; }
	sbi 0x15,6
	.dbline 128
; }
	ldi R24,32
	in R2,0x15
	eor R2,R24
	out 0x15,R2
	.dbline -2
L19:
	xcall pop_gset4
	.dbline 0 ; func end
	ret
	.dbsym r data_temp 22 i
	.dbsym r command_temp 20 i
	.dbsym r data 12 i
	.dbsym r command 10 i
	.dbend
	.dbfunc e LCD_wait_Ready _LCD_wait_Ready fV
	.even
_LCD_wait_Ready::
	.dbline -1
	.dbline 132
; }
; }
; }
; }
	.dbline 133
; }
	cbi 0x1a,7
	.dbline 134
; }
	sbi 0x15,6
	.dbline 135
; }
	cbi 0x15,5
	.dbline 136
; }
	sbi 0x15,7
L25:
	.dbline 137
L26:
	.dbline 137
; }
	sbic 0x19,7
	rjmp L28
	ldi R16,1
	ldi R17,0
	xjmp L29
L28:
	clr R16
	clr R17
L29:
	cpi R16,0
	cpc R16,R17
	breq L25
X2:
	.dbline 138
; }
	cbi 0x15,7
	.dbline 139
; }
	in R24,0x1a
	ori R24,240
	out 0x1a,R24
	.dbline -2
L24:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD_set_xy _LCD_set_xy fV
;        address -> R20
;              y -> R20
;              x -> R22
	.even
_LCD_set_xy::
	xcall push_gset2
	mov R20,R18
	mov R22,R16
	.dbline -1
	.dbline 150
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 152
; }
; }
	tst R20
	brne L31
	.dbline 152
	mov R20,R22
	subi R20,128    ; addi 128
	xjmp L32
L31:
	.dbline 154
; }
; }
	mov R20,R22
	subi R20,64    ; addi 192
L32:
	.dbline 155
; }
	clr R18
	clr R19
	mov R16,R20
	clr R17
	xcall _LCD_write_char
	.dbline -2
L30:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r address 20 c
	.dbsym r y 20 c
	.dbsym r x 22 c
	.dbend
	.dbfunc e LCD_write_string _LCD_write_string fV
;              s -> R20,R21
;              Y -> R10
;              X -> R22
	.even
_LCD_write_string::
	xcall push_gset3
	mov R10,R18
	mov R22,R16
	ldd R20,y+6
	ldd R21,y+7
	.dbline -1
	.dbline 165
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 166
; }
	mov R18,R10
	mov R16,R22
	xcall _LCD_set_xy
	xjmp L35
L34:
	.dbline 168
	.dbline 169
	movw R30,R20
	ldd R18,z+0
	clr R19
	clr R16
	clr R17
	xcall _LCD_write_char
	.dbline 170
	subi R20,255  ; offset = 1
	sbci R21,255
	.dbline 171
L35:
	.dbline 167
; }
	movw R30,R20
	ldd R2,z+0
	tst R2
	brne L34
	.dbline -2
L33:
	xcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r s 20 pc
	.dbsym r Y 10 c
	.dbsym r X 22 c
	.dbend
	.dbfunc e LCD_write_dan_data _LCD_write_dan_data fV
;              i -> R20
;              z -> y+4
;              Y -> R22
;              X -> R20
	.even
_LCD_write_dan_data::
	xcall push_gset2
	mov R22,R18
	mov R20,R16
	.dbline -1
	.dbline 174
; }
; }
; }
; }
; }
; }
; }
	.dbline 176
; }
; }
	mov R18,R22
	mov R16,R20
	xcall _LCD_set_xy
	.dbline 177
; }
	ldd R20,y+4
	subi R20,208    ; addi 48
	.dbline 178
; }
	mov R18,R20
	clr R19
	clr R16
	clr R17
	xcall _LCD_write_char
	.dbline -2
L37:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbsym l z 4 c
	.dbsym r Y 22 c
	.dbsym r X 20 c
	.dbend
	.dbfunc e LCD_write_chang_data _LCD_write_chang_data fV
;              i -> R10
;              z -> y+8
;              Y -> R12
;              X -> R10
	.even
_LCD_write_chang_data::
	xcall push_gset4
	mov R12,R18
	mov R10,R16
	.dbline -1
	.dbline 181
; }
; }
; }
	.dbline 183
; }
; }
	mov R18,R12
	mov R16,R10
	xcall _LCD_set_xy