【文章內容簡介】 圖 49 門診程序流程 （ 4） 抓藥管理窗口 12 圖 410 抓藥管理窗口 圖 411 藥房管理程序流程 （ 5） 居民自助查詢窗口 13 圖 412 居民自助查詢窗口 圖 413 居民自助查詢服務程序流程 14 圖 414 系統(tǒng)工作流程 單片機控制的 RFID 卡讀寫模塊軟件實現(xiàn) 系統(tǒng)初始化 與卡進行通信的第一步則是驅動天線檢測到卡，為了驅動天線， MF RC522 通過 TXl 和 TX2提供 13． 56MHz 的能量載波。根據寄存器的設定對發(fā)送數(shù)據進行調制得到發(fā)送的信號。該卡采用 RF 場的負載調制進行響應。天線拾取的信號經天線匹配電路送到 RX 引腳。 MF RC522內部接收器對信號進行檢測和解調并根據寄存器的設定進行處理。然后數(shù)據通過 SPI 接口發(fā)送到單片機。系統(tǒng)初始化要激活 MF RC522，開啟 MF RC522 中的內部接收器，用于接收信號和轉換信號，設置命令接收和有效為初始狀態(tài)，設置發(fā)送信號和通信準備就緒，等待接收命令，設置接收狀態(tài)準備等一系列狀態(tài)和信號。如圖 416 所示： 15 圖 416 下位 機系統(tǒng)初始化 讀射頻卡程序設計 每張卡片的序列號是唯一的且卡片的序列號存儲在卡片的 EEPROM 的扇區(qū) 0 的塊 0。在本系統(tǒng)中射頻卡的序列號就是居民的身份 ID，在大部分情況下都要用到這個序列號。所以讀取射頻卡序列號也是下位機的主要工作之一。流程圖如圖 417。 圖 417 讀卡序列號 16 下位機串口通信程序 單片機可以采用中斷方式或查詢 RI（接受中斷標志位）或 TI（發(fā)送中斷標志位）方式進行數(shù)據通信②。設計采用查詢方式，在定時器 T2 中斷子程序中查詢 RI，一旦檢測到 RI=1則轉入接受數(shù)據子 程序，在子程序中單片機讀取從上位機發(fā)送的通信指令等數(shù)據，經校驗正確后，即從 ATC256 存儲器中將歷史記錄數(shù)據上傳給 PC 機。 17 結論及存在問題 通過本系統(tǒng)的設計和本文的撰寫，全面的學習了 RFID 系統(tǒng)的基本原理和實現(xiàn)方法，特別是對于非接觸式 IC 卡類型的 RFID 系統(tǒng)有了一定的認識。完成了射頻卡讀卡器系統(tǒng)的設計及開發(fā)的論文。在這次開發(fā)和論文撰寫過程中，我查閱了大量的書籍資料和技術手冊，并搜集了大量的設計模型，使我軟硬件設計水平有了較大幅度 的提高。 本文在對射頻識別系統(tǒng)的組成和原理分析的基礎上，提出了基于 STC89c51 單片機和MF RC522 模組的 Mifarel 卡射頻識別系統(tǒng)的設計方法。設計采用 MFRC522 射頻讀寫模組在 STC89c51 單片機的控制下實現(xiàn)對 Mifarel 卡的讀／寫訪問操作。本文主要討論了整個系統(tǒng)的工作原理，各硬件模塊設計實現(xiàn)，驅動程序實現(xiàn)等問題。 在本系統(tǒng)設計中還存在一些的遺留問題如： 1）登錄密碼未能采用密文輸入，容易泄露用戶信息； 2）居民自助查詢未采用密碼登錄； 3）系統(tǒng)未實現(xiàn)對射頻卡的寫數(shù)據操作。另外有些地方的設計并不完 善，有待在以后進一步的改進和完善。 18 參考文獻 [1] 周曉光，王曉華，王偉 .射頻識別（ RFID）系統(tǒng)設計 [M].仿真與應用 [M].北京：人民郵電出版社， 20xx. [2] 單承贛 ,單玉峰 ,姚磊 .射頻識別 RFID原理與應用 [M].北京：電子工業(yè)出版社， 20xx [3] 彭力 .無線射頻識別 RFID技術基礎 (普通高校十二五規(guī)劃教材 )[M].北京：北京航空航天大學， 20xx [4] 王志良 .RFID 讀寫器制作實訓教程 (國家級特色專業(yè)（物聯(lián)網工程）規(guī)劃教材 )[M].北京：機械工業(yè)出版社 .20xx [5] RFID 標準 ISO14443[S]. [6] 基于虛擬無線電的 RFID 讀寫器實現(xiàn)方案 [J/OL]. EEPW 新聞中心 , 20xx16 [7] 丁元杰 .單片微機原理及應用 3 版 [M].北京：機械工業(yè)出版社， 20xx [8] 賈立 新，王涌 .電子系統(tǒng)設計與實踐第 2 版 [M].北京：清華大學出版社， 20xx [9] 王珊 .數(shù)據庫系統(tǒng)概論第四版 [M].北京：高等教育出版社， 20xx [10] 閃四清 .SQL Server 20xx 系統(tǒng)管理指南 [M].北京：清華大學出版社， 20xx [11] 畢建偉，夏慧茹，梁建國 .Visual Basic 語言程序設計基礎（第 3 版） [M].北京：電子工業(yè)出版社， 20xx [12] 劉志嫵 .基于 VB 和 SQL 的數(shù)據庫編程技術（高等學校計算機基礎教育教材精選） [M].北京：清華大學出版社， 20xx [13]（英）卡 特（ Carter,J.）著；張淮野譯 .數(shù)據庫設計與編程實例詳解：使用 Access、SQL 與 VB[M].北京：電子工業(yè)出版社， 20xx [14] 張輝、李榮利、王和平 .Visual Basic 串口通信及編程實例 [M].北京：化學工業(yè)出版社， 20xx 19 致謝 從開始寫作至論文最終定稿，總共花費了我一個月以來所有的業(yè)余時間，雖說在繁忙的工作之余要完成這樣一篇論文的確不是一件很輕松的事情，但我內心深處卻滿含深深的感激之情。感謝電子與信息工程學院所有的任課老師，是你們讓我能夠靜靜地坐下來，在知識的海洋里吸取更 多的營養(yǎng)，從而能夠為自己進一步的加油充電。感謝楊老師從開題、設計到寫論文過程中的指導和關心。通過論文的撰寫，使我能夠等系統(tǒng)、全面的學習有關財務管理新型的、先進的前沿理論知識，并得以借鑒眾多專家學者的寶貴經驗，這對于我今后的工作和我為之服務的企業(yè)，無疑是不可多得的寶貴財富。由于本理論水平比較有限，論文中的有些觀點以及對企業(yè)實力的歸納和闡述難免有疏漏和不足的地方，歡迎老師和專家們指正。 20 附錄 1 系統(tǒng)作品圖 刷卡前： 刷卡后： 21 附錄 2 上位機程序 串口設置 ： Private Sub Serial_Port1_Init() 39。設Θ 置 ?串 ?口參 ?數(shù)簓 Dim str As String str = = Val() 39。波168。特 ?率234。 = str 39。串 ?口名 ?稱 ? = 8 39。數(shù)簓據 Y位 ? = 39。 止 1位 ? = 39。?！牝?33。位 ? End Sub 打開串口： Private Sub Button13_Click_1(ByVal sender As , ByVal e As ) Handles Dim TimeBuf(10) As Char Try If = True Then TimeBuf(0) = T TimeBuf(1) = Chr(Val()) TimeBuf(2) = Chr(Val()) TimeBuf(3) = Chr(Val()) TimeBuf(4) = Chr(Val()) TimeBuf(5) = Chr(Val()) TimeBuf(6) = Chr(Val()) TimeBuf(7) = Chr(Val() 20xx) (TimeBuf, 0, 10) Else (串 ?口未′打洙 開 a！ ?) End If Catch ex As Exception () End Try End Sub Private Sub Button21_Click(ByVal sender As , ByVal e As ) 22 Handles Try If = Or = Then (帳234。號 ?或242。密252。碼 ?不 ?能252。為 a空 ?！ ?) Else If = OldUsername And = Oldpassword Then (驗233。證164。成233。功 |！ ?) = = () Else (驗233。證164。失骸 敗悒 ！ ?) = End If End If Catch ex As Exception () End Try End Sub 就診： Private Sub ComReceive1(ByVal sender As Object, ByVal e As EventArgs) Dim i As Integer = 0 Dim Rxbuf(10) As Byte Dim TxBuf(10) As Char Dim CardNo As String = Dim CardType As String = Dim UserName As String = Dim CarNo As String = Dim CardMoney As String = Dim CardStatus As String =