-- 本模塊的功能是驗(yàn)證實(shí)現(xiàn)和PC機(jī)進(jìn)行基本的串口通信的功能。需要在 --PC機(jī)上安裝一個(gè)串口調(diào)試工具來(lái)驗(yàn)證程序的功能。 -- 程序?qū)崿F(xiàn)了一個(gè)收發(fā)一幀10個(gè)bit(即無(wú)奇偶校驗(yàn)位)的串口控 --制器,10個(gè)bit是1位起始位,8個(gè)數(shù)據(jù)位,1個(gè)結(jié)束 --位。串口的波特律由程序中定義的div_par參數(shù)決定,更改該參數(shù)可以實(shí) --現(xiàn)相應(yīng)的波特率。程序當(dāng)前設(shè)定的div_par 的值是0x104,對(duì)應(yīng)的波特率是 --9600。用一個(gè)8倍波特率的時(shí)鐘將發(fā)送或接受每一位bit的周期時(shí)間 --劃分為8個(gè)時(shí)隙以使通信同步. --程序的工作過(guò)程是:串口處于全雙工工作狀態(tài),按動(dòng)SW0,CPLD向PC發(fā)送“welcome" --字符串(串口調(diào)試工具設(shè)成按ASCII碼接受方式);PC可隨時(shí)向CPLD發(fā)送0-F的十六進(jìn)制 --數(shù)據(jù),CPLD接受后顯示在7段數(shù)碼管上。
上傳時(shí)間: 2017-04-12
上傳用戶(hù):lgnf
procedure senddata var i:integer commflg : Boolean begin commflg:=true for i:=1 to 8 do begin if not fcomm comml writecommdata(sendbutter,i) then begin Commflg=false break end end end (4) 接收數(shù)據(jù) 在編寫(xiě)基于串口的計(jì)算機(jī)工業(yè)測(cè)控時(shí),通常需要由下位機(jī)向PC機(jī)發(fā)送數(shù)據(jù)以使PC機(jī)了解系統(tǒng)的測(cè)試數(shù)據(jù)或下位機(jī)的運(yùn)行狀態(tài),并進(jìn)而控制下位機(jī)的行為。利用Spcomm串口控件接收下位機(jī)發(fā)送的數(shù)據(jù)信息的示例代碼如下: //事件驅(qū)動(dòng)方式接收數(shù)據(jù)程序 procedure TForm1.CommlReceiveData(Sender:Tobject Buffer:Pointer bufferLength:Word) var receivedata:array of byte begin sleep(100) //等待100ms,保證接收到所有數(shù)據(jù) move(buffef ,receivedata,bufferlength) //將接收緩存區(qū)中的數(shù)據(jù)轉(zhuǎn)移到數(shù)組中 …… end (5) 關(guān)閉串口 在系統(tǒng)開(kāi)發(fā)中,應(yīng)注意在不使用串口時(shí)應(yīng)及時(shí)關(guān)閉串口,釋放系統(tǒng)資源,否則可能會(huì)影響系統(tǒng)的其它應(yīng)用。關(guān)閉串口的代碼如下: procedure TForm1.FormClose ( Sender TObj ect:var Action:TCIoseAction ) begin comml.StopComm end
標(biāo)簽: commflg procedure senddata integer
上傳時(shí)間: 2014-01-26
上傳用戶(hù):懶龍1988
結(jié)合"61板"的三個(gè)按鍵完成帶有語(yǔ)音播報(bào)功能的電子鐘:、KEY1--按一下播放年、月、日,再按一下播放時(shí)、分 (I/O口A0) // 連續(xù)按3s,則進(jìn)入調(diào)整狀態(tài) 調(diào)整狀態(tài)下調(diào)整內(nèi)容的切換 // 2、KEY2--年、月、日、時(shí)、分的增加(I/O口A0) // 3、KEY3--年、月、日、時(shí)、分的減少(I/O口A0)
標(biāo)簽: KEY1 按鍵 語(yǔ)音播報(bào) 電子鐘
上傳時(shí)間: 2014-01-14
上傳用戶(hù):qunquan
7S系列上四按鍵模擬鼠標(biāo)程序 代碼的效果:這個(gè)代碼是針對(duì)AT9S1AM7S64-IAR那個(gè)板的,在這個(gè)代碼里只要將4個(gè)按鍵和4個(gè)LED的定義改一下,改成你的板上真真的定義.比如你的按鍵是接在那個(gè)I/O上的. 然后運(yùn)行程序,在超級(jí)終端里,你按一下第一按鍵,PC機(jī)的鼠標(biāo)向左移動(dòng)一下,一直按著的話(huà),鼠標(biāo)一會(huì)就跑到屏幕最左邊了,同時(shí)LED一直滅著(按一下LED閃一下),第2個(gè)按鍵是向右的效果,第三個(gè)是向上的效果,第四個(gè)是向下的效果.好玩不?好好研究一下代碼吧
上傳時(shí)間: 2017-05-27
上傳用戶(hù):stella2015
delphi控件源碼:包含十四種控件的拓展功能:1、帶CheckBox的GroupBox。當(dāng)處于選中狀態(tài)時(shí),GroupBox中的控件是可用的,否則是不可用的。2、可自定義圖標(biāo)、文字的DBNavigator控件。3、可控制窗體中輸入焦點(diǎn)的跳轉(zhuǎn)順序。4、圖形按鈕控件,可指定正常狀態(tài)、鼠標(biāo)指向、鼠標(biāo)按下時(shí)的圖片。可做出類(lèi)似金山毒霸2001中的按鈕效果。...
標(biāo)簽: CheckBox GroupBox delphi 控件
上傳時(shí)間: 2014-01-05
上傳用戶(hù):bcjtao
g a w k或GNU awk是由Alfred V. A h o,Peter J.We i n b e rg e r和Brian W. K e r n i g h a n于1 9 7 7年為U N I X創(chuàng)建的a w k編程語(yǔ)言的較新版本之一。a w k出自創(chuàng)建者姓的首字母。a w k語(yǔ)言(在其所有的版本中)是一種具有很強(qiáng)能力的模式匹配和過(guò)程語(yǔ)言。a w k獲取一個(gè)文件(或多個(gè)文件)來(lái)查找匹配特定模式的記錄。當(dāng)查到匹配后,即執(zhí)行所指定的動(dòng)作。作為一個(gè)程序員,你不必操心通過(guò)文件打開(kāi)、循環(huán)讀每個(gè)記錄,控制文件的結(jié)束,或執(zhí)行完后關(guān)閉文件。
上傳時(shí)間: 2014-01-02
上傳用戶(hù):hwl453472107
題目:企業(yè)發(fā)放的獎(jiǎng)金根據(jù)利潤(rùn)提成。利潤(rùn)(I)低于或等于10萬(wàn)元時(shí),獎(jiǎng)金可提10 ;利潤(rùn)高于10萬(wàn)元,低于20萬(wàn)元時(shí),低于10萬(wàn)元的部分按10 提成,高于10萬(wàn)元的部分,可可提成7.5 ;20萬(wàn)到40萬(wàn)之間時(shí),高于20萬(wàn)元的部分,可提成5 ;40萬(wàn)到60萬(wàn)之間時(shí)高于40萬(wàn)元的部分,可提成3 ;60萬(wàn)到100萬(wàn)之間時(shí),高于60萬(wàn)元的部分,可提成1.5 ,高于100萬(wàn)元
標(biāo)簽: 利潤(rùn)
上傳時(shí)間: 2014-01-16
上傳用戶(hù):努力努力再努力
1.執(zhí)行「解kavo步驟1.bat」重開(kāi)機(jī) 2.執(zhí)行「解kavo步驟2.bat」 ★:病毒解完後,如有插入隨身碟時(shí)請(qǐng)按住「Shift鍵」不要放開(kāi)直到偵測(cè)完畢後 再執(zhí)行「刪除隨身碟中的autorun.bat」 將會(huì)刪除隨身碟(含所有磁碟)中的autorun.inf 順便建立同檔名的資料夾,用來(lái)防止再被被毒寫(xiě)入自動(dòng)執(zhí)行檔。
上傳時(shí)間: 2017-08-11
上傳用戶(hù):yan2267246
kruskal算法求解最小生成樹(shù) K r u s k a l算法每次選擇n- 1條邊,所使用的貪婪準(zhǔn)則是:從剩下的邊中選擇一條不會(huì)產(chǎn)生環(huán)路的具有最小耗費(fèi)的邊加入已選擇的邊的集合中。注意到所選取的邊若產(chǎn)生環(huán)路則不可能形成一棵生成樹(shù)。K r u s k a l算法分e 步,其中e 是網(wǎng)絡(luò)中邊的數(shù)目。按耗費(fèi)遞增的順序來(lái)考慮這e 條邊,每次考慮一條邊。當(dāng)考慮某條邊時(shí),若將其加入到已選邊的集合中會(huì)出現(xiàn)環(huán)路,則將其拋棄,否則,將它選入。
上傳時(shí)間: 2013-12-14
上傳用戶(hù):pompey
CSNG-I 伽馬能譜,自然伽馬能譜圖,U,Th,K
標(biāo)簽: CSNG-I 伽馬能譜
上傳時(shí)間: 2015-04-13
上傳用戶(hù):longge
蟲(chóng)蟲(chóng)下載站版權(quán)所有 京ICP備2021023401號(hào)-1