📄 time_8515.s
字号:
.module time_8515.c
.area data(ram, con, rel)
_buf_time::
.blkb 33
.area idata
.byte 32,'D,'a,'y,58,50,48,48,55,45,48,49,45,49,54,32
.byte 'T,'i,'m,'e,58,32,48,48,58,48,48,58,48,48,32,32
.byte 0
.area data(ram, con, rel)
.dbfile E:\iccavr代码\实验19_其他芯片使用_8515\time_8515.c
.dbsym e buf_time _buf_time A[33:33]c
_buf_write::
.blkb 2
.area idata
.byte 1,32
.area data(ram, con, rel)
.dbfile E:\iccavr代码\实验19_其他芯片使用_8515\time_8515.c
.blkb 2
.area idata
.byte 1,22
.area data(ram, con, rel)
.dbfile E:\iccavr代码\实验19_其他芯片使用_8515\time_8515.c
.blkb 2
.area idata
.byte 1,2
.area data(ram, con, rel)
.dbfile E:\iccavr代码\实验19_其他芯片使用_8515\time_8515.c
.blkb 2
.area idata
.byte 7,0
.area data(ram, con, rel)
.dbfile E:\iccavr代码\实验19_其他芯片使用_8515\time_8515.c
.dbsym e buf_write _buf_write A[8:8]c
.area text(rom, con, rel)
.dbfile E:\iccavr代码\实验19_其他芯片使用_8515\time_8515.c
.dbfunc e DelaymS _DelaymS fV
; j -> R20,R21
; k -> R22,R23
; i -> R16,R17
.even
_DelaymS::
rcall push_gset2
.dbline -1
.dbline 47
; //******************************************************************************
; // *
; // FileName : 实验板time_1302.c ICCAVR V6.31A编译 *
; // Function : 实时时钟DS1302的读写操作应用 *
; // Date : 2007-01-16 *
; // Version : 1.0 *
; // *
; // Author : 开关电源 hongtusy@163.com *
; // Company : 电子信息技术咨询网 http://www.itsn.cn *
; // *
; //***************************描述与记事*****************************************
; //实验板的AVR程序，实时时钟DS1302应用，将实时时间通过串口打印到PC机上，并通过1602LCD
; //显示出来。只要不在主电源掉电下拆除电池，LCD将可以一直显示当前的实时时间。
; //接线定义：串口PD0(SW6-7)-RXD PD1(SW6-8)-TXD ，SW3-8为系统复位端。
; // SW5-1=PA3时钟CLK，SW5-2=PA4数据DAT，SW5-3=PA5复位RET。
; //PC(SW1-1~8)为LCD数据端，PD4(SW2-1),5(SW2-2),6(SW2-3) 为RS,R/W,EA脚 SW2-5为背光开关。
; //记事：本程序旨在对1302驱动的理解与演示，程序适合初学者使用.
; // 打开串口调试器(可能不能显示汉字)或windows自带的超级终端，调整波特率为9600bps，
; // 即可用PC观察到当前的时间和日期。
; //本例子使用片外8MHz晶体(注意熔丝位的设置)。
; //秒寄存器的最高位在开机时默认是1，代表时钟振荡器停止，必须将其改为0后方可启动时钟。
; //本实验是为演示实验板上的第二块主芯片ATmega8515而特意安排的。由于8515和主芯片8535的管脚
; //安排完全兼容，所以平拨开关位置和实验6的实时时钟是一样的。
; //ATmega8515是我们实验板上安排的第二块主芯片，其性能和8535类似，详见数据手册。
; //******************************************************************************
;
; #include <iom8515v.h> //头文件，ATmega8515单片机的寄存器定义
; #include <macros.h> //包含有SEI()、CLI()、NOP()、WDR()、等宏定义.
;
; typedef unsigned char uchar; //数据类型说明
; typedef unsigned int uint;
;
; uchar buf_time[]=" Day:2007-01-16 Time: 00:00:00 "; //LCD显示用的数组
;
; uchar buf_read[8]; //从DS1302读出的时间数据，数据格式为：秒 分 时 日 月 星期 年 写保护字节
; uchar buf_write[8]={0x01,0x20,0x01,0x16,0x01,0x02,0x07,0x00}; //往DS1302写入的时间数据
; // 数据格式为：01秒 20分 01时 16日 01月 02星期 07年 00写保护字节
;
; /************************************************
; 函 数 名： DelaymS()
; 功 能： 毫秒级延时函数
; 输入参数: 延迟时间/系统晶体
; 输出参数： 做相应的延迟处理
; 描 述： /
; ***********************************************/
; void DelaymS (uint i) //延时函数，参数i为延时时间
; {
.dbline 49
; uint j,k; //双重延时
; for (j=0;j<i;j++)
clr R20
clr R21
rjmp L5
L2:
.dbline 50
; {
.dbline 51
clr R22
clr R23
rjmp L9
L6:
.dbline 51
L7:
.dbline 51
subi R22,255 ; offset = 1
sbci R23,255
L9:
.dbline 51
ldi R24,500
ldi R25,1
cp R24,R22
cpc R25,R23
brsh L6
.dbline 52
L3:
.dbline 49
subi R20,255 ; offset = 1
sbci R21,255
L5:
.dbline 49
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 62
; for (k=0;k<=500;k++);
; }
; }
; /********************************************************
; 子程序名： write_data()
; 功 能： 写入一字节LCD数据
; 输入参数： /
; 输出参数： /
; 描 述： /
; ********************************************************/
; void write_data(uchar h)
; {
.dbline 63
; PORTC = h; //先将数据送出
out 0x15,R20
.dbline 64
; PORTD |= (1<<PD4); //RS=1,数据
sbi 0x12,4
.dbline 65
; PORTD &= ~(1<<PD5); //R/W=0,写
cbi 0x12,5
.dbline 66
; PORTD &= ~(1<<PD6); //EN=0 ,使能，产生一个下降沿。
cbi 0x12,6
.dbline 67
; DelaymS (1);
ldi R16,1
ldi R17,0
rcall _DelaymS
.dbline 68
; 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 78
; }
; /********************************************************
; 子程序名： write_code()
; 功 能： 写入一字节LCD指令/地址
; 输入参数： /
; 输出参数： /
; 描 述： /
; ********************************************************/
; void write_code(uchar h)
; {
.dbline 79
; PORTC = h; //先将地址送出
out 0x15,R20
.dbline 80
; PORTD &= ~(1<<PD4); //RS=0,命令或数据
cbi 0x12,4
.dbline 81
; PORTD &= ~(1<<PD5); //R/W=0,写
cbi 0x12,5
.dbline 82
; PORTD &= ~(1<<PD6); //EN=0 ,使能，产生一个下降沿。
cbi 0x12,6
.dbline 83
; DelaymS (1);
ldi R16,1
ldi R17,0
rcall _DelaymS
.dbline 84
; 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 94
; }
; /********************************************************
; 子程序名： init_lcd()
; 功 能： 初始化LCD
; 输入参数： /
; 输出参数： /
; 描 述： /
; ********************************************************/
; void init_lcd(void)
; {
.dbline 95
; write_code(0x01); //清除屏幕
ldi R16,1
rcall _write_code
.dbline 96
; write_code(0x38); //功能设定，8位数据口/2行/5*7的点阵
ldi R16,56
rcall _write_code
.dbline 97
; write_code(0b00001111); //显示幕ON，光标ON，闪烁ON
ldi R16,15
rcall _write_code
.dbline 98
; write_code(0x06); //模式，加1，显示幕ON。
ldi R16,6
rcall _write_code
.dbline 99
; 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 109
; }
; /********************************************************
; 子程序名： display_lcd()
; 功 能： 刷新显示一屏数据，独立的LCD显示程序,用户将显存内容更新后，只要调用此程序即可更新显示。
; 输入参数： /
; 输出参数： /
; 描 述： 在写一个字符前，先设定显示的位置地址，然后再写数据。系统可以自动地址加一。
; ********************************************************/
; void display_lcd(uchar *p)
; {
.dbline 111
; uchar i;
; write_code(0x80); //第一行起始地址，0b10000000B＝0x80.
ldi R16,128
rcall _write_code
.dbline 112
; for(i=0;i<16;i++)
clr R20
rjmp L17
L14:
.dbline 113
.dbline 114
mov R30,R20
clr R31
add R30,R22
adc R31,R23
ldd R16,z+0
rcall _write_data
.dbline 115
L15:
.dbline 112
inc R20
L17:
.dbline 112
cpi R20,16
brlo L14
.dbline 116
; {
; write_data(p[i]);
; }
; write_code(0xc0); //第二行起始地址，0b11000000B=0xc0.
ldi R16,192
rcall _write_code
.dbline 117
; for(i=16;i<32;i++)
ldi R20,16
rjmp L21
L18:
.dbline 118
.dbline 119
mov R30,R20
clr R31
add R30,R22
adc R31,R23
ldd R16,z+0
rcall _write_data
.dbline 120
L19:
.dbline 117
inc R20
L21:
.dbline 117
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 InputByte _InputByte fV
; i -> R20
; CD -> R22
.even
_InputByte::
rcall push_gset2
mov R22,R16
.dbline -1
.dbline 130
; {
; write_data(p[i]);
; }
; }
; /************************************************
; 函 数 名： InputByte()
; 功 能： 串行写入1字节的数据函数
; 输入参数: /
; 输出参数： /
; 描 述： PA4为数据端，PA3为时钟端，bit0在先，时钟上升沿写入。
; ***********************************************/
; void InputByte (uchar CD)
; {
.dbline 132
; uchar i;
; for(i=0;i<8;i++)
clr R20
rjmp L26
L23:
.dbline 133
; {
.dbline 134
; if((CD & (1<<i))==0)
ldi R16,1
mov R17,R20
rcall lsl8
mov R2,R22
and R2,R16
brne L27
.dbline 135
; PORTA &= ~(1<<PA4); //数据端输出0
cbi 0x1b,4
rjmp L28
L27:
.dbline 137
; else
; PORTA |= (1<<PA4); //否则输出1
sbi 0x1b,4
L28:
.dbline 138
sbi 0x1b,3
.dbline 139
cbi 0x1b,3
.dbline 140
L24:
.dbline 132
inc R20
L26:
.dbline 132
cpi R20,8
brlo L23
.dbline -2
L22:
rcall pop_gset2
.dbline 0 ; func end
ret
.dbsym r i 20 c
.dbsym r CD 22 c
.dbend
.dbfunc e OutputByte _OutputByte fc
; mid -> R20
; i -> R22
.even
_OutputByte::
rcall push_gset2
.dbline -1
.dbline 150
; PORTA |= (1<<PA3); //时钟置高，产生上升沿。
; PORTA &= ~(1<<PA3); //时钟置低
; }
; }
; /************************************************
; 函 数 名： OutputByte
; 功 能： 从DS1302串行读出1字节的数据函数
; 输入参数: /
; 输出参数： /
; 描 述： PA4为数据端，PA3为时钟端，bit0在先，时钟下降沿读出。
; ***********************************************/
; uchar OutputByte (void)
; {
.dbline 151
; uchar i,mid=0;
clr R20
.dbline 152
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -