?? max5478.s
字號(hào):
.module MAX5478.C
.area text(rom, con, rel)
.dbfile E:\程序與資料\dpj\AVR\自己寫的AVR\MAX5478\MAX5478.C
.dbfunc e Delayms _Delayms fV
; i -> R10,R11
; j -> R12,R13
; MS -> R16,R17
.even
_Delayms::
xcall push_xgset003C
.dbline -1
.dbline 23
; /***************MAX5478數(shù)字電位器-I2C**********************/
; #include <iom16v.h> //包含型號(hào)頭文件
; #include <macros.h> //包含"位"操作頭文件
; #include <stdio.h> //標(biāo)準(zhǔn)輸入輸出頭文件
; /******************數(shù)據(jù)類型宏定義******************/
; #define TRUE 1
; #define FALSE 0
; #define uchar unsigned char
; #define uint unsigned int
; //******************按鍵常量******************/
; #define KEY_DDR DDRD //按鍵方向定義
; #define KEY_PORTO PORTD //按鍵端口輸出定義
; #define KEY_PORTI PIND //按鍵端口輸入定義
; #define OUT 0xFF //輸出常量
; #define IN 0xF0 //輸入常量
; /*******************************************
; 函數(shù)名稱: Delayms
; 功 能: 延時(shí)指定毫秒（12M晶振）
; 參 數(shù): MS--延時(shí)的毫秒數(shù)
; 返回值 : 無(wú)
; /********************************************/
; void Delayms(uint MS)
; {
.dbline 25
; uint i,j;
; for( i=0;i<MS;i++)
clr R10
clr R11
xjmp L5
L2:
.dbline 26
; for(j=0;j<1141;j++); //1141是在8MHz晶振下，通過(guò)軟件仿真反復(fù)實(shí)驗(yàn)得到的數(shù)值
clr R12
clr R13
xjmp L9
L6:
.dbline 26
L7:
.dbline 26
movw R24,R12
adiw R24,1
movw R12,R24
L9:
.dbline 26
movw R24,R12
cpi R24,117
ldi R30,4
cpc R25,R30
brlo L6
X0:
L3:
.dbline 25
movw R24,R10
adiw R24,1
movw R10,R24
L5:
.dbline 25
cp R10,R16
cpc R11,R17
brlo L2
X1:
.dbline -2
L1:
.dbline 0 ; func end
xjmp pop_xgset003C
.dbsym r i 10 i
.dbsym r j 12 i
.dbsym r MS 16 i
.dbend
.dbfile E:\程序與資料\dpj\AVR\自己寫的AVR\MAX5478\Skey.C
.dbfunc e Skey_press _Skey_press fc
; pressed -> R16
.even
_Skey_press::
.dbline -1
.dbline 10
;
;
; /*******************************************
; 函數(shù)名稱: Skey_press
; 功 能: 檢測(cè)是否有鍵按下
; 參 數(shù): 無(wú)
; 返回值 : pressed--有鍵按下時(shí)為TRUE，否則為FALSE
; /********************************************/
; uchar Skey_press(void)
; {
.dbline 12
; uchar pressed;
; KEY_DDR=OUT; //定義數(shù)據(jù)端口為輸出
ldi R24,255
out 0x11,R24
.dbline 13
; KEY_PORTO|=0x0F; //輸出數(shù)據(jù)（輸出檢測(cè)碼）
in R24,0x12
ori R24,15
out 0x12,R24
.dbline 14
; KEY_DDR=IN; //定義數(shù)據(jù)端口為輸入
ldi R24,240
out 0x11,R24
.dbline 15
; if((KEY_PORTI&0x0F)!=0x0F) //檢測(cè)是否有鍵按下
in R24,0x10
andi R24,15
cpi R24,15
breq L11
X2:
.dbline 16
; pressed=TRUE; //有鍵按下則返回TRUE
ldi R16,1
xjmp L12
L11:
.dbline 18
; else
; pressed=FALSE; //無(wú)鍵按下則返回FALSE
clr R16
L12:
.dbline 19
; KEY_DDR=OUT; //數(shù)據(jù)端口還原為輸出
ldi R24,255
out 0x11,R24
.dbline 20
; return pressed;
.dbline -2
L10:
.dbline 0 ; func end
ret
.dbsym r pressed 16 c
.dbend
.dbfunc e Skey_scan _Skey_scan fc
; keycode -> R10
.even
_Skey_scan::
xcall push_xgset003C
.dbline -1
.dbline 29
; }
; /*******************************************
; 函數(shù)名稱: Skey_scan
; 功 能: 掃描所按的鍵并返回鍵值
; 參 數(shù): 無(wú)
; 返回值 : keycode--被按下鍵值
; /********************************************/
; uchar Skey_scan(void)
; {
.dbline 30
; uchar keycode=0xFF;
ldi R24,255
mov R10,R24
.dbline 31
; Delayms(15); //延時(shí)消抖
ldi R16,15
ldi R17,0
xcall _Delayms
.dbline 32
; if(Skey_press()==TRUE) //如果有鍵按下
xcall _Skey_press
cpi R16,1
brne L14
X3:
.dbline 33
; {
.dbline 34
; KEY_DDR=IN; //定義數(shù)據(jù)端口為輸入
ldi R24,240
out 0x11,R24
.dbline 35
; keycode=KEY_PORTI; //讀入原始鍵碼
in R10,0x10
.dbline 36
; keycode&=0x0F; //屏蔽高4位
mov R24,R10
andi R24,15
mov R10,R24
.dbline 37
; switch(keycode) //翻譯原始鍵碼為0~3
mov R12,R24
clr R13
movw R24,R12
cpi R24,7
ldi R30,0
cpc R25,R30
breq L22
X4:
cpi R24,11
ldi R30,0
cpc R25,R30
breq L21
X5:
cpi R24,13
ldi R30,0
cpc R25,R30
breq L20
X6:
cpi R24,14
ldi R30,0
cpc R25,R30
breq L19
X7:
xjmp L16
L19:
.dbline 40
; {
; case 0x0E:
; keycode=0;
clr R10
.dbline 41
; break;
xjmp L17
L20:
.dbline 43
; case 0x0D:
; keycode=1;
clr R10
inc R10
.dbline 44
; break;
xjmp L17
L21:
.dbline 46
; case 0x0B:
; keycode=2;
ldi R24,2
mov R10,R24
.dbline 47
; break;
xjmp L17
L22:
.dbline 49
; case 0x07:
; keycode=3;
ldi R24,3
mov R10,R24
.dbline 50
; break;
xjmp L17
L16:
.dbline 52
; default:
; keycode=0x00;
clr R10
.dbline 53
; }
L17:
L23:
.dbline 55
; do
; {
.dbline 56
; }while(Skey_press()==TRUE); //等待按鍵釋放（為了防止按一次，執(zhí)行多次的現(xiàn)象）
L24:
.dbline 56
xcall _Skey_press
cpi R16,1
breq L23
X8:
.dbline 57
; }
L14:
.dbline 58
; return keycode;
mov R16,R10
.dbline -2
L13:
.dbline 0 ; func end
xjmp pop_xgset003C
.dbsym r keycode 10 c
.dbend
.dbfile E:\程序與資料\dpj\AVR\自己寫的AVR\MAX5478\MAX5478.C
.dbfunc e Twi_init _Twi_init fV
.even
_Twi_init::
.dbline -1
.dbline 45
; }
; //************************************************
; #include "Skey.C" //包含鍵盤掃描函數(shù)
; /******************TWI(IIC)常量******************/
; #define START 0x08 //START信號(hào)發(fā)送完畢狀態(tài)
; #define MT_SLA_ACK 0x18 //從器件地址發(fā)送，返回ACK
; #define MT_SLA_NOACK 0x20 //從器件地址發(fā)送，但是返回NOACK
; #define MT_DATA_ACK 0x28 //數(shù)據(jù)已發(fā)送，返回ACK
; #define MT_DATA_NOACK 0x30 //數(shù)據(jù)已發(fā)送，返回NOACK
;
; #define Start() (TWCR=(1<<TWINT)|(1<<TWSTA)|(1<<TWEN)) //產(chǎn)生START信號(hào)
; #define Stop() (TWCR=(1<<TWINT)|(1<<TWSTO)|(1<<TWEN)) //產(chǎn)生STOP信號(hào)
; #define Wait() while(!(TWCR&(1<<TWINT))) //等待當(dāng)前操作完成
; #define TestACK() (TWSR&0xF8) //取出狀態(tài)碼
; #define SetACK() (TWCR|=(1<<TWEA)) //產(chǎn)生ACK
; #define Writebyte(twi_d) {TWDR=(twi_d);TWCR=(1<<TWINT)|(1<<TWEN);} //發(fā)送一個(gè)字節(jié)（twi_d為寫入的數(shù)據(jù)）
; //************************************************************************************************************
; void Twi_init(void)
; {
.dbline 46
; TWBR= 0x20; //設(shè)置波特率
ldi R24,32
out 0x0,R24
.dbline 47
; TWSR= 0x00; //設(shè)置預(yù)分頻比
clr R2
out 0x1,R2
.dbline 48
; TWCR= 0x44; //使能應(yīng)答，使能TWI
ldi R24,68
out 0x36,R24
.dbline -2
L26:
.dbline 0 ; func end
ret
.dbend
.dbfunc e MAX5478_writeB _MAX5478_writeB fc
; success -> R10
; rdata -> y+6
; cmd -> R12
; devadd -> R14
.even
_MAX5478_writeB::
xcall push_xgset00FC
mov R12,R18
mov R14,R16
.dbline -1
.dbline 60
; }
;
; /*******************************************
; 函數(shù)名稱: MAX5478_writeB
; 功 能: 向MAX5478寫入電阻值數(shù)據(jù)
; 參 數(shù): devadd--器件地址
; cmd--控制命令
; rdata--電阻數(shù)據(jù)
; 返回值 : success--數(shù)據(jù)成功標(biāo)志（為TRUE時(shí)寫入成功，為FALSE時(shí)失敗）
; /********************************************/
; uchar MAX5478_writeB(uchar devadd,uchar cmd,uchar rdata)
; {
.dbline 61
; uchar success=FALSE; //默認(rèn)返回是寫入失敗
clr R10
.dbline 62
; Start(); //產(chǎn)生START信號(hào)
ldi R24,164
out 0x36,R24
L28:
.dbline 63
; Wait(); //等待START信號(hào)發(fā)送完畢
L29:
.dbline 63
in R2,0x36
sbrs R2,7
rjmp L28
X9:
.dbline 64
; if(TestACK()!=START) //檢查是否是START信號(hào)發(fā)送完畢狀態(tài)
in R24,0x1
andi R24,248
cpi R24,8
breq L31
X10:
.dbline 65
; {
.dbline 66
; success=FALSE; //如果不是，則返回寫入失敗
clr R10
.dbline 67
; return success;
mov R16,R10
xjmp L27
L31:
.dbline 69
; }
; Writebyte(devadd); //發(fā)送從器件地址
.dbline 69
out 0x3,R14
.dbline 69
ldi R24,132
out 0x36,R24
.dbline 69
.dbline 69
L33:
.dbline 70
; Wait(); //等待發(fā)送完畢
L34:
.dbline 70
in R2,0x36
sbrs R2,7
rjmp L33
X11:
.dbline 71
; if(TestACK()!=MT_SLA_ACK)//檢查是否是從器件地址發(fā)送完畢狀態(tài)
in R24,0x1
andi R24,248
cpi R24,24
breq L36
X12:
.dbline 72
; {
.dbline 73
; success=FALSE; //如果不是，則返回寫入失敗
clr R10
.dbline 74
; return success;
mov R16,R10
xjmp L27
L36:
.dbline 76
; }
; Writebyte(cmd); //發(fā)送MAX5478的命令字節(jié)（具體含義請(qǐng)參看MAX5478的數(shù)據(jù)手冊(cè)）
.dbline 76
out 0x3,R12
.dbline 76
ldi R24,132
out 0x36,R24
.dbline 76
.dbline 76
L38:
.dbline 77
; Wait(); //等待發(fā)送完畢
L39:
.dbline 77
in R2,0x36
sbrs R2,7
rjmp L38
X13:
.dbline 78
; if(TestACK()!=MT_DATA_ACK)//檢查是否是數(shù)據(jù)發(fā)送完畢
in R24,0x1
andi R24,248
cpi R24,40
breq L41
X14:
.dbline 79
; {
.dbline 80
; success=FALSE; //如果不是，則返回寫入失敗
clr R10
.dbline 81
; return success;
mov R16,R10
xjmp L27
L41:
.dbline 83
; }
; Writebyte(rdata); //發(fā)送電阻值數(shù)據(jù)
.dbline 83
ldd R0,y+6
out 0x3,R0
.dbline 83
ldi R24,132
out 0x36,R24
.dbline 83
.dbline 83
L43:
.dbline 84
; Wait(); //等待發(fā)送完畢
L44:
.dbline 84
in R2,0x36
sbrs R2,7
rjmp L43
X15:
.dbline 85
; if(TestACK()!=MT_DATA_ACK)//檢查是否是數(shù)據(jù)發(fā)送完畢
in R24,0x1
andi R24,248
cpi R24,40
breq L46
X16:
.dbline 86
; {
.dbline 87
; success=FALSE; //如果不是，則返回寫入失敗
clr R10
.dbline 88
; return success;
mov R16,R10
xjmp L27
L46:
.dbline 90
; }
; Stop(); //對(duì)MAX5478的一次操作完畢，發(fā)送STOP信號(hào)
ldi R24,148
out 0x36,R24
.dbline 91
; Delayms(10); //等待發(fā)送完畢
ldi R16,10
ldi R17,0
xcall _Delayms
.dbline 92
; success=TRUE; //本次寫入成功
clr R10
inc R10
.dbline 93
; return success; //返回寫入成功狀態(tài)
mov R16,R10
.dbline -2
L27:
.dbline 0 ; func end
xjmp pop_xgset00FC
.dbsym r success 10 c
.dbsym l rdata 6 c
.dbsym r cmd 12 c
.dbsym r devadd 14 c
.dbend
.dbfunc e main _main fV
; data -> R10
; i -> R12
.even
_main::
sbiw R28,1
.dbline -1
.dbline 102
; }
; /*******************************************
; 函數(shù)名稱: main
; 功 能: 按鍵更新數(shù)字電位器的阻值(電阻是A和W端的阻值，默認(rèn)B端是開(kāi)路的)
; 參 數(shù): 無(wú)
; 返回值 : 無(wú)
; /********************************************/
; void main(void)
; {
.dbline 103
; uchar i,data=255; //初始電阻是滿量程
ldi R24,255
mov R10,R24
.dbline 105
;
; Twi_init( ); //初始化TWI
xcall _Twi_init
.dbline 106
; MAX5478_writeB(0x50,0x13,data); //設(shè)置初始電阻
std y+0,R10
ldi R18,19
ldi R16,80
xcall _MAX5478_writeB
xjmp L50
L49:
.dbline 108
; while(1)
; {
.dbline 109
; if(Skey_press()) //是否有按鍵按下
xcall _Skey_press
tst R16
breq L52
X17:
.dbline 110
; {
.dbline 111
; i=Skey_scan(); //掃描并反回翻譯后的鍵碼
xcall _Skey_scan
mov R12,R16
.dbline 112
; switch(i)
clr R13
tst R12
brne X18
tst R13
breq L57
X18:
movw R24,R12
cpi R24,1
ldi R30,0
cpc R25,R30
breq L58
X19:
cpi R24,2
ldi R30,0
cpc R25,R30
breq L59
X20:
cpi R24,3
ldi R30,0
cpc R25,R30
breq L60
X21:
xjmp L54
L57:
.dbline 115
; {
; case 0: //S1鍵按下，減少電阻的數(shù)字量（MAX5478的特性是減少電阻的數(shù)字量，阻值增加）
; data-=5;
mov R24,R10
subi R24,5
mov R10,R24
.dbline 116
; break;
xjmp L55
L58:
.dbline 118
; case 1: //S2鍵按下，增加電阻的數(shù)字量
; data+=5;
mov R24,R10
subi R24,251 ; addi 5
mov R10,R24
.dbline 119
; break;
xjmp L55
L59:
.dbline 121
; case 2: //S3鍵按下，使電阻的數(shù)字量為零（阻值滿量程）
; data=0;
clr R10
.dbline 122
; break;
xjmp L55
L60:
.dbline 124
; case 3: //S3鍵按下，使電阻的數(shù)字量為滿（阻值清零，只剩下接觸電阻）
; data=255;
ldi R24,255
mov R10,R24
.dbline 125
; break;
L54:
L55:
.dbline 127
; }
; MAX5478_writeB(0x50,0x13,data); //更新電阻
std y+0,R10
ldi R18,19
ldi R16,80
xcall _MAX5478_writeB
.dbline 128
; Delayms(5);
ldi R16,5
ldi R17,0
xcall _Delayms
.dbline 129
; }
L52:
.dbline 130
; }
L50:
.dbline 107
xjmp L49
X22:
.dbline -2
L48:
.dbline 0 ; func end
adiw R28,1
ret
.dbsym r data 10 c
.dbsym r i 12 c
.dbend
; }
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -