【正文】 時(shí)等待串口與定時(shí)器中斷發(fā)生） (4)并行事件： A:進(jìn)入按鍵事件 （選擇數(shù)據(jù)庫(kù)、刷新、插入數(shù)據(jù)、錄音、播放、連接串口、撥號(hào)等等） B:進(jìn)入定時(shí)器中斷 （ 根據(jù)撥打電話不同的流程及狀態(tài)做不同的事情，如切換到下一條呼叫數(shù)據(jù)、掛斷電話） C:進(jìn)入串口中斷 （檢查是否有收到 OK 指令和 NO CARRIER 指令，如果收到，將 flag做相應(yīng)處理。當(dāng)用戶(hù)開(kāi)啟系統(tǒng)后，軟件會(huì)自動(dòng)檢測(cè)當(dāng)前是否插入了 GSM 5 模塊，用戶(hù)需要選擇串口及其波特率、語(yǔ)音文件、數(shù)據(jù)庫(kù)文件，然后切換到撥號(hào)界面，開(kāi)始呼叫列表中的用戶(hù)。由于 TC35i 是通過(guò)串口來(lái)控制的，故采用查詢(xún)串口的方法來(lái)編寫(xiě)，通過(guò)向串口發(fā)送 AT 指令，來(lái)達(dá)到控制 TC35i的工作。系統(tǒng)結(jié)構(gòu) 如圖 所示。 2 設(shè)計(jì)任務(wù)與系統(tǒng)結(jié)構(gòu) 設(shè)計(jì)任務(wù) 本系統(tǒng)利用插入手機(jī)卡的 GSM模塊通 過(guò)串口線連接到電腦，配合電腦上的軟件撥打電話。 研究現(xiàn)狀及意義 目前，市面上尚無(wú)此方案的研究，但對(duì)于如會(huì)議通知與會(huì)人員、班級(jí)消息通知、山洪災(zāi)害通知、城市空氣質(zhì)量災(zāi)害通知等情況，主要 2 使用的方法是挨個(gè)打電話通知、短信群發(fā)、聲音警報(bào)、張貼通知、 群消息等方式，這些方式都存在明顯的不足，具有繁瑣性或不確定性，使得消息并不能夠準(zhǔn)確、高效、及時(shí)、有保障地傳達(dá)給接收人 [2]。 Serial port。 information, can record and select a radio voice, and then send AT mands to a GSM modem through the serial port to achieve the automatic voice broadcasting. not dialed users will be marked, which is for your redial, and each user can set a mask, so that can be easily listed by a SQL search. Intelligence Group Call System will improve the efficiency of the office staff, also applies to the voice notification purposes in everyday life, which brings great convenience to the people39。本論文介紹了一個(gè)基于 GSM 模塊的語(yǔ)音業(yè)務(wù)智能群呼系統(tǒng)，該系統(tǒng)可以按順序撥打一組人的電話并將錄音播放給對(duì)方，以達(dá)到語(yǔ)音通知的功能。除文中已經(jīng)注明引用的內(nèi)容外，論文不含任何其他個(gè)人或集體已經(jīng)發(fā)表或撰寫(xiě)過(guò)的成果。對(duì)論文的研究做出重要貢獻(xiàn)的個(gè)人和集體均已在文中以明確的方式標(biāo)明。該系統(tǒng)采用 Delphi 軟件設(shè)計(jì)，可以錄入、刪除、修改用戶(hù)信息，可錄制、選擇廣播語(yǔ)音，然后通過(guò)串口發(fā)送 AT 指令完成自動(dòng)的語(yǔ)音廣播，未撥通的用戶(hù)將被標(biāo)記，用戶(hù)可以選擇繼續(xù)呼叫，且每個(gè)用戶(hù)可設(shè)置分組標(biāo)記，可方便地列出符合條件（需要撥號(hào)）的用戶(hù)組。s work and life. Key words Delphi。 AT Instruction。 對(duì)于語(yǔ)音廣播系統(tǒng)的研究，在鄉(xiāng)村的山洪災(zāi)害報(bào)警、會(huì)議通知等方面意義重大，這是一種新興的，適合各種群體和各種情況的消息廣播方法，尤其在鄉(xiāng)鎮(zhèn)地區(qū) ，許多村名并不識(shí)字，老年人大多數(shù)都有老花眼，手機(jī)只用于語(yǔ)音通話。主要實(shí)現(xiàn)按照 Access 數(shù)據(jù)庫(kù)中的信息挨個(gè)打電話，將語(yǔ)音通知廣播給數(shù)據(jù)庫(kù)通訊錄中每一個(gè)人。 圖 GSM 語(yǔ)音廣播系統(tǒng)系統(tǒng)結(jié)構(gòu) 3 硬件連接 此設(shè)計(jì)硬件簡(jiǎn)單，如圖 ，只需要一根串口線和一個(gè) GSM模塊，筆記本一般使用 USB轉(zhuǎn)串口線，主要有 PL2303和 CH340兩種，需要下載好驅(qū)動(dòng) [4]。為了使其用串口進(jìn)行通信，首先要了解 TC35i串口通迅波特率范圍以及相關(guān)的音頻接口，然后通發(fā)送 AT 指令來(lái)控制 TC35i 實(shí)現(xiàn)語(yǔ)音拔號(hào)。定時(shí)器用于撥號(hào)過(guò)程中的延時(shí)檢測(cè)和流程控制，比如，當(dāng)呼叫一個(gè)用戶(hù)超過(guò)多少秒未接通，就標(biāo)志失敗，繼續(xù)呼叫下一個(gè)。） 8 (5)執(zhí)行完相應(yīng)操作后仍然跳回第 3 步等待事件發(fā)生。此處包括數(shù)據(jù)庫(kù)操作部分（修改、增加、保存）、撥號(hào)規(guī)則設(shè)置部分、發(fā)送短信部分、規(guī)則搜索部分。 進(jìn)入系統(tǒng)后，首先顯示的是 form1，點(diǎn)擊“新增”按鈕增加用戶(hù)資料后，則彈出 form4新增用戶(hù)窗口，點(diǎn)擊“撥打”按鈕后則彈出form5正在撥號(hào)的顯示窗口， datamodule窗口屬于隱藏面板，是專(zhuān)門(mén)用來(lái)放置無(wú)界面的控件的，不會(huì)顯示出來(lái)。//開(kāi)啟定時(shí)器 =500。 如果 Flag等于 1，說(shuō)明當(dāng)前正在撥打電話，但對(duì)方還沒(méi)有接通，設(shè)置一個(gè) wait_time（等待超時(shí)時(shí)間，來(lái)自控件設(shè)置）如果在這個(gè)時(shí)間內(nèi)沒(méi)有收到 OK指令，就說(shuō)明對(duì)方?jīng)]有接電話，于是發(fā)送掛機(jī)命令，讓 flag 等于 0； 如果 Flag 等于 2，說(shuō)明對(duì)方已經(jīng)接了電話了，檢查播放器的狀態(tài)，如果播放完畢，就發(fā)送掛機(jī)命令，并且使 flag 等于 0。 (2)ado 操作注意事項(xiàng)： Adoquery在執(zhí)行顯示操作是，使用 open方法，而在執(zhí)行插入、更改操作時(shí)，使用 execsql 方法。 (5)本設(shè)計(jì)使用了兩個(gè) adoquery組件，一個(gè)用來(lái)顯示查詢(xún)的數(shù)據(jù)，一個(gè)用來(lái)執(zhí)行 SQL，無(wú)回顯指令，如插入、更新等，如果公用一個(gè)，在 13 每次執(zhí)行完無(wú)返回?cái)?shù)據(jù)的命令之后， 顯示內(nèi)容將變成空白，這是使用兩個(gè) adoquery 組件帶來(lái)的好處。select * from friends where 39。select * from friends where 39。39。 二進(jìn)制模式： variant v:=。 14 (4)信令檢測(cè) 操作： 在此系統(tǒng)中，串口主要用來(lái)檢測(cè)“ OK”接通指令和“ NO CARRIER”掛機(jī)指令，其它如換行、 AT 回顯等亂七八糟的回應(yīng)都當(dāng)做噪聲數(shù)據(jù)處理。 GSM 模塊的 AT指令 基本命令： ? 撥打電話 ATD137xxxxxxxx。+chr(13)。+tgt+chr(13)。 end。 17 圖 錄音界面 錄音完畢 (3)切換到撥號(hào)界面，使用添加、刪除、查找、列出符合條件的人等操作將需要撥打的人顯示出來(lái)； 圖 修改數(shù)據(jù)功能 18 圖 添加用戶(hù) 圖 搜索分組功能 (4)點(diǎn)擊撥號(hào)，等待撥打完畢（也可強(qiáng)行中途終止）； 19 圖 撥號(hào)狀態(tài)顯示界面 (5)檢查是否所有人都撥打成功，如有失敗者，可篩選出來(lái)，重新?lián)艽?。在發(fā)送短信按鈕左邊是寫(xiě)短信內(nèi)容的地方。 6 結(jié)論 本次設(shè)計(jì)內(nèi)容是設(shè)計(jì)一個(gè)能夠自動(dòng)呼叫進(jìn)行語(yǔ)音廣播的上位機(jī)軟件，開(kāi)發(fā)語(yǔ)言使用 Pascal，開(kāi)發(fā)環(huán)境使用 Delphi7，主要涉及了串口、定時(shí)器、 Access數(shù)據(jù)庫(kù)操作，以及 GSM 模塊的 AT 指令，軟件開(kāi) 21 發(fā)難點(diǎn)在于設(shè)計(jì)撥號(hào)的流程時(shí)對(duì)各種資源的調(diào)配和變量的控制。在完成設(shè)計(jì)的過(guò)程中，借助了學(xué)校圖書(shū)館的優(yōu)質(zhì)圖 書(shū)資源和學(xué)校購(gòu)買(mǎi)的知網(wǎng)資源、以及網(wǎng)絡(luò)上的廣大軟件開(kāi)發(fā)人員共享的編程經(jīng)驗(yàn)的分享，深深感覺(jué)到軟件開(kāi)發(fā)是一件站在巨人的肩膀上往前邁進(jìn)的事業(yè)，我們的每一份成果都有著前人十分重要的鋪墊。 begin loadallm()。 版權(quán)說(shuō)明（此處省略 N 字） (39。 加載可用串口與波特率過(guò)程： procedure ()。 begin 。hardware\devicemap\serialm39。 for i:=0 to do begin (([i]))。 。11039。)。 (39。480039。)。 (39。5760039。)。 (39。92160039。 其他功能： {******************************************************** * 掛電話 * * * *********************************************************} procedure ()。 end。+col+39。 end。+num+39。 {******************************************************** * 發(fā)送短信 msg(someone,string) * * * *********************************************************} procedure (tgt,msg:string)。 sleep(200)。 sleep(1000)。 {******************************************************** * 設(shè)置記錄名字（時(shí)間 戳） * * * *********************************************************} procedure ()。// +timetostr(nowtime) end。 end。 i:integer。..39。 result:=strtoint(temp2)。.wav39。.wav39。 :=false。 except :=True。,39。 end。 。信息39。 except (39。,MB_ICONERROR+MB_OK)。 end。 { 聲音頻率 ,如 11025,22050, 44100} fn : string { 對(duì)應(yīng)的文件名稱(chēng) } )。 := 36。 := 1。 := channels*(resolution div 8)。 assignfile(wf,fn)。 {關(guān)閉文件 } end。 if then begin if 39。,39。 end end。) then begin :=39。 。 。 end。數(shù)據(jù)庫(kù)文件 (*.mdb)|*.mdb39。 try :=39。User ID=admin。 :=39。User ID=admin。 :=39。 :=。 end。錯(cuò)誤 39。請(qǐng)選擇 mdb 格式的文件 !39。 end end。 end。)then begin sqldel(,)。,39。 {******************************************************** * 撥號(hào) 按鈕 * *