【正文】 break。) { Rec_flag = 1。 UART_Send_Byte(39。 P0 = LED_Table[two%10]。 while(1) { if(!key_flag) { LED_1 = 0。所以我覺(jué)得我應(yīng)該學(xué)更多！參考文獻(xiàn)[1] 楊曉輝,張彤,[J].長(zhǎng)春大學(xué)學(xué)報(bào),2000,10(6):24~25. [2] BASIC [M].北京:人民郵電出版社,2009:1~2.[3] 范逸之, Basic 與RS232串行通信控制[M].北京:清華大學(xué)出版社,2002:54~67.[4] 徐永洪,符影杰,江峰,[J].東南大學(xué)自動(dòng)控制系,2004,11(1):67~68.[5] 李群芳,、接口及應(yīng)用—嵌入式系統(tǒng)技術(shù)基礎(chǔ)[M].北京:清華大學(xué)出版社,2005:105~127.[6] [J].青島廣播電視大學(xué),2002,3:60~61.[7] 雷伏容,張小林,[M].北京:清華大學(xué)出版社,2010:276~278.[8] 于京,張景璐. 51系列單片機(jī)C程序設(shè)計(jì)與應(yīng)用案例[M].北京:中國(guó)電力出版社,2006:135.[9] 張毅坤,陳善久,[M].西安:西安電子科技大學(xué)出版社,1998:150.[10] 趙建國(guó), Basic實(shí)現(xiàn)PC機(jī)與單片機(jī)之間的串行通信[J].安陽(yáng)大學(xué)學(xué)報(bào),2003,1:38~40.[11] [M].武昌:華中科技大學(xué)出版社,2006.[12] 吳金成,沈慶陽(yáng),[M].北京:清華大學(xué)出版社,2002.[13] [M].西安:西安電子科技大學(xué)出版社,2002.[14] 陳慶章. Visual Basic程序設(shè)計(jì)基礎(chǔ)[M].浙江:浙江科學(xué)技術(shù)出版社,2004.[15] (第三版)[M].北京:清華大學(xué)出版社,2005.[16] ~rares/[17] ~cit/html/附錄1 單片機(jī)程序include //包含51相關(guān)頭文件include //包含定義頭文件include //包含公共頭文件//定義相關(guān)引腳define LED_OUT P0sbit Bit_1 = P2^4。 功能測(cè)試 距離測(cè)試本設(shè)計(jì)實(shí)現(xiàn)了單片機(jī)和PC機(jī)的實(shí)時(shí)通信，由于PC機(jī)上本身配置的RS232，使得單片機(jī)與電腦的距離可以拉長(zhǎng)15m，但通過(guò)實(shí)際測(cè)試，可以實(shí)現(xiàn)距離拉長(zhǎng)10m。對(duì)于MSComm的初始化程序中，另外的屬性在第2章中均有表述。)。但是有一個(gè)問(wèn)題必須要說(shuō)明：傳送速度很快，接收中斷后必須馬上返回再次等待中斷。此外在設(shè)計(jì)中。當(dāng)主持人按下上位機(jī)VB界面中的準(zhǔn)備按鍵，該綠色發(fā)光二極管就會(huì)點(diǎn)亮，告訴選手可以準(zhǔn)備開(kāi)始搶答了。ALE/PROG（Pin30）：地址鎖存允許信號(hào)。SMOD可以任選為0或1，看看SMOD不同的選擇，是否產(chǎn)生了不同的波特率誤差：9600=2SMOD106/（3212（256X））當(dāng)SMOD=0時(shí)，X=253=0FDH；當(dāng)SMOD=1時(shí)，X=250=0FAH。在傳送的過(guò)程中，信息是以數(shù)據(jù)形式傳送的。如引發(fā)接收或發(fā)送的字節(jié)數(shù)（6）打開(kāi)通信端口。類(lèi)型： short。下面介紹一下此控件的主要屬性[4]：CommPort：設(shè)置串口號(hào)，類(lèi)型short：11 22，其實(shí)VB的MSComm控件有16個(gè)串行端口，若使用的通信端口號(hào)碼超過(guò)16時(shí)，此控件會(huì)有錯(cuò)誤信息。隨著現(xiàn)在串行通信的使用越來(lái)越普遍，Microsoft公司便在VB中設(shè)計(jì)了一個(gè)MSComm通信控件，以便我們完成串行通信的設(shè)計(jì)[3]。面對(duì)新建的工程，腦中想著對(duì)象、屬性、時(shí)間、方法四個(gè)步驟，開(kāi)發(fā)程序的步驟如下：（1）拖動(dòng)窗體到適當(dāng)?shù)拇笮　?991年，Microsoft公司推出Visual ，它雖然存在一些缺陷，但仍受到了廣大程序員的青睞。每路搶答選手設(shè)有一個(gè)搶答按鍵和一個(gè)得分顯示器，方便選手們進(jìn)行搶答，了解自己的得分；而在主持人PC機(jī)界面上，設(shè)有默認(rèn)，重?fù)專(zhuān)骂}，串口設(shè)置，題目設(shè)置，準(zhǔn)備鍵，開(kāi)始鍵，確定鍵，加分鍵，減分鍵和還有一個(gè)選手積分卡，方便主持人在整個(gè)搶答過(guò)程中進(jìn)行控制，使整個(gè)搶答過(guò)程在公正、公平的環(huán)境下進(jìn)行。經(jīng)過(guò)布線、焊接、調(diào)試等工作后數(shù)字搶答器系統(tǒng)成形。系統(tǒng)分為兩大部分，即單片機(jī)部分和PC機(jī)兩大部分。從原理上講，它就是一種典型的數(shù)字電路，分為主體電路與擴(kuò)展電路兩部分。單片機(jī)的潛力越來(lái)越被人們所重視。隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展，Visual Basic（簡(jiǎn)稱(chēng)VB）就由此而生，它是Microsoft公司為開(kāi)發(fā)Windows應(yīng)用程序而提供的強(qiáng)有力的開(kāi)發(fā)環(huán)境和工具，具有很好的圖形用戶(hù)界面的程序設(shè)計(jì)語(yǔ)言。VB的控件很多，這次在界面設(shè)計(jì)中使用了其中的常用控件，比如組合框、文本框、標(biāo)簽框，圖形、定時(shí)器等控件，還用到菜單編輯器。（8）完成工程的設(shè)計(jì)工作后，再利用VB提供的“打包和展開(kāi)向?qū)А敝谱鞴こ痰陌惭b程序。 MSComm的屬性說(shuō)明使用MSCOMM控件主要是通過(guò)事件來(lái)處理串行口的交互，即當(dāng)數(shù)據(jù)到達(dá)時(shí)，控件的OnComm的事件就會(huì)來(lái)捕獲或處理這些通信事件。CommEvent：串口事件，類(lèi)型：short。（4）設(shè)置傳輸速度等參數(shù)。RXD此腳負(fù)責(zé)將傳送過(guò)來(lái)的遠(yuǎn)程信息進(jìn)行接收。試看下例：設(shè)波特率選為2400bps，fosc=6MHZ時(shí)，SMOD可以任選為0或1，但是由于對(duì)SMOD不同的選擇，產(chǎn)生了不同的波特率誤差：2400=2SMOD6106/（3212（256X））當(dāng)SMOD=0時(shí)，X≈249=F9H；當(dāng)SMOD=1時(shí)，X=243=F3H。（2）外接晶振引腳（2根）XTAL1(Pin18)：片內(nèi)振蕩電路的輸入端。另外。30V的輸入。 EA = 1。039。圖42 VB設(shè)計(jì)界面 初始設(shè)置程序在VB代碼的初始程序中，最重要的是將串行控件MSComm的端口COM1口打開(kāi)，然后對(duì)其他所用到的一些控件進(jìn)行程序初始化。如果在搶答時(shí)間內(nèi)有人搶答，VB界面會(huì)顯示出哪一組搶答成功，且VB界面上與該組對(duì)應(yīng)的紅色燈變成綠色，主持人根據(jù)選手回答的是否正確來(lái)給選手加分或者減分，最后按“確定”按鍵，電路中與該組所對(duì)應(yīng)的數(shù)碼管就會(huì)顯示出該組選手的得分?！钡侵皇且婚T(mén)罷了，看著有些做模擬電子設(shè)計(jì)的同學(xué)，他們的電路不算復(fù)雜，但是很難調(diào)試，有時(shí)我自己的做累了，會(huì)去看看他們的進(jìn)展，但是卻幫不了什么忙。void display(Uint8 one, Uint8 two)。 Bit_3 =0。 TI = 0。) { key_flag = 0。) + (Loot_Tab[1] 39。 ElseIf COM_Rec = 2 Then = W amp。 if(tally == 2) { tally = 0。 } while(!key_1)。 Bit_4 =1。 } display(Varone,Vartwo)。sbit Bit_4 = P2^7。選這個(gè)設(shè)計(jì)題目的時(shí)候，楊老師就勸告過(guò)我，這個(gè)題目涉及到VB，得做一定的考慮。其部分程序如下所示。039。S39。以下分別就兩部分的核心程序及其功能進(jìn)行闡述。圖33 準(zhǔn)備搶答圖 單片機(jī)與PC機(jī)通訊的實(shí)現(xiàn)[7]眾所周知，計(jì)算機(jī)無(wú)法分辨所謂的數(shù)字和文字，在其內(nèi)部的記錄中所有的數(shù)據(jù)都是0和1。（4）可編程輸入/輸出引腳（32根）STC89C52單片機(jī)有4組8位的可編程I/O口，分別位P0、PPP3口，每個(gè)口有8位（8根引腳），共32根。實(shí)際的波特率及誤差如下：SMOD=%；SMOD=%經(jīng)過(guò)多次的運(yùn)算證明，對(duì)于常用的標(biāo)準(zhǔn)波特率，都能正確地計(jì)算出T1的計(jì)數(shù)初值，所以這個(gè)晶振是最常用的，特別適用在串行電路中，精度非常高。值得注意的是：通信距離較近時(shí)（12m），是可以用電纜線直接連接標(biāo)準(zhǔn)RS232端口（RS422，RS485較遠(yuǎn)），若距離較遠(yuǎn)，需附加調(diào)制解調(diào)器（MODEM）。使用Input及Output屬性。類(lèi)型：short。PortOpen: 設(shè)置或返回串口狀態(tài),類(lèi)型BOOL：TRUE打開(kāi)，F(xiàn)ALSE關(guān)閉。（2）在工程菜單中選擇[部件]命令。如：Name屬性、Color屬性、Caption屬性等。Visual ，其功能和性能都大大增強(qiáng)了，它還提供了新的、靈巧的數(shù)據(jù)庫(kù)和Web開(kāi)發(fā)工具。這個(gè)搶答系統(tǒng)模塊體積比較小，攜帶比較方便，而且當(dāng)今社會(huì)，PC機(jī)的擁有率越來(lái)越高，使得這個(gè)搶答系統(tǒng)使用起來(lái)更為方便。這樣的搶答器制作簡(jiǎn)單，搶答的功能也能基本實(shí)現(xiàn)，基本上能完成小型搶答的場(chǎng)合。單片機(jī)部分采用的是功能強(qiáng)大，集成度極高的STC89C52單片機(jī)。于是搶答器應(yīng)運(yùn)而生，并且其設(shè)計(jì)方案越來(lái)越多樣化，功能越來(lái)越智能化，而且外觀也越來(lái)越人性化。那什么是單片機(jī)呢？它是一塊芯片上集成了一臺(tái)微型計(jì)算機(jī)所需的中央處理器（CPU）、存儲(chǔ)器（RAM、ROM）、定時(shí)器/計(jì)數(shù)器、中斷系統(tǒng)和各種輸入/輸出（I/O）接口等。Visual Basic在原有BASIC語(yǔ)言的基礎(chǔ)上進(jìn)一步發(fā)展，至今包含了數(shù)百條語(yǔ)句、函數(shù)及關(guān)鍵詞，其中很多和Windows GUI有直接關(guān)系。VB的接口成員有：屬性、事件、方法。（6）在修改與測(cè)試的過(guò)程中，中斷是經(jīng)常使用到的功能。（2）程序通過(guò)檢查CommEvent屬性的值來(lái)輪詢(xún)事件和錯(cuò)誤。OutBufferCount：發(fā)送緩沖區(qū)中的字節(jié)數(shù)，類(lèi)型： short。即CommPort屬性。不過(guò)串口傳輸數(shù)據(jù)只要有接收數(shù)據(jù)針腳和發(fā)送針腳就能實(shí)現(xiàn)，比如同一個(gè)串口的接收腳和發(fā)送腳直接用線相連，或者兩個(gè)串口相連或一個(gè)串口和多個(gè)串口相連。在接收一幀數(shù)據(jù)的過(guò)程中，由于誤差的積累，便產(chǎn)生了錯(cuò)碼。該器件采用ATMEL高密度非易失存儲(chǔ)器制造技術(shù)制造，與工業(yè)標(biāo)準(zhǔn)的MCS51指令集和輸出管腳相兼容。作為STC89C52和RS232通信的接口。 MAX232是一種雙組驅(qū)動(dòng)器/接收器，片內(nèi)含有一個(gè)電容性電壓發(fā)生器以便在單5V電源供電時(shí)提供TIA232F電平。 TL1 = 0xFD。 if(tally == 2) { tally = 0。 VB軟件設(shè)計(jì)VB部分主要完成對(duì)搶答初始狀態(tài)的以及搶答時(shí)間、分值等的設(shè)置。然后選擇“設(shè)置串口”菜單欄，可以對(duì)端口、波特率、計(jì)時(shí)時(shí)間、每次加的分?jǐn)?shù)和每次減的分?jǐn)?shù)進(jìn)行設(shè)置。幸運(yùn)的是我打聽(tīng)到有同學(xué)曾經(jīng)做過(guò)一個(gè)把PC機(jī)作為上位機(jī)的溫度控制系統(tǒng)，于是向他請(qǐng)教了許多，還好他也很耐心。//函數(shù)聲明void UART_Init(void)。delay_ms(1)。 EA = 1。}//串口中斷服務(wù)程序void UART(void) interrupt 4{ if(RI) { RI = 0。 break。 erzu Else = erzu End If End IfEnd Sub減分Private Sub Button_DEC_Click() If COM_Rec = 1 Then If yizu 0 Then yizu = tally_dec If yizu = 9 Then = 0 amp。039。 UART_Send_Byte(39。 TH1 = 0xFD。delay_ms(1)。sbit LED_1 = P3^4。因?yàn)槭且婚_(kāi)始就聽(tīng)得這個(gè)