【正文】 R0 = 1。 a++。i8。//取數(shù)據(jù)的最低位Data=1。 //再置為高，產(chǎn)生時(shí)鐘上升沿，上升沿時(shí)，數(shù)據(jù)并行輸出} 數(shù)據(jù)處理程序設(shè)計(jì)此設(shè)計(jì)中，對(duì)進(jìn)出人流量數(shù)據(jù)的處理是本次設(shè)計(jì)程序下位機(jī)部分的核心。39。+39。}，如果檢測(cè)到k不在等于初值39。+39。此段程序?yàn)椋?switch ( k ) //判斷進(jìn)出，執(zhí)行具體功能 { case 39。 SBUF=0x01。: OUT++。 default: break。 uchar tenPlace = s / 10 % 10。} 上位機(jī)程序設(shè)計(jì) 本次設(shè)計(jì)用vb語(yǔ)言編寫(xiě)上位機(jī)，即用戶(hù)窗口。在Visual Basic環(huán)境下，利用事件驅(qū)動(dòng)的編程機(jī)制、新穎易用的可視化設(shè)計(jì)工具，使用Windows內(nèi)部的廣泛應(yīng)用程序接口（API）函數(shù)，動(dòng)態(tài)鏈接庫(kù)（DLL）、對(duì)象的鏈接與嵌入（OLE）、開(kāi)放式數(shù)據(jù)連接（ODBC）等技術(shù)，可以高效、快速地開(kāi)發(fā)Windows環(huán)境下功能強(qiáng)大、圖形界面豐富的應(yīng)用軟件系統(tǒng)[8]。利用它可以進(jìn)行諸如撥打電話(huà)、監(jiān)視串行端口的輸入數(shù)據(jù)程序，以及創(chuàng)建功能完備的終端程序等[9]。從用戶(hù)角度來(lái)看，這個(gè)控件是由一個(gè)文本輸入控件和一個(gè)下拉菜單組成的。波特率以及選擇串口選項(xiàng)的界面如圖35：圖35 波特率以及選擇串口選項(xiàng)的界面波特率以及選擇串口選項(xiàng)的源程序如下：Select Case Case 0 = 1 Case 1 = 2 Case 2 = 3 Case 3 = 4End SelectSelect Case Case 0 = 4800, n, 8, 1 Case 1 = 9600, n, 8, 1End Select在打開(kāi)串口這個(gè)功能上我們選用了CommandButton簡(jiǎn)單控件以及shape控件。CommandButton控件是vb中最常用的控件之一。無(wú)論何時(shí)，只要用戶(hù)單擊按鈕，就會(huì)調(diào)用 Click 事件過(guò)程。16進(jìn)制傳輸數(shù)據(jù) = 關(guān)閉串口 = 0 39。其中一個(gè)字節(jié)表示是否將數(shù)據(jù)（統(tǒng)計(jì)的人數(shù)）清零。下位機(jī)清零Fwordsend(2) = baohesendBuffer = Fwordsend() = sendBuffer而下位機(jī)向上位機(jī)通信時(shí)只發(fā)送一個(gè)字節(jié)數(shù)據(jù)。檢測(cè)接收緩存區(qū)Rwordsend(1) = receivebuffer(0)If Rwordsend(1) = 1 ThenINren = INren + 1STAYren = STAYren + 1 控制及功能程序部分控制命令大多數(shù)是由CommandButton控件構(gòu)成，同時(shí)通過(guò)CommandButton控件協(xié)調(diào)時(shí)間，顯示，通信等功能。也是上位機(jī)向下位機(jī)通信時(shí)要發(fā)送的數(shù)據(jù)內(nèi)容。實(shí)時(shí)記錄功能在列表中寫(xiě)入數(shù)據(jù)，當(dāng)用戶(hù)在需要時(shí)可以通過(guò)列表清零按鈕將列表清空。即baoheStr（用于記錄是否飽和的字符串）的值為“無(wú)”。同理也借用Format函數(shù)將INrenStr（表示進(jìn)入圖書(shū)館的人數(shù)），OUTrenStr（表示離開(kāi)圖書(shū)館的人數(shù)），STAYrenStr（表示余留在圖書(shū)館的人數(shù)）轉(zhuǎn)化為字符型方便表格中表示。 Date amp。 INrenStr amp。 STAYrenStr amp。即xuhao = xuhao + 1。 amp。轉(zhuǎn)化為字符型方便表格中表示 eg：其中00為多少位，xuhao為數(shù)值INrenStr = Format(INren, 00)OUTrenStr = Format(OUTren, 00)STAYrenStr = Format(STAYren, 00) = amp。 amp。 amp。 amp。清空記錄表xuhao = 1End Sub飽和警報(bào)啟動(dòng)功能也用的是CommandButton控件。來(lái)改變報(bào)警燈的狀態(tài)。然后然后將此信息發(fā)給下位機(jī)，即將Fwordsend的值賦給sendBuffer。報(bào)警燈判斷 = vbWhiteElse: = vbRedEnd If = 0 39。對(duì)比設(shè)定的飽和人數(shù)與余留人數(shù)的關(guān)系，當(dāng)余留人數(shù)小于飽和人數(shù)時(shí)，將報(bào)警燈改為白色，解除報(bào)警狀態(tài)。清除發(fā)送緩沖區(qū)Fwordsend(1) = 1 39。在vb程序的根目錄下生成記錄表Print 1, 序號(hào)日期時(shí)間進(jìn)入人次離去人次余留人數(shù)是否飽和 amp。本次設(shè)計(jì)為用戶(hù)提供了10分鐘，30分鐘，1小時(shí)，3小時(shí)，6小時(shí)的時(shí)間間隔。當(dāng)用戶(hù)開(kāi)始時(shí)，程序自動(dòng)每到設(shè)定的時(shí)間間隔，就會(huì)執(zhí)行在記錄表中寫(xiě)入數(shù)據(jù)的命令，并且將開(kāi)始按鈕改為綠色。5s Case 1 = 1000 XYM = 600 39。3h Case 5 = 1000 XYM = 21600 39。其顯示的的內(nèi)容也是用戶(hù)用戶(hù)使用該設(shè)計(jì)的的目的所在。當(dāng)人數(shù)達(dá)到飽和時(shí)，其顏色變?yōu)榧t色，當(dāng)未達(dá)到飽和時(shí)，其顏色變?yōu)榘咨４硕喂δ転槠渌δ芴幚砗蟮淖罱K結(jié)果，所以其核心代碼蘊(yùn)含于整個(gè)程宇之中，在附錄中會(huì)給出完整程序。軟件硬件完成后開(kāi)始進(jìn)行調(diào)試。 proteus仿真Proteus 是英國(guó)Labcenter公司開(kāi)發(fā)的電路分析與實(shí)物仿真軟件。具有模擬電路仿真、數(shù)字電路仿真、單片機(jī)及其外圍電路組成的系統(tǒng)的仿真、RS232動(dòng)態(tài)仿真、I2C調(diào)試器、SPI調(diào)試器、鍵盤(pán)和LCD系統(tǒng)仿真的功能；有各種虛擬儀器，如示波器、邏輯分析儀、信號(hào)發(fā)生器等?？傊?，該軟件是一款集單片機(jī)和SPICE分析于一身的仿真軟件，功能極其強(qiáng)大[10]。方針是一步先將該設(shè)計(jì)所需的原件在proteus的原件庫(kù)中找出，根據(jù)設(shè)計(jì)的硬件原理將其連接好，即硬件原理圖制作好。在此次仿真中我們按照步驟制作好了原理圖（由于紅外對(duì)射傳感器和點(diǎn)評(píng)開(kāi)關(guān)在邏輯上的作用是相同的，而且紅外對(duì)射傳感器在此軟件的元件庫(kù)中不易找到，所以此處用電平開(kāi)關(guān)暫且代替。如下圖41所示：圖41 仿真結(jié)果圖 硬件平臺(tái)調(diào)試硬件調(diào)試主要是調(diào)試各部分的焊接是否合格和各芯片的輸出輸入電壓是否符合設(shè)計(jì)要求，最后測(cè)試各硬件部分能否完成設(shè)計(jì)功能。 短路與虛焊檢測(cè)本次設(shè)計(jì)檢測(cè)短路與虛焊選用的是優(yōu)利德UT39A萬(wàn)用表數(shù)字UT39C高精度數(shù)顯表萬(wàn)能表UT39B多用表UT39E。短路的危害：1．巨大的短路電流通過(guò)導(dǎo)體，短時(shí)間內(nèi)產(chǎn)生很大熱量，形成很高溫度，極易造成設(shè)備過(guò)熱而損壞。5．短路時(shí)會(huì)造成停電事故，給國(guó)民經(jīng)濟(jì)帶來(lái)?yè)p失。造成虛焊的原因：虛焊主要是由待焊金屬表面的氧化物和污垢造成的，它的焊點(diǎn)成為有接觸電阻的連接狀態(tài)，導(dǎo)致電路工作不正常，出現(xiàn)時(shí)好時(shí)壞的不穩(wěn)定現(xiàn)象，噪聲增加而沒(méi)有規(guī)律性，給電路的調(diào)試、使用和維護(hù)帶來(lái)重大隱患。這一過(guò)程有時(shí)可長(zhǎng)達(dá)一、二年。本次設(shè)計(jì)是否存在虛焊的檢測(cè)方法：萬(wàn)用表可用電阻檔選用比如R*1檔位，表筆分別觸及焊點(diǎn)和對(duì)應(yīng)的元件腳，如果元件未虛焊，則測(cè)得電阻為0；如果測(cè)得電阻為無(wú)窮大，則證明存在虛焊。顯示系統(tǒng)中單片機(jī)、譯碼器，鎖存器，驅(qū)動(dòng)電路的電源電壓均要求為5V所以可同時(shí)直接接入。測(cè)試的結(jié)果為：～。如果發(fā)送的數(shù)據(jù)能夠被接收則證明串口通信部分的硬件是正常的。其中測(cè)試串口程序的功能是否完善不但要連接單片機(jī)系統(tǒng)還要借助串口調(diào)試工具。串口程序的設(shè)計(jì)為：設(shè)定波特率位4800，,單片機(jī)接收自起始標(biāo)志位后的1位十六進(jìn)制數(shù)再發(fā)送會(huì)PC機(jī)。測(cè)試表明串口程序和串口電路實(shí)現(xiàn)了設(shè)計(jì)目的。串口軟件調(diào)試結(jié)果成功，如圖43所示：圖43 串口調(diào)試圖 系統(tǒng)聯(lián)調(diào) 經(jīng)過(guò)硬件調(diào)試和。串口程序測(cè)試成功后為顯示程序提供了準(zhǔn)確的顯示內(nèi)容。PC機(jī)向單片機(jī)發(fā)送的內(nèi)容為0a。并且能把發(fā)送和接收的數(shù)據(jù)內(nèi)容顯示在狀態(tài)欄內(nèi)。串口硬件調(diào)試圖42如下：圖42 串口硬件調(diào)試圖 軟件系統(tǒng)調(diào)試 由于已經(jīng)進(jìn)行了硬件調(diào)試，所以軟件調(diào)試主要是軟件編譯和將各功能塊程序分別寫(xiě)入以驗(yàn)證其功能的可實(shí)現(xiàn)性。具體電路圖如圖52所示，將MAX232的第10端和第9端直接短接。經(jīng)過(guò)觀察，沒(méi)有這些現(xiàn)象出現(xiàn)。檢測(cè)和修改完成后為下一步通電檢測(cè)排除了短路的危險(xiǎn)和由于虛焊引起檢測(cè)結(jié)果不真實(shí)的麻煩。所以，虛焊是電路可靠性的一大隱患，必須嚴(yán)格避免。但在溫度、濕度和振動(dòng)等環(huán)境條件推選用下，接觸表面逐步被氧化，接觸慢慢地變得不完全起來(lái)。短路檢測(cè)方法：檢測(cè)工具為萬(wàn)用表，使用萬(wàn)用表的短路報(bào)警功能，逐個(gè)測(cè)試相臨的兩個(gè)焊點(diǎn)檢測(cè)是否短路。這對(duì)于附近的通訊線路、鐵路訊號(hào)系統(tǒng)及其他電子設(shè)備、自動(dòng)控制系統(tǒng)可能產(chǎn)生強(qiáng)烈干擾。例如作為主要?jiǎng)恿υO(shè)備的異步電動(dòng)機(jī)，其電磁轉(zhuǎn)矩與端電壓平方成正比。2．由于短路電流的電動(dòng)力效應(yīng)，導(dǎo)體間將產(chǎn)生很大的電動(dòng)力。2. 再一種情況是，電阻A（或用電器）在接入電路時(shí)，與其并聯(lián)的有一導(dǎo)線，但這時(shí)還有其它電阻與其串聯(lián)，所以此時(shí)電源沒(méi)有被短路，但當(dāng)電路閉合時(shí)，電流并不經(jīng)過(guò)電阻A，所以我們說(shuō)該電阻被導(dǎo)線短路。（5）測(cè)試紅外模塊是否正常。D1燈亮?xí)r表示余留人數(shù)超出了限度。若有錯(cuò)誤，則不會(huì)出現(xiàn)預(yù)期結(jié)果，需要從新檢查硬件以及下位機(jī)程序的錯(cuò)誤所在。由于我們此次設(shè)計(jì)pcb的設(shè)計(jì)選用了更為常用的altium designer軟件。目前支持的單片機(jī)類(lèi)型有：ARM7(LPC21xx)、 8051/52系列、AVR系列、PIC10/12/16/18系列、HC11系列以及多種外圍芯片。我們常使用ISIS仿真軟件進(jìn)行仿真、分析各種模擬器件和集成電路。 硬件原理以及軟件聯(lián)合仿真硬件設(shè)計(jì)和軟件編寫(xiě)完成后，若直接制作硬件電路一旦出錯(cuò)，不僅需要從新檢查錯(cuò)誤，同時(shí)還浪費(fèi)大量時(shí)間和經(jīng)費(fèi)采購(gòu)原件焊接電路。仿真成功后，可完成實(shí)物。記錄表板塊所顯示的內(nèi)容更為詳細(xì)共七項(xiàng)。飽和警報(bào)為用戶(hù)標(biāo)識(shí)著人數(shù)是否飽和的狀態(tài)，所以引用了shape控件，將其制為圓形。變成綠色，表示自動(dòng)記錄開(kāi)始End Sub 顯示模塊本設(shè)計(jì)的上位機(jī)中，人員狀態(tài)板塊和記錄表板塊為上位機(jī)的顯示模塊。30m Case 3 = 1000 XYM = 3600 39。該段核心代碼如圖所示：Private Sub AutoKS_Click()Select Case 39。引用的兩個(gè)時(shí)鐘控件Timer1. Timer2，其中Timer1用來(lái)顯示當(dāng)前時(shí)間，在功能上把Timer2當(dāng)成計(jì)數(shù)器，每隔1000毫秒為一個(gè)周期。 Close 1End Sub自動(dòng)記錄功能選用了一個(gè)ComboBox控件，兩個(gè)CommandButton控件，兩個(gè)Timer控件。當(dāng)用戶(hù)需要將列表記錄的人流量存儲(chǔ)轉(zhuǎn)移時(shí)，點(diǎn)擊列表保存功能可以直接將列表中的人流量信息寫(xiě)入text文件中，生成在根目錄下。此段功能的核心代碼如下：Private Sub RENSHUQL_Click() = 0 = 0 = 0INren = OUTren = STAYren = If STAYren baohe Then 39。當(dāng)用戶(hù)單擊此控件時(shí)，會(huì)觸發(fā)clink事件。報(bào)警燈判斷 = vbWhiteElse: = vbRedEnd If = 0 39。與下位機(jī)實(shí)時(shí)同步標(biāo)準(zhǔn)。在此事件中，程序會(huì)處理處理4個(gè)事件：，由飽和警報(bào)啟動(dòng)變?yōu)轱柡途瘓?bào)取消，即程序改變此控件的Caption屬性， = 飽和警報(bào)啟動(dòng) = 飽和警報(bào)取消。寫(xiě)入表格 = amp。 amp。 amp。 amp。 amp。然后將列表序號(hào)初始化，即xuhao變量改為1.其單擊事件的核心代碼為：Private Sub JILU_Click()If baohe = 99 Then 39。 baoheStr39。 OUTrenStr amp。 Time amp。 xuhaoStr amp。當(dāng)存儲(chǔ)余留人數(shù)的變量STAYren大于或等于飽和人數(shù)變量baohe時(shí)，圖書(shū)館人數(shù)達(dá)到飽和，baoheStr的值為“有”；當(dāng)存儲(chǔ)余留人數(shù)的變量STAYren小于飽和人數(shù)變量baohe時(shí)，圖書(shū)館人數(shù)沒(méi)有達(dá)到飽和，baoheStr的值為“無(wú)”。首先判斷飽和人數(shù)（由于用2位八段數(shù)碼管，所以飽和人數(shù)最大為99）是否設(shè)定。所以飽和人數(shù)的設(shè)定選用了TextBox控件。下面，通過(guò)一一介紹各個(gè)功能，來(lái)了解上位機(jī)的控制命令程序。當(dāng)發(fā)送“2”時(shí)，表示有人離開(kāi)圖書(shū)館，離去人數(shù)增加1，余留人數(shù)減少1，進(jìn)入人數(shù)不變。上位機(jī)向下位機(jī)發(fā)送數(shù)據(jù)的源程序?yàn)椋?= 0 39。當(dāng)接收到1個(gè)字節(jié)的數(shù)據(jù)時(shí)，產(chǎn)生OnComm事件本次設(shè)計(jì)中，上位機(jī)與下位機(jī)是雙向通信。在這里用戶(hù)單擊標(biāo)有打開(kāi)串口的CommandButton控件時(shí)，程序就會(huì)執(zhí)行四部分內(nèi)容：；2選擇串口端；3選擇波特率；4根據(jù)端口的工作狀態(tài)調(diào)整shape控件的顏色其核心代碼如下：Private Sub btnOpenSerial_Click()If = 關(guān)閉串口 Then = False = amp。用戶(hù)通過(guò)簡(jiǎn)單的敲擊按鈕來(lái)執(zhí)行操作。當(dāng)我們單擊打開(kāi)串口時(shí)，shape控件變?yōu)榫G色；當(dāng)串口處于關(guān)閉狀態(tài)時(shí)，shape控件變?yōu)榧t色。用戶(hù)使用時(shí)也十分方便。這是串行通信控件MSComm可以運(yùn)行的前提，在本設(shè)計(jì)的用戶(hù)界面上也可看到串口選項(xiàng)模塊中的選擇串口，打開(kāi)串口，波特率，三個(gè)操作對(duì)象。使用MSComm控件進(jìn)行串口編程時(shí)非常方便，程序員不必花更多時(shí)間去了解較為復(fù)雜的API函數(shù)，而且在VB、VisualC++、Delph