📄 1602_main.s
字号:
.module _1602_main.c
.area text(rom, con, rel)
.dbfile D:\我的资源\我的文件\电子技术\AVR\AVR学习\JASON'~2\M16频率计(10K-5MHz,误差0.1%以下)(已验证)\1602_main.c
.dbfile D:\我的资源\我的文件\电子技术\AVR\AVR学习\JASON'~2\M16频率计(10K-5MHz,误差0.1%以下)(已验证)\1602.h
.dbfunc e s_ms _s_ms fV
; ms -> R16,R17
.even
_s_ms::
.dbline -1
.dbline 9
; #define uchar unsigned char
; #define uint unsigned int
;
; #define RS 5
; #define RW 6
; #define EN 7
;
; void s_ms(uint ms)
; {
.dbline 10
; for(;ms>1;ms--);
xjmp L5
L2:
.dbline 10
L3:
.dbline 10
subi R16,1
sbci R17,0
L5:
.dbline 10
ldi R24,1
ldi R25,0
cp R24,R16
cpc R25,R17
brlo L2
X0:
.dbline -2
L1:
.dbline 0 ; func end
ret
.dbsym r ms 16 i
.dbend
.dbfunc e busy _busy fV
; temp -> R20
.even
_busy::
st -y,R20
.dbline -1
.dbline 15
; }
;
; //查忙
; void busy(void)
; {
.dbline 17
; uchar temp;
; PORTB&=~(1<<RS); //RS=0
cbi 0x18,5
.dbline 18
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 19
; PORTB|=(1<<RW); //RW=1
sbi 0x18,6
.dbline 20
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
xjmp L8
L7:
.dbline 22
; while(temp)
; {
.dbline 23
; PORTB|=(1<<EN); //EN=1
sbi 0x18,7
.dbline 24
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 25
; DDRA=0x00; //A口变输入
clr R2
out 0x1a,R2
.dbline 26
; PORTA=0xff; //上拉使能
ldi R24,255
out 0x1b,R24
.dbline 27
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 28
; temp = PINA&0x80; //读取A口
in R20,0x19
andi R20,128
.dbline 29
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 30
; DDRA=0xff;
ldi R24,255
out 0x1a,R24
.dbline 31
; PORTA=0xff; //A口变输出
out 0x1b,R24
.dbline 32
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 33
; PORTB&=~(1<<EN); //EN=0
cbi 0x18,7
.dbline 34
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 35
; }
L8:
.dbline 21
tst R20
brne L7
X1:
.dbline -2
L6:
.dbline 0 ; func end
ld R20,y+
ret
.dbsym r temp 20 c
.dbend
.dbfunc e writecom _writecom fV
; com -> R10
.even
_writecom::
st -y,R10
mov R10,R16
.dbline -1
.dbline 40
; }
;
; //写指令
; void writecom(uchar com)
; {
.dbline 41
; busy();
xcall _busy
.dbline 42
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 43
; PORTB&=~(1<<RS); //RS=0
cbi 0x18,5
.dbline 44
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 45
; PORTB&=~(1<<RW); //RW=0
cbi 0x18,6
.dbline 46
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 47
; PORTB|=(1<<EN); //EN=1
sbi 0x18,7
.dbline 48
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 49
; PORTA = com; //输出指令
out 0x1b,R10
.dbline 50
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 51
; PORTB&=~(1<<EN); //EN=0
cbi 0x18,7
.dbline 52
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline -2
L10:
.dbline 0 ; func end
ld R10,y+
ret
.dbsym r com 10 c
.dbend
.dbfunc e LcdInit _LcdInit fV
.even
_LcdInit::
.dbline -1
.dbline 57
; }
;
; //1602初始化
; void LcdInit(void)
; {
.dbline 58
; DDRA = 0xff;
ldi R24,255
out 0x1a,R24
.dbline 59
; PORTA = 0x00;
clr R2
out 0x1b,R2
.dbline 60
; writecom(0x38);
ldi R16,56
xcall _writecom
.dbline 61
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 62
; writecom(0x01);
ldi R16,1
xcall _writecom
.dbline 63
; s_ms(1000);
ldi R16,1000
ldi R17,3
xcall _s_ms
.dbline 64
; s_ms(1000);
ldi R16,1000
ldi R17,3
xcall _s_ms
.dbline 65
; s_ms(1000);
ldi R16,1000
ldi R17,3
xcall _s_ms
.dbline 66
; writecom(0x02);
ldi R16,2
xcall _writecom
.dbline 67
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 68
; writecom(0x06);
ldi R16,6
xcall _writecom
.dbline 69
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 70
; writecom(0x0c);
ldi R16,12
xcall _writecom
.dbline 71
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 72
; writecom(0x38);
ldi R16,56
xcall _writecom
.dbline 73
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline -2
L11:
.dbline 0 ; func end
ret
.dbend
.dbfunc e writedata _writedata fV
; data -> R10
.even
_writedata::
st -y,R10
mov R10,R16
.dbline -1
.dbline 78
; }
;
; //写数据
; void writedata(uchar data)
; {
.dbline 79
; busy();
xcall _busy
.dbline 80
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 81
; PORTB|=(1<<RS); //RS=1
sbi 0x18,5
.dbline 82
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 83
; PORTB&=~(1<<RW); //RW=0
cbi 0x18,6
.dbline 84
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 85
; PORTB|=(1<<EN); //EN=1
sbi 0x18,7
.dbline 86
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 87
; PORTA = data; //输出数据
out 0x1b,R10
.dbline 88
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 89
; PORTB&=~(1<<EN); //EN=0
cbi 0x18,7
.dbline 90
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline -2
L12:
.dbline 0 ; func end
ld R10,y+
ret
.dbsym r data 10 c
.dbend
.dbfunc e readdata _readdata fc
; temp -> R10
.even
_readdata::
st -y,R10
.dbline -1
.dbline 96
; }
;
;
; //读数据
; uchar readdata(void)
; {
.dbline 98
; uchar temp;
; busy();
xcall _busy
.dbline 99
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 100
; PORTB|=(1<<RS); //RS=1
sbi 0x18,5
.dbline 101
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 102
; PORTB|=(1<<RW); //RW=1
sbi 0x18,6
.dbline 103
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 104
; PORTB|=(1<<EN); //EN=1
sbi 0x18,7
.dbline 105
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 106
; DDRA=0x00; //A端口变输入
clr R2
out 0x1a,R2
.dbline 107
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 108
; temp = PINA; //读A端口
in R10,0x19
.dbline 109
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 110
; DDRA=0xff; //A端口变输出
ldi R24,255
out 0x1a,R24
.dbline 111
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 112
; PORTB&=~(1<<EN); //EN=0
cbi 0x18,7
.dbline 113
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 114
; return temp;
mov R16,R10
.dbline -2
L13:
.dbline 0 ; func end
ld R10,y+
ret
.dbsym r temp 10 c
.dbend
.dbfunc e WriteCGRAM _WriteCGRAM fV
; t -> R10,R11
; i -> R20,R21
; pBuffer -> R22,R23
; num -> R10,R11
.even
_WriteCGRAM::
xcall push_xgsetF00C
movw R22,R18
movw R10,R16
.dbline -1
.dbline 124
; }
;
; //=================================================
; // 描述： 写LCD内部CGRAM函数
; // 入口： ‘num’要写的数据个数
; // ‘pbuffer’要写的数据的首地址
; // 出口： 无
; //================================================
; void WriteCGRAM(uint num, const uint *pBuffer)
; {
.dbline 126
; uint i,t;
; writecom(0x40);
ldi R16,64
xcall _writecom
.dbline 127
; PORTB|=(1<<RS);
sbi 0x18,5
.dbline 128
; PORTB&=~(1<<RW);
cbi 0x18,6
.dbline 129
; for(i=num;i!=0;i--)
movw R20,R10
xjmp L18
L15:
.dbline 130
; {
.dbline 131
; t = *pBuffer;
movw R30,R22
lpm R10,Z+
lpm R11,Z
.dbline 132
; PORTB|=(1<<EN);
sbi 0x18,7
.dbline 133
; PORTA = t;
out 0x1b,R10
.dbline 134
; PORTB&=~(1<<EN);
cbi 0x18,7
.dbline 135
; pBuffer++;
subi R22,254 ; offset = 2
sbci R23,255
.dbline 136
; }
L16:
.dbline 129
subi R20,1
sbci R21,0
L18:
.dbline 129
cpi R20,0
cpc R20,R21
brne L15
X2:
.dbline -2
L14:
.dbline 0 ; func end
xjmp pop_xgsetF00C
.dbsym r t 10 i
.dbsym r i 20 i
.dbsym r pBuffer 22 pki
.dbsym r num 10 i
.dbend
.dbfunc e WriteMenu _WriteMenu fV
; t -> R10
; i -> R22
; pBuffer -> R20,R21
.even
_WriteMenu::
xcall push_xgsetF00C
movw R20,R16
.dbline -1
.dbline 146
;
; }
;
; //=================================================
; //描述：写菜单函数，本程序使用的LCD规格为 16 * 2
; //入口：菜单数组首地址
; //出口：无
; //=================================================
; void WriteMenu(const uchar *pBuffer)
; {
.dbline 148
; uchar i,t;
; writecom(0x80); //数据地址
ldi R16,128
xcall _writecom
.dbline 150
;
; PORTB|=(1<<RS);
sbi 0x18,5
.dbline 151
; PORTB&=~(1<<RW);
cbi 0x18,6
.dbline 152
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 153
; for(i=0;i<16;i++)
clr R22
xjmp L23
L20:
.dbline 154
; {
.dbline 155
; t = *pBuffer;
movw R30,R20
lpm R10,Z
.dbline 156
; PORTA = t;
out 0x1b,R10
.dbline 157
; PORTB|=(1<<EN);
sbi 0x18,7
.dbline 158
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 159
; PORTB&=~(1<<EN);
cbi 0x18,7
.dbline 160
; pBuffer++;
subi R20,255 ; offset = 1
sbci R21,255
.dbline 161
; }
L21:
.dbline 153
inc R22
L23:
.dbline 153
cpi R22,16
brlo L20
X3:
.dbline 162
; writecom(0xC0);
ldi R16,192
xcall _writecom
.dbline 164
;
; PORTB|=(1<<RS);
sbi 0x18,5
.dbline 165
; PORTB&=~(1<<RW);
cbi 0x18,6
.dbline 166
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 167
; for(i=0;i<16;i++)
clr R22
xjmp L27
L24:
.dbline 168
; {
.dbline 169
; t = *pBuffer;
movw R30,R20
lpm R10,Z
.dbline 170
; PORTA = t;
out 0x1b,R10
.dbline 171
; PORTB|=(1<<EN);
sbi 0x18,7
.dbline 172
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 173
; PORTB&=~(1<<EN);
cbi 0x18,7
.dbline 174
; pBuffer++;
subi R20,255 ; offset = 1
sbci R21,255
.dbline 175
; }
L25:
.dbline 167
inc R22
L27:
.dbline 167
cpi R22,16
brlo L24
X4:
.dbline -2
L19:
.dbline 0 ; func end
xjmp pop_xgsetF00C
.dbsym r t 10 c
.dbsym r i 22 c
.dbsym r pBuffer 20 pkc
.dbend
.dbfunc e WriteNum _WriteNum fV
; num -> R20,R21
; col -> R10,R11
; row -> R22,R23
.even
_WriteNum::
xcall push_xgsetF00C
movw R10,R18
movw R22,R16
ldd R20,y+6
ldd R21,y+7
.dbline -1
.dbline 185
; }
; //====================================================
; // 描述：在任意位置写数字函数
; // 入口：’row‘表示要写数字所在的行地址，只能为1或2
; // ’col‘表示要写数字所在的列地址，只能为0--15
; // ‘num’表示要写的数字，只能为0--9
; // 出口：无
; //===================================================
; void WriteNum(uint row,uint col,uint num)
; {
.dbline 186
; if (row == 1) row = 0x80 + col;
cpi R22,1
ldi R30,0
cpc R23,R30
brne L29
X5:
.dbline 186
movw R22,R10
subi R22,128 ; offset = 128
sbci R23,255
xjmp L30
L29:
.dbline 187
; else row = 0xC0 + col;
movw R22,R10
subi R22,64 ; offset = 192
sbci R23,255
L30:
.dbline 188
; writecom(row);
mov R16,R22
xcall _writecom
.dbline 189
; if (num<=0 | num>9) num =0x30;
cpi R20,0
cpc R20,R21
brne L33
X6:
ldi R24,1
ldi R25,0
movw R10,R24
xjmp L34
L33:
clr R10
clr R11
L34:
ldi R24,9
ldi R25,0
cp R24,R20
cpc R25,R21
brsh L35
X7:
ldi R22,1
ldi R23,0
xjmp L36
L35:
clr R22
clr R23
L36:
movw R2,R10
or R2,R22
or R3,R23
tst R2
brne X8
tst R3
breq L31
X8:
.dbline 189
ldi R20,48
ldi R21,0
xjmp L32
L31:
.dbline 190
; else num = 0x30 + num;
subi R20,208 ; offset = 48
sbci R21,255
L32:
.dbline 192
;
; PORTB|=(1<<RS);
sbi 0x18,5
.dbline 193
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 194
; PORTB&=~(1<<RW);
cbi 0x18,6
.dbline 195
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 196
; PORTA = num;
out 0x1b,R20
.dbline 197
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 198
; PORTB|=(1<<EN);
sbi 0x18,7
.dbline 199
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline 200
; PORTB&=~(1<<EN);
cbi 0x18,7
.dbline 201
; s_ms(20);
ldi R16,20
ldi R17,0
xcall _s_ms
.dbline -2
L28:
.dbline 0 ; func end
xjmp pop_xgsetF00C
.dbsym r num 20 i
.dbsym r col 10 i
.dbsym r row 22 i
.dbend
.dbfunc e WriteChar _WriteChar fV
; t -> R12
; i -> R10
; pBuffer -> R20,R21
; num -> y+8
; col -> R10
; row -> R22
.even
_WriteChar::
xcall push_xgsetF03C
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -