adc.s

单片机A/D模数转换 C语言编写 源程序。

	.module adc.c
	.area data(ram, con, rel)
_buf::
	.blkb 33
	.area idata
	.byte 'T,'E,'S,'T,32,32,'C,'H,49,58,48,46,48,48,48,'V
	.byte 'v,'o,'l,'t,32,32,'C,'H,50,58,48,46,48,48,48,'V
	.byte 0
	.area data(ram, con, rel)
	.dbfile E:\iccavr代码\实验7_片内模数转换器adc\adc.c
	.dbsym e buf _buf A[33:33]c
	.area text(rom, con, rel)
	.dbfile E:\iccavr代码\实验7_片内模数转换器adc\adc.c
	.dbfunc e DelaymS _DelaymS fV
;              j -> R20,R21
;              k -> R22,R23
;              i -> R16,R17
	.even
_DelaymS::
	rcall push_gset2
	.dbline -1
	.dbline 36
; //******************************************************************************
; //                                                                             *
; //    FileName   : 实验板ADC.c                 ICCAVR V6.31A编译               *
; //    Function   : 实验板的片内模数转换器ADC的使用练习                         *
; //    Date       : 2006-11-05                                                  *
; //    Version    : 1.0                                                         *
; //                                                                             *
; //    Author     : 开关电源              [e-mail]                      *
; //    Company    : 电子信息技术咨询网    http://www.itsn.cn                    *
; //                                                                             *
; //***************************描述与记事*****************************************
; //实验板的AVR程序，片内模数转换器ADC的应用，用1602LCD显示两个通道的ADC测量电压数值
; //接线定义：使用PC和PD口驱动1602LCD作显示，PD4,5,6 为RS,R/W,EA。数据位为PC口。
; //          开关位置:SW2-1,2,3.SW1-1~8.SW2-5为背光开关。SW3-8为系统复位端。
; //          PA0(SW3-1)和PA1(SW3-2)作为两个通道的模拟量输入端。
; //记事：本程序旨在对片内模数转换器ADC的理解与演示，程序适合初学者使用.
; //         使用ATmega8535，片内1MHz晶振。
; //******************************************************************************
; 
; #include <iom8535v.h>             //头文件，ATmega8535单片机的寄存器定义
; #include <macros.h>               //包含有SEI()、CLI()、NOP()、WDR()、等宏定义.
; 
; typedef unsigned char uchar;      //数据类型说明
; typedef unsigned int uint;        //数据类型说明
; 
; uchar buf[]="TEST  CH1:0.000Vvolt  CH2:0.000V";
; 
; /************************************************
; 函 数 名：    DelaymS()
; 功    能：    毫秒级延时函数
; 输入参数:     延迟时间/系统晶体
; 输出参数：    做相应的延迟处理
; 描    述：    /
; ***********************************************/
; void DelaymS (uint i)            //延时函数，参数i为延时时间
; {
	.dbline 38
;     uint j,k;                        //双重延时
; 	for (j=0;j<i;j++)
	clr R20
	clr R21
	rjmp L5
L2:
	.dbline 39
; 	{
	.dbline 40
	clr R22
	clr R23
	rjmp L9
L6:
	.dbline 40
L7:
	.dbline 40
	subi R22,255  ; offset = 1
	sbci R23,255
L9:
	.dbline 40
	ldi R24,500
	ldi R25,1
	cp R24,R22
	cpc R25,R23
	brsh L6
	.dbline 41
L3:
	.dbline 38
	subi R20,255  ; offset = 1
	sbci R21,255
L5:
	.dbline 38
	cp R20,R16
	cpc R21,R17
	brlo L2
	.dbline -2
L1:
	rcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r j 20 i
	.dbsym r k 22 i
	.dbsym r i 16 i
	.dbend
	.dbfunc e write_data _write_data fV
;              h -> R20
	.even
_write_data::
	rcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 51
; 	    for (k=0;k<=500;k++);
; 	}
; }
; /********************************************************
;   子程序名：   write_data()
;   功    能：   写入一字节LCD数据
;   输入参数：   /
;   输出参数：   /
;   描    述：   /
; ********************************************************/
; void write_data(uchar h)
; {
	.dbline 52
;  	 PORTC = h;                  //先将数据送出
	out 0x15,R20
	.dbline 53
; 	 PORTD |= (1<<PD4);   //RS=1,数据
	sbi 0x12,4
	.dbline 54
; 	 PORTD &= ~(1<<PD5);  //R/W=0,写
	cbi 0x12,5
	.dbline 55
; 	 PORTD &= ~(1<<PD6);  //EN=0 ,使能，产生一个下降沿。
	cbi 0x12,6
	.dbline 56
; 	 DelaymS (1);
	ldi R16,1
	ldi R17,0
	rcall _DelaymS
	.dbline 57
; 	 PORTD |= (1<<PD6);   //EN=1 ,除能
	sbi 0x12,6
	.dbline -2
L10:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r h 20 c
	.dbend
	.dbfunc e write_code _write_code fV
;              h -> R20
	.even
_write_code::
	rcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 67
; }
; /********************************************************
;   子程序名：   write_code()
;   功    能：   写入一字节LCD指令/地址
;   输入参数：   /
;   输出参数：   /
;   描    述：   /
; ********************************************************/
; void write_code(uchar h)
; {
	.dbline 68
;  	 PORTC = h;                  //先将地址送出
	out 0x15,R20
	.dbline 69
; 	 PORTD &= ~(1<<PD4);  //RS=0,命令或数据
	cbi 0x12,4
	.dbline 70
; 	 PORTD &= ~(1<<PD5);  //R/W=0,写
	cbi 0x12,5
	.dbline 71
; 	 PORTD &= ~(1<<PD6);  //EN=0 ,使能，产生一个下降沿。
	cbi 0x12,6
	.dbline 72
; 	 DelaymS (1);
	ldi R16,1
	ldi R17,0
	rcall _DelaymS
	.dbline 73
; 	 PORTD |= (1<<PD6);   //EN=1 ,除能
	sbi 0x12,6
	.dbline -2
L11:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r h 20 c
	.dbend
	.dbfunc e Init_lcd _Init_lcd fV
	.even
_Init_lcd::
	.dbline -1
	.dbline 83
; }
; /********************************************************
;   子程序名：   Init_lcd()
;   功    能：   初始化LCD
;   输入参数：   /
;   输出参数：   /
;   描    述：   /
; ********************************************************/
; void Init_lcd(void)
; {
	.dbline 84
;  	 write_code(0x01);     //清除屏幕
	ldi R16,1
	rcall _write_code
	.dbline 85
; 	 write_code(0x38);     //功能设定，8位数据口/2行/5*7的点阵
	ldi R16,56
	rcall _write_code
	.dbline 86
; 	 write_code(0b00001111);     //显示幕ON，光标ON，闪烁ON
	ldi R16,15
	rcall _write_code
	.dbline 87
; 	 write_code(0x06);     //模式，加1，显示幕ON。
	ldi R16,6
	rcall _write_code
	.dbline 88
; 	 write_code(0b00000011);     //光标回到原点
	ldi R16,3
	rcall _write_code
	.dbline -2
L12:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e display_lcd _display_lcd fV
;              i -> R20
;              p -> R22,R23
	.even
_display_lcd::
	rcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 98
; }
; /********************************************************
;   子程序名：   display_lcd()
;   功    能：   刷新显示一屏数据，独立的LCD显示程序,用户将显存内容更新后，只要调用此程序即可更新显示。
;   输入参数：   /
;   输出参数：   /
;   描    述：   在写一个字符前，先设定显示的位置地址，然后再写数据。系统可以自动地址加一。
; ********************************************************/
; void display_lcd(uchar *p)
; {
	.dbline 100
; 	 uchar i;
; 	 write_code(0x80);     //第一行起始地址，0b10000000B＝0x80.
	ldi R16,128
	rcall _write_code
	.dbline 101
; 	 for(i=0;i<16;i++)
	clr R20
	rjmp L17
L14:
	.dbline 102
	.dbline 103
	mov R30,R20
	clr R31
	add R30,R22
	adc R31,R23
	ldd R16,z+0
	rcall _write_data
	.dbline 104
L15:
	.dbline 101
	inc R20
L17:
	.dbline 101
	cpi R20,16
	brlo L14
	.dbline 105
; 	 {
; 	     write_data(p[i]);
; 	 }
; 	 write_code(0xc0);     //第二行起始地址，0b11000000B=0xc0.
	ldi R16,192
	rcall _write_code
	.dbline 106
; 	 for(i=16;i<32;i++)
	ldi R20,16
	rjmp L21
L18:
	.dbline 107
	.dbline 108
	mov R30,R20
	clr R31
	add R30,R22
	adc R31,R23
	ldd R16,z+0
	rcall _write_data
	.dbline 109
L19:
	.dbline 106
	inc R20
L21:
	.dbline 106
	cpi R20,32
	brlo L18
	.dbline -2
L13:
	rcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbsym r p 22 pc
	.dbend
	.dbfunc e Init_mcu _Init_mcu fV
	.even
_Init_mcu::
	.dbline -1
	.dbline 119
; 	 {
; 	     write_data(p[i]);
; 	 }
; }
; /************************************************
; 函 数 名：    Init_mcu()
; 功    能：    单片机初始化函数
; 输入参数:     /
; 输出参数：    /
; 描    述：    相关口方向的设置等
; ***********************************************/
; void Init_mcu(void)
; {
	.dbline 120
;  	DDRC = 0xff; //PC口为推挽1输出，段码
	ldi R24,255
	out 0x14,R24
	.dbline 121
; 	DDRD = 0xff; //PD口为推挽1输出，位码
	out 0x11,R24
	.dbline 122
; 	DDRA = 0x00; //PA口为输入
	clr R2
	out 0x1a,R2
	.dbline 123
; 	PORTA = 0x00; //内部不接上拉电阻
	out 0x1b,R2
	.dbline -2
L22:
	.dbline 0 ; func end
	ret