當(dāng)前位置:首頁(yè) > 單片機(jī) > 單片機(jī)
[導(dǎo)讀] PIC12c508讀寫(xiě)93LC46程序/*************************************************************Processer:MicroChipPIC12C508**Compiler:Hi-TECHPICC8.00PL2**Writer:JasonKuo**Description:ItCANread/writ

PIC12c508讀寫(xiě)93LC46程序

/************************************************************
*Processer:MicroChipPIC12C508*

*Compiler:Hi-TECHPICC8.00PL2*
*Writer:JasonKuo*
*Description:ItCANread/write93LC46(64x16-bitorganization)*
*************************************************************/

staticvolatileunsignedcharRTCC@0x01;
staticvolatileunsignedcharTMR0@0x01;
staticvolatileunsignedcharPCL@0x02;
staticvolatileunsignedcharSTATUS@0x03;
staticunsignedcharFSR@0x04;
staticvolatileunsignedcharOSCCAL@0x05;
staticvolatileunsignedcharGPIO@0x06;

staticunsignedcharcontrolOPTION@0x00;
staticvolatileunsignedcharcontrolTRIS@0x06;

/*STATUSbits*/
staticbitGPWUF@(unsigned)&STATUS*8+7;
staticbitPA0@(unsigned)&STATUS*8+5;
staticbitTO@(unsigned)&STATUS*8+4;
staticbitPD@(unsigned)&STATUS*8+3;
staticbitZERO@(unsigned)&STATUS*8+2;
staticbitDC@(unsigned)&STATUS*8+1;
staticbitCARRY@(unsigned)&STATUS*8+0;

/*OPTIONbits*/
#defineGPWU(1<<7)
#defineGPPU(1<<6)
#defineT0CS(1<<5)
#defineT0SE(1<<4)
#definePSA(1<<3)
#definePS2(1<<2)
#definePS1(1<<1)
#definePS0(1<<0)

/*OSCCALbits*/
staticvolatilebitCAL3@(unsigned)&OSCCAL*8+7;
staticvolatilebitCAL2@(unsigned)&OSCCAL*8+6;
staticvolatilebitCAL1@(unsigned)&OSCCAL*8+5;
staticvolatilebitCAL0@(unsigned)&OSCCAL*8+4;

staticvolatilebitGP5@(unsigned)&GPIO*8+5;
staticvolatilebitGP4@(unsigned)&GPIO*8+4;
staticvolatilebitGP3@(unsigned)&GPIO*8+3;
staticvolatilebitGP2@(unsigned)&GPIO*8+2;
staticvolatilebitGP1@(unsigned)&GPIO*8+1;
staticvolatilebitGP0@(unsigned)&GPIO*8+0;

#defineCONFIG_ADDR0xFFF

/*codeprotection*/
#defineMCLREN0xFFFF//memoryclearenable
#defineMCLRDIS0xFFEF//memorycleardISAble

/*watchdog*/
#defineWDTEN0xFFFF//watchdogtimerenable
#defineWDTDIS0xFFFB//watchdogtimerdisable

/*codeprotection*/
#definePROTECT0xFFF7//protecttheprogramcode
#defineUNPROTECT0xFFFF//donotprotecttheprogramcode

/*oscconfigurations*/
#defineEXTRC0xFFFF//externalresistor/caPACitor
#defineINTRC0xFFFE//internal
#defineXT0xFFFD//crystal/resonator
#defineLP0xFFFC//lowpowercrystal/resonator

/*93LC46I/OPINdefine*/
#defineCSGP0//ChipSelect
#defineCLKGP1//SerialDataCLOCk
#defineDIGP2//SerialDataInput
#defineDOGP4//SerialDataOutput

voidDelay(unsignedintcounter);
voidPulse(void);
voidStartBit(void);
voidEWEN(void);
voidEWDS(void);
externvoidWrite93LC46(unsignedcharOffset_Addr,unsignedinttx_data);
externunsignedintRead93LC46(unsignedcharOffset_Addr);
voidInitPIC(void);

#defineCLRWDT()asm("clrwdt")
#defineSLEEP()asm("sleep")

#define___mkstr1(x)#x
#define___mkstr(x)___mkstr1(x)
#define__CONFIG(x)asm("tpsectconfig,class=CONFIG,delta=2");
asm("tglobaltconfig_word");
asm("config_word");
asm("tdw"___mkstr(x))

#define__IDLOC(w)asm("tpsectidloc,class=IDLOC,delta=2");
asm("tglobaltidloc_word");
asm("idloc_word");
asm("tirpct__arg,"___mkstr(w));
asm("tdw0&__arg&h");
asm("tendm")


__CONFIG(MCLRDIS&WDTDIS&EXTRC&PROTECT);


/*----------------------------------------------------
Function:Delay
Input:unsignedint(counter)
Output:None
Description:Delayroutine
ifcounter=1delay35us,ifcounter=10delay134us,
ifcounter=100delay1.12ms,
Thesedelayisbaseoninternal4MHz
------------------------------------------------------*/
voidDelay(unsignedintcounter)
{
while(counter>0)counter--;
}


/*----------------------------------------------------
Function:Pulse
Input:None
Output:None
Description:Sendapulse(10)toSerialDataClock(CLK)
------------------------------------------------------*/
voidPulse(void)
{
CLK=1;
Delay(25);
CLK=0;
}

/*----------------------------------------------------
Function:StartBit
Input:None
Output:None
Description:
1.SetChipSelect(CS)=1(high)
2.SetaStartBit(1)toSerialDataInput(DI)
------------------------------------------------------*/
voidStartBit(void)
{
CS=1;
DI=1;
Pulse();
}

/*----------------------------------------------------
Function:EWEN
Input:None
Output:None
Description:ERASE/WRITEEnable
------------------------------------------------------*/
voidEWEN(void)
{
unsignedchari,temp;

StartBit();/*1*/

temp=0x80;/*0011xxxx,(opcode:00,Address:11xxxx)*/
for(i=0;i<8;i++){
if(0x30&temp)
DI=1;
else
DI=0;
Pulse();
temp>>=1;
}

CS=0;
}

/*----------------------------------------------------
Function:EWDS
Input:None
Output:None
Description:ERASE/WRITEDisable
------------------------------------------------------*/
voidEWDS(void)
{
unsignedchari;

StartBit();/*1*/

DI=0;/*0000xxxx,(opcode:00,Address:00xxxx)*/
for(i=0;i<8;i++)
Pulse();

CS=0;
}

/*----------------------------------------------------
Function:Write93LC46
Input:unsignedcharOffsetAddress,unsignedinttx_data
Output:None
Description:Write16bitsdatainto93LC46OffsetAddress
------------------------------------------------------*/
voidWrite93LC46(unsignedcharOffset_Addr,unsignedinttx_data)
{
unsignedcharAddr,i;
unsignedinttemp;

EWEN();

StartBit();/*1*/
Offset_Addr=Offset_Addr&0x3F;/*6bitsaddress*/
Addr=Offset_Addr+0x40;/*01AAAAAA,(opcode:01,address:AAAAAA)*/
temp=0x0080;
for(i=0;i<8;i++){
if(Addr&temp)
DI=1;
else
DI=0;
Pulse();
temp>>=1;
}

temp=0x8000;/*DDDDDDDDDDDDDDDD(16bitsdata)*/
for(i=0;i<16;i++){
if(tx_data&temp)
DI=1;
else
DI=0;
Pulse();
temp>>=1;
}
CS=0;

EWDS();
}

/*----------------------------------------------------
Function:Read93LC46
Input:unsignedcharOffsetAddress
Output:unsignedint
Description:Read16bitsdatafrom93LC46offsetaddress
------------------------------------------------------*/
unsignedintRead93LC46(unsignedcharOffset_Addr)
{
unsignedcharAddr,i,temp;
unsignedintrx_data;

StartBit();/*1*/
Offset_Addr=Offset_Addr&0x3F;/*6bitsaddress*/
Addr=Offset_Addr+0x80;/*10AAAAAA,(opcode:10,address:AAAAAA)*/
temp=0x80;
for(i=0;i<8;i++){
if(Addr&temp)
DI=1;
else
DI=0;
Pulse();
temp>>=1;
}

rx_data=0x0000;/*DDDDDDDDDDDDDDDD(16bitsdata)*/
for(i=0;i<16;i++){
Pulse();
if(DO)
rx_data|=0x0001;
if(i<15)
rx_data<<=1;
}
CS=0;

return(rx_data);
}

voidInitPIC(void)
{
OPTION=(GPWU|GPPU|PS2|PS1|PS0);
TRIS=0x10;
CS=0;
CLK=0;
DI=0;
}

/*Mainroutine*/
voidmain(void)
{
unsignedcharaddr;
unsignedintrx_buf;

InitPIC();
/*Readawordthen+1andwritebackto93LC46*/
for(addr=0;addr<10;addr++)
{
rx_buf=Read93LC46(addr);
rx_buf=rx_buf+1;
Write93LC46(addr,rx_buf);
}

}

本站聲明: 本文章由作者或相關(guān)機(jī)構(gòu)授權(quán)發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點(diǎn),本站亦不保證或承諾內(nèi)容真實(shí)性等。需要轉(zhuǎn)載請(qǐng)聯(lián)系該專欄作者,如若文章內(nèi)容侵犯您的權(quán)益,請(qǐng)及時(shí)聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車(chē)的華為或?qū)⒋呱龈蟮莫?dú)角獸公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關(guān)鍵字: 阿維塔 塞力斯 華為

倫敦2024年8月29日 /美通社/ -- 英國(guó)汽車(chē)技術(shù)公司SODA.Auto推出其旗艦產(chǎn)品SODA V,這是全球首款涵蓋汽車(chē)工程師從創(chuàng)意到認(rèn)證的所有需求的工具,可用于創(chuàng)建軟件定義汽車(chē)。 SODA V工具的開(kāi)發(fā)耗時(shí)1.5...

關(guān)鍵字: 汽車(chē) 人工智能 智能驅(qū)動(dòng) BSP

北京2024年8月28日 /美通社/ -- 越來(lái)越多用戶希望企業(yè)業(yè)務(wù)能7×24不間斷運(yùn)行,同時(shí)企業(yè)卻面臨越來(lái)越多業(yè)務(wù)中斷的風(fēng)險(xiǎn),如企業(yè)系統(tǒng)復(fù)雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務(wù)連續(xù)性,提升韌性,成...

關(guān)鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報(bào)道,騰訊和網(wǎng)易近期正在縮減他們對(duì)日本游戲市場(chǎng)的投資。

關(guān)鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國(guó)國(guó)際大數(shù)據(jù)產(chǎn)業(yè)博覽會(huì)開(kāi)幕式在貴陽(yáng)舉行,華為董事、質(zhì)量流程IT總裁陶景文發(fā)表了演講。

關(guān)鍵字: 華為 12nm EDA 半導(dǎo)體

8月28日消息,在2024中國(guó)國(guó)際大數(shù)據(jù)產(chǎn)業(yè)博覽會(huì)上,華為常務(wù)董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語(yǔ)權(quán)最終是由生態(tài)的繁榮決定的。

關(guān)鍵字: 華為 12nm 手機(jī) 衛(wèi)星通信

要點(diǎn): 有效應(yīng)對(duì)環(huán)境變化,經(jīng)營(yíng)業(yè)績(jī)穩(wěn)中有升 落實(shí)提質(zhì)增效舉措,毛利潤(rùn)率延續(xù)升勢(shì) 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務(wù)引領(lǐng)增長(zhǎng) 以科技創(chuàng)新為引領(lǐng),提升企業(yè)核心競(jìng)爭(zhēng)力 堅(jiān)持高質(zhì)量發(fā)展策略,塑強(qiáng)核心競(jìng)爭(zhēng)優(yōu)勢(shì)...

關(guān)鍵字: 通信 BSP 電信運(yùn)營(yíng)商 數(shù)字經(jīng)濟(jì)

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺(tái)與中國(guó)電影電視技術(shù)學(xué)會(huì)聯(lián)合牽頭組建的NVI技術(shù)創(chuàng)新聯(lián)盟在BIRTV2024超高清全產(chǎn)業(yè)鏈發(fā)展研討會(huì)上宣布正式成立。 活動(dòng)現(xiàn)場(chǎng) NVI技術(shù)創(chuàng)新聯(lián)...

關(guān)鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長(zhǎng)三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會(huì)上,軟通動(dòng)力信息技術(shù)(集團(tuán))股份有限公司(以下簡(jiǎn)稱"軟通動(dòng)力")與長(zhǎng)三角投資(上海)有限...

關(guān)鍵字: BSP 信息技術(shù)
關(guān)閉
關(guān)閉