單片機(jī)的高壓靜電除塵器的設(shè)計(jì)方案

XX學(xué)院?jiǎn)纹瑱C(jī)原理與應(yīng)用》課程論文課程論文題目 基于單片機(jī)的空氣凈化機(jī)的設(shè)計(jì)院系名稱專業(yè)V班級(jí)） 計(jì)算機(jī)科學(xué)與技術(shù)專業(yè)姓名V學(xué)號(hào)）指導(dǎo)教師2018年5月曰1/23

緒論引言空氣凈化器具有濾去塵埃、消除異味及有害氣體、雙重滅菌、釋放負(fù)離子等功能。它通過(guò)電機(jī)使室內(nèi)空氣循環(huán)流動(dòng)，被污染的空氣通過(guò)機(jī)內(nèi)的空氣過(guò)濾器后將各種污染物清除或吸附，然后經(jīng)過(guò)裝在出風(fēng)口的負(fù)離子發(fā)生器，將空氣不斷電離，產(chǎn)生大量負(fù)離子，被微風(fēng)送出，形成負(fù)離子氣流，達(dá)到清潔、凈化空氣的目的。目前，國(guó)內(nèi)外空氣凈化器產(chǎn)品普遍采用的凈化技術(shù)主要有：紫外線凈化、光觸媒凈化、等離子體凈化、過(guò)濾凈化〈HEPA）、靜電集塵、吸附凈化、負(fù)離子凈化、臭氧凈化、分子絡(luò)合、 HIMOP快速凈化等方法。設(shè)計(jì)任務(wù)與要求高壓靜電除塵是根據(jù)靜電荷的異性相吸、同性相斥的原理，利用靜電力將空氣中帶電粉塵吸附沉降下來(lái)，以達(dá)到除塵的目的。通過(guò)該原理設(shè)計(jì)一款空氣凈化機(jī)從而取代物理除塵和臭氧除塵。原理高壓靜電除塵的原理高壓靜電除塵是根據(jù)靜電荷的異性相吸、同性相斥的原理，利用靜電力將空氣中帶電粉塵吸附沉降下來(lái)，以達(dá)到除塵的目的。含有粉塵顆粒的氣體，在接有高壓直流電源的陰極線（又稱電暈極＞和接地的陽(yáng)極板之問(wèn)所形成的高壓電場(chǎng)通過(guò)時(shí)，由于陰極發(fā)生電暈放電、氣體被電離，此時(shí)，帶負(fù)電的氣體離子，在電場(chǎng)力的作用下，向陽(yáng)極板運(yùn)動(dòng)，在運(yùn)動(dòng)中與粉塵顆粒相碰，則使塵粒荷以負(fù)電，荷電后的塵粒在電場(chǎng)力的作用下，亦向陽(yáng)極運(yùn)動(dòng)，到達(dá)陽(yáng)極后，放出所帶的電子，塵粒則沉積于陽(yáng)極板上，從而得到凈化的氣體。該技術(shù)只對(duì)顆粒物等大粒子氣體有效果，主要用于除塵。圖1-1靜電除塵器的工作原理圖2/23

圖1-1靜電除塵器的工作原理圖2/23硬件設(shè)計(jì)1?溫度控制系統(tǒng)的硬件設(shè)計(jì)圖3-1主電路圖框圖信號(hào)采集電路的設(shè)計(jì)如圖3-2所示是設(shè)計(jì)中熱敏電阻測(cè)量原理電路，由電源、電阻電橋、運(yùn)放和輸出四部分組成。電源部分包括Ri>Re、Ci、UiboRi、R6為分壓電路，Ci主要濾除Vcc中的紋波，U1B為L(zhǎng)M324運(yùn)算放大器，工作于電壓更隨方式，其特點(diǎn)是輸入阻抗高、輸岀阻抗低，為后級(jí)電橋提供穩(wěn)定的電流。電橋由R1、&、R3、R】3組成，當(dāng)外界溫度發(fā)生變化時(shí)，通過(guò)調(diào)節(jié) R13使電路產(chǎn)生補(bǔ)償電壓，屬于電位補(bǔ)償。運(yùn)放電路由R?、Rs>R9、R】o及Uia組成，這是一種靈敏度較高的電橋放大電路，放大倍數(shù)由Ro/Rs得到。輸出電阻由Ri>R】2、Rm、Di組成，調(diào)節(jié)R14可以調(diào)整輸岀電壓幅度。D1主要用于防止輸出負(fù)電壓，保護(hù)后級(jí)A/D電路。圖3-2信號(hào)采集電路3/23

復(fù)位電路如何進(jìn)行復(fù)位呢？只要在單片機(jī)的RST引腳上加上高電平，就可以了，復(fù)位時(shí)間不少于5mso為了達(dá)到這個(gè)要求，需要在外部設(shè)計(jì)復(fù)位電路。復(fù)位電路的實(shí)現(xiàn)可以用多種方法，但是從功能上一般分為兩種：一種是電源復(fù)位，即外部的復(fù)位電路在系統(tǒng)通上電源之后直接使單片機(jī)工作，單片機(jī)的起停通過(guò)電源控制。另一種方法是在復(fù)位電路中設(shè)計(jì)按鍵開(kāi)關(guān)，通過(guò)按鍵開(kāi)關(guān)觸發(fā)復(fù)位電平控制單片機(jī)的復(fù)位。39從原理上說(shuō)，一般采用高電復(fù)位電路。這種復(fù)位電路的工作原理是：通電時(shí)，電容兩端相當(dāng)于短路，于是RST引腳上為高電平，然后電源通過(guò)電阻對(duì)電容充電，RST端電壓慢慢下降，降到一定程序，即為低電平，單片機(jī)開(kāi)始正常工作。392345678均廣12二15U31169na斗圖3-3單片機(jī)的復(fù)位電路顯示與鍵盤電路的設(shè)計(jì)<1）顯示選用的是共陰極七段碼 LED數(shù)碼管顯示。DS1- aDPY' ba:s4 cbdfgb3fdeedc' Edp： dp00圖3-4共陰極七段碼LED數(shù)碼管芯片引腳在該設(shè)計(jì)中采用的LED數(shù)碼管用的是共陰極接法，其中 LED的1?8號(hào)引腳分別接芯片74LS164的A?H引腳，用LED數(shù)碼管實(shí)現(xiàn)數(shù)字顯示。4/23

Q7J尸％QO—Q7■CP WBA74LSIMQO…Q7」dpgfedcbQ7J尸％QO—Q7■CP WBA74LSIMQO…Q7」dpgfedcbbIII—I.峪圖3-5單片機(jī)的顯示和鍵盤連接圖<2）用AT89S51單片機(jī)芯片串行口的方式0的輸出方式，在串行口外接移位寄存器74LS164,構(gòu)成鍵盤和顯示器接口，其硬件接口如圖3-5<圖中只畫出三位LED靜態(tài)顯示和個(gè)按鍵，根據(jù)需要16可以擴(kuò)展）。采用靜態(tài)顯示，軟件設(shè)計(jì)比較簡(jiǎn)單，節(jié)約 CPU的資源。5.單片機(jī)的選擇1?AT89S5單片機(jī)芯片引腳功能說(shuō)明<1）主電源引腳Vss和VccVss接地。<2）控制或與其它電源復(fù)用引腳圖3-6AT89S51芯片引腳圖RST/VPD,ALE/PROG和EA/Vpp。Vcc<2）控制或與其它電源復(fù)用引腳圖3-6AT89S51芯片引腳圖RST/VPD,ALE/PROG和EA/Vpp。5/23RST/VPD當(dāng)振蕩器運(yùn)行時(shí)，在此引腳上岀現(xiàn)兩個(gè)機(jī)器周期的高電平 〈由低到高跳變），將使單片機(jī)復(fù)位。在Vcc掉電期間，此引腳可接上備用電源，由VPD向內(nèi)部提供備用電源，以保持內(nèi)部RAM中的數(shù)據(jù)。ALE/PROG正常操作時(shí)ALE的功能是〈允許地址鎖存）提供并把地址的低字節(jié)鎖存到外部鎖存器，ALE引腳以不變的頻率〈振蕩器的頻率）周期性地發(fā)出正脈沖信號(hào)。因此，它可用作對(duì)外輸出的時(shí)鐘，或用于定時(shí)目的。但要注意，每當(dāng)訪問(wèn)外部數(shù)據(jù)存儲(chǔ)器時(shí)，將跳過(guò)一個(gè)ALE脈沖，ALE端可以驅(qū)動(dòng)<吸收或輸出電流）八個(gè)LSTTL電路。對(duì)于EPROM型單片機(jī)，在EPROM編程期間，此引腳接收編程脈沖〈功能）。外部程序存儲(chǔ)器讀選通信號(hào)輸出端，在從外部程序存儲(chǔ)取指令 〈或數(shù)據(jù)）期間，在每個(gè)機(jī)器周期內(nèi)兩次有效。同樣可以驅(qū)動(dòng)八LSTTL輸入。EA/Vpp為內(nèi)部程序存儲(chǔ)器和外部程序存儲(chǔ)器選擇端。當(dāng)EA/Vpp為高電平時(shí)，訪問(wèn)內(nèi)部程序存儲(chǔ)器，當(dāng)EA/Vpp為低電平時(shí)，則訪問(wèn)外部程序存儲(chǔ)器。對(duì)于 EPROM型單片機(jī)，在EPROM編程期間，此引腳上加 EPROM編程電源12V〈Vpp）。6.A/D轉(zhuǎn)換電路設(shè)計(jì)<1）A/D轉(zhuǎn)換器芯片ADC0809簡(jiǎn)介。8路模擬信號(hào)的分時(shí)采集，片內(nèi)有8路模擬選通開(kāi)關(guān)，以及相應(yīng)的通道抵制鎖存用譯碼電路，其轉(zhuǎn)換時(shí)間為100Us左右。ADC0809的引腳圖如圖3-7所示。6/23圖3-7ADC0809引腳圖圖中多路開(kāi)關(guān)可選通8個(gè)模擬通道，允許8路模擬量分時(shí)輸入，共用一個(gè)A/D轉(zhuǎn)換器進(jìn)行轉(zhuǎn)換，這是一種經(jīng)濟(jì)的多路數(shù)據(jù)采集方法。地址鎖存與譯碼電路完成表3-1通道選擇表CBA被選擇的通道000INo001INi010IN2011INs100IN4101INs110INe111IN7對(duì)A、B、C3個(gè)地址位進(jìn)行鎖存和譯碼，其譯碼輸出用于通道選擇，其轉(zhuǎn)換結(jié)果通過(guò)三態(tài)輸出鎖存器存放、輸出，因此可以直接與系統(tǒng)數(shù)據(jù)總線相連。7/23OEINoINiIN2IN3IN4INsINeIN?ADDAADDBADDCALE一:態(tài)A/D輸出轉(zhuǎn)鎖存換緩沖器器EOCDoD1D2dOEINoINiIN2IN3IN4INsINeIN?ADDAADDBADDCALE一:態(tài)A/D輸出轉(zhuǎn)鎖存換緩沖器器EOCDoD1D2d3DeDyVccGNDSCTARCLK圖3-8ADC0809內(nèi)部邏輯結(jié)構(gòu)〈2).信號(hào)引腳ADC0809芯片為28引腳為雙列直插式封裝，其引腳排列見(jiàn)圖3-9所示。對(duì)ADC0809主要信號(hào)引腳的功能說(shuō)明如下：INt-INo—模擬量輸入通道。ALE—地址鎖存允許信號(hào)。對(duì)應(yīng) ALE上跳沿，A、B、C地址狀態(tài)送入地址鎖存器中。START—轉(zhuǎn)換啟動(dòng)信號(hào)。START上升沿時(shí)，復(fù)位ADC0809；START下降沿時(shí)啟動(dòng)芯片，開(kāi)始進(jìn)行A/D轉(zhuǎn)換；在A/D轉(zhuǎn)換期間，START應(yīng)保持低電平。本信號(hào)有時(shí)簡(jiǎn)寫為ST。8/23圖3-9ADC0809引腳圖A、B、C—地址線。通道端口選擇線，A為低地址，C為高地址，引腳圖中為 ADDA,ADDB和ADDCo其地址狀態(tài)與通道對(duì)應(yīng)關(guān)系見(jiàn)表 3-1oCLK—時(shí)鐘信號(hào)。DC0809的內(nèi)部沒(méi)有時(shí)鐘電路，所需時(shí)鐘信號(hào)由外界提供，因此有時(shí)鐘信號(hào)引腳。通常使用頻率為500KHZ的時(shí)鐘信號(hào)。E0C—轉(zhuǎn)換結(jié)束信號(hào)。E0C=0,正在進(jìn)行轉(zhuǎn)換；E0C二1,轉(zhuǎn)換結(jié)束。使用中該狀態(tài)信號(hào)即可作為查詢的狀態(tài)標(biāo)志，又可作為中斷請(qǐng)求信號(hào)使用。5?D。一數(shù)據(jù)輸出線。為三態(tài)緩沖輸出形式，可以和單片機(jī)的數(shù)據(jù)線直接相連。 D。為最低位，D?為最咼。0E—輸出允許信號(hào)。用于控制三態(tài)輸岀鎖存器向單片機(jī)輸岀轉(zhuǎn)換得到的數(shù)據(jù)。 0E二0,輸岀數(shù)據(jù)線呈高阻；0E二1,輸出轉(zhuǎn)換得到的數(shù)據(jù)。Vcc一電源。Vref—參考電源參考電壓用來(lái)與輸入的模擬信號(hào)進(jìn)行比較，作為逐次逼近的基準(zhǔn)。其典型值為+5V(Vref(+>二+5V,Vref(->二-5V>。<3)、AT89S51單片機(jī)與ADC0809的接口電路連接主要涉及兩個(gè)問(wèn)題。一是8路模擬信號(hào)通道的選擇，二是A/D轉(zhuǎn)換完成后轉(zhuǎn)換數(shù)據(jù)的傳送。如圖3-11所示模擬通道選擇信號(hào)A、B、C分別接最低三位地址Ao、Ai、A2即〈Po.o、Po.i、P0.2),而地址鎖存允許信號(hào) ALE由P2.o控制，則8路模擬通道的地址為0FEF8H?0FEFFH?此外，通道地址選擇以作寫選通信號(hào)，這一部分電路連接如圖3-12所示。9/23

圖3-10ADC0809與AT89S51的連接從圖中可以看到，把ALE信號(hào)與START信號(hào)接在一起了，這樣連接使得在信號(hào)的前沿寫入〈鎖存）通道地址，緊接著在其后沿就啟動(dòng)轉(zhuǎn)換。啟動(dòng)A/D轉(zhuǎn)換只需要一條MOVX指令。在此之前，要將 P2.。清零并將最低三位與所選擇的通道好像對(duì)應(yīng)的口地址送入數(shù)據(jù)指針DPTR中。例如要選擇IN。通道時(shí)，可采用如下兩條指令，即可啟動(dòng)A/D轉(zhuǎn)換：MOVDPTR,#FEOOH；送入0809的口地址MOVX@DPTR,A；啟動(dòng)A/D轉(zhuǎn)換＜INo）注意：此處的A與A/D轉(zhuǎn)換無(wú)關(guān)，可為任意值。/

圖3-11ADC0809的驅(qū)動(dòng)P2.地址鎖存STARTA/D啟動(dòng)圖3-11ADC0809的驅(qū)動(dòng)P2.地址鎖存STARTA/D啟動(dòng)圖3-12信號(hào)的時(shí)間配合7.控制電路及控制方法3-7-1設(shè)計(jì)中所選擇的控制電機(jī)轉(zhuǎn)速的方法在設(shè)計(jì)中使用的是調(diào)節(jié)電機(jī)的轉(zhuǎn)速來(lái)控制燃料的進(jìn)給量，從而控制燃料產(chǎn)生的煙塵的溫度，使得靜電除塵器所在壞境的溫度達(dá)到控制，從而可以使靜電除塵器在合適的溫度下工作，也提高了工作的效率。在設(shè)計(jì)中使用的電機(jī)轉(zhuǎn)速調(diào)節(jié)的方法為轉(zhuǎn)子電路串電阻調(diào)速法。設(shè)計(jì)中的控制方法使用的是PID控制方法。3-7-2電機(jī)的調(diào)速方法<1）普通三相鼠籠式。這種電機(jī)只能通過(guò)變頻器改變電源頻率和電壓調(diào)速 <F/U>O<2）三相繞線式電機(jī)，可以通過(guò)改變串接在轉(zhuǎn)子線圈上的電阻改變電機(jī)的機(jī)械特性達(dá)到調(diào)速的目的。這種方式常用在吊車上。長(zhǎng)時(shí)間工作大功率的繞線式電機(jī)調(diào)速不用電阻串接，因?yàn)殡娮钑?huì)消耗大量的電能。通常是串可控硅，通過(guò)控制可控硅的導(dǎo)通角控制電流。相當(dāng)于改變回路中的電/23

阻達(dá)到同上效果。轉(zhuǎn)子的電能經(jīng)可控硅組整流后，再逆變送回電網(wǎng)。這種方式稱為串級(jí)調(diào)速。配上好的調(diào)速控制柜，據(jù)說(shuō)可以和直流電機(jī)調(diào)速相比美?！?）多極電機(jī)。這種電機(jī)有一組或多組繞組。通過(guò)改變接在接線合中的繞組引線接法，改變電機(jī)極數(shù)調(diào)速。最常見(jiàn)的4/2極電機(jī)用〈角/雙Y〉接。<4）三相整流子電機(jī)。這是一種很老式的調(diào)速電機(jī)，現(xiàn)在很用了。這種電機(jī)結(jié)構(gòu)復(fù)雜，它的轉(zhuǎn)子和直流電機(jī)轉(zhuǎn)子差不多，也有換向器，和電刷。通過(guò)機(jī)械機(jī)構(gòu)改變電刷相對(duì)位置，改變轉(zhuǎn)子組繞組的電動(dòng)勢(shì)改變電流而調(diào)速。這種電機(jī)用的是三相流電，但是，嚴(yán)格上來(lái)說(shuō)，其實(shí)它是直流機(jī)。原理是有點(diǎn)象串礪直流機(jī)。圖3-13電機(jī)的調(diào)速電路<5）滑差調(diào)速器。這種方式其實(shí)不是改變電機(jī)轉(zhuǎn)速。而是改變和是電機(jī)軸相連的滑差離合器的離合度，改變離合器輸岀軸的轉(zhuǎn)速來(lái)調(diào)速的。還有如，硅油離合器，磁粉離合器，等等，一此離合機(jī)械裝置和三相電機(jī)配套，用來(lái)調(diào)速的方式。嚴(yán)格上來(lái)說(shuō)不算是三相電機(jī)的調(diào)還方式。但是很多教材常常把它們算作調(diào)速方式和一種。軟件系統(tǒng)的設(shè)計(jì)1.設(shè)計(jì)思想軟件采用模塊化結(jié)構(gòu)。軟件主要完成如下任務(wù)：掃描鍵盤并按要求調(diào)出設(shè)定值或輸入新的設(shè)定值，并判斷是否啟動(dòng)，啟動(dòng)時(shí)控制電機(jī)的電阻的開(kāi)關(guān)處于閉合狀態(tài)，然后監(jiān)視溫度的變化，當(dāng)溫度超岀設(shè)定溫度值10°C時(shí)，斷開(kāi)控制電機(jī)電阻的開(kāi)關(guān)讓電機(jī)的轉(zhuǎn)速減慢，當(dāng)溫度低于設(shè)定溫度 10°C/23

時(shí)，閉合控制電機(jī)電阻的開(kāi)關(guān)。主程序的框圖如圖2.鍵盤顯示子程序在設(shè)計(jì)中的鍵盤顯示使用的方式是靜態(tài)顯示方式。ORG 1000HDSPSER: SETB P3.3MOVR7,#03H4-1所示o開(kāi)放顯示輸岀送出的顯示段碼個(gè)數(shù)4-1所示o開(kāi)放顯示輸岀送出的顯示段碼個(gè)數(shù)MOVRO,#7FHo7FH?7DH為顯示緩沖區(qū)DSPSl:MOVA,@ROO取出要顯示的數(shù)據(jù)ADDA,#ODHO加上偏移量MOVCA,@A+PCo查段碼表TAB1MOVSBUF,Ao經(jīng)過(guò)串行口將段碼送出DSPS2:JNBTI,DSPS2O數(shù)據(jù)發(fā)送完？CLRTIDECROO指向下一個(gè)數(shù)據(jù)單元DJNZR7,DSPS1O三個(gè)顯示器是否全部顯示？CLRP3.3O三個(gè)數(shù)據(jù)顯示完，關(guān)閉送顯示數(shù)據(jù)通\\RETKEYS1:MOVA,#OOHMOVSBUF,AO掃描鍵盤全部輸出0KSYO:JNBTI,KSYOO數(shù)據(jù)發(fā)送完？CLRTIPKS1:ACALLDELAY1o調(diào)用延時(shí)20ms子程序，鍵盤去抖JNBP3.3,PKS2。有鍵閉合嗎？PKS2:MOVR7,#08H。不是抖動(dòng)引起的MOVR6,#0FEHo判斷是哪個(gè)鍵按下？MOVR3,#00H10°C/23圖4-1主程序框圖MOV A,R615/23KSY2:MOVSBUF,AKSY3:JNBTI,KSY3o等待串行口發(fā)送完CLRTIJNBP2.4,PKONEo是第一行的某鍵按下？MOVR4,#00Ho第一行有鍵按下AJMPPKS3DELY1:MOVR3,#228MOVR2,#253MOVRl,#219LOOP1:DINZRl,$DINZR2,LOOP1DINZR3,LOOP1NOPRET3.PID控制子程序設(shè)計(jì)中所使用的控制方式PID設(shè)計(jì)中所使用的控制方式PID控制，圖4-2所示的PID控制的流程程序是是 圖。PID:MOVR2,25H□設(shè)定值U送R2MOVR3,24H□采樣平均值R送R3LCALLCPL1LCALL:SUMMOVo求偏差ex（K＞,存放于R2中29H,R2MOVo本次偏差e】（K＞送29HR3,27HLCALL。Ki送R3SMULMOVO求得Pi30H,R4MOVoPi的高字節(jié)送30H31H,R5MOV□Pi的低字節(jié)送31HR2,29HMOV□ei(K>送R2R3,2AHLCALLo上次偏差e】（K-l＞送R3CPL1LCALLSUMMOVo求得ei(K>-ei(K-l>,存放于R2中。Kp送R3R3,26HLCALLo求得Pp,高字節(jié)存R4,低字節(jié)存R5SMULMOV□Pi送R2R3R2,30HMOVR3,31HLCALL□求得Pi+PpDSUMMOV□結(jié)果高字節(jié)送30H30H,R4MOVo結(jié)果低字節(jié)送31H31H,R5MOVo本次偏差e】（K＞送R2R2,29HMOVo上上次偏差ei（K-2＞送R3R3,2BH/23LCALLSUMMOVR3,2AHLCALLSUMMOVR3,2AHLCALLCPL1LCALLSUMLCALLSUMMOVR3,28HLCALLSMULMOVR2,30HMOVR3,31HLCALLDSUMMOVR2,2CHMOVR3,2DHLCALLDSUMMOV2CH,R4MOV2DH,R5MOV2BH,2AHMOV2AH,29HRET4.匯編源程序見(jiàn)附o求得ei(K>+ei(K-2>,存放于R2中o上次偏差ei(K-l>送R3oexK-l>取補(bǔ)碼o求得ei(K〉+ei(K-2>-ei(K-1>,存放J'R2中。求得ei(K>+ei(K-2>-2ei(K-l>,存放于R2中。Kd送R3□求得Pa,高字節(jié)存R4,低字節(jié)存R5o取Pi+Pp。求得Pi+Pp+Pd,高字節(jié)存R4,低字節(jié)存R5o取上次計(jì)算的P(K-1>o求得本次P(K>二Pi+Pp+Pd+P(K-1>o結(jié)果高字節(jié)存2CHo結(jié)果低字節(jié)送2DHoE(K-1>送E(K-2>oei(K>送ei(K-l>圖4-2PID控制框圖/23

硬件系統(tǒng)與軟件系統(tǒng)的調(diào)試1.軟件調(diào)試應(yīng)用Keil軟件調(diào)試步驟如下：＜1）在Keil軟件中點(diǎn)擊Projec中的NewProject新建一個(gè)工程文件＜2）在工程的子目錄中建一個(gè)文件，名為 Textl.asm注：在Keil軟件中一定要建一個(gè)asm類型的文件，此時(shí)Keil才能識(shí)別程序。＜3）輸入程序，調(diào)試。附錄源程序ORG0000HMOVB,#64HLCALLCPL1LJMPMAINDIVABLCALLSUMORG000BHMOV35H,AMOVA,R2LJMPTOOMOVA,BCJNEORG001BHMOVB,#OAHA,#01AH,0UT04LJMPT100DIVABLJMP0UT05ORG0030HMOV36H,A0UT04:JC0UT05MAIN:MOVRO,#7FHMOV37H,BSETBPl.2MAIN1:MOV@R0,#00HMOVA,43HLJMP0UT06DJNZRO,MAIN1CJNE0UT05:M0V26H,#12HMOVSP,#60HA,#3aH,OUTO1MOV27H,#1HMOV08H,#32HMOVA,42HMOV28H,#1HMOVOFH,#20HCJNELCALLPIDMOV10H,#20HA,#98H,OUTO1MOVTH1,2CHMOVTMOD,#11HMOV42H,#00HMOVTL1,2DHMOVTHO,#OFCHMOV43H,#00HSETBTRIMOVTLO,#18HLCALLSAMPSETBET1SETBTROSETB2FH.1LJMP0UT06SETBETOOUTO1:JNB0UT02:MOVA,45HSETBITO2FH.1,OUT02CJNESETBEXOLCALLFILTERA,#03H,0UT06SETBEACLR2FH.1MOVA,44HSETB2FH.4SETB2FH.2CJNEBEGIN:MOVR2,25HA,#0E8H,0UT06DISOO:MOVA,09HMOVR3,24HMOV44H,#00H/23

MOV45H,#OOHPOPBPUSHPSWMOVTH1,2CHPOPACCPUSHDPHMOVTL1,2DHSETBET1PUSHDPLSETBTRIRETICLRRSISETBET1KEY1:MOV30H,#O1HSETBRSO0UT06:JB2FH.4,0UT07MOVA,#O1HMOVTHO,#OFCHJNB2FH.2,BEGADDA,09HMOVTLO,#25HBEG:LJMPBEJINMOV09H,AMOV0UT07:oMOVMOVA,#OOHDPTR,#7FFFH24H,#56HADDCA,13HMOVA,#OOHMOVRO,24HMOV13H,AMOVX@DPTR,ALCALLTRANSFRETMOVMOV32H,ROKEY2:MOV30H,#02HDPTR,#9FFFHMOV33H,R1MOVA,#0AHMOVA,#OFFHMOV34H,R2MOVB,09HMOVX@DPTR,AMOV25H,#0FFHMULABMOVA,@ROMOVRO,25HSWAPAMOVDPTR,#TABLCALLTRANSFADDA,BMOVCA,@A+DPTRMOV35H,ROSWAPAMOVMOV36H,R1MOV09H,ADPTR,#9FFFHMOV37H,R2RETMOVX@DPTR,ACLR2FH.2KEY3:MOV30H,#O3HMOVCLR2FH.4CLRCDPTR,#7FFFHLJMPBEGINMOVA,#O1HMOVA,R7T1OO:CLRET1XCHA,09HMOVX@DPTR,APUSHACCSUBBA,09HINCROPUSHBMOV09H,ARRAPUSHPSWRETMOVR7,APUSHDPHKEY4:MOV30H,#04HCJNEPUSHDPLMOV09H,#OOHRO,#38H,scanCLRPl.2RETMOVRO,#32HPOPDPLTOO:CLREAMOVR7,#20HPOPDPHPUSHACCscan:MOVA,42HPOPPSWPUSHBADDA,#O1H/23MOV42H,AMOVA,43HADDCA,#OOHMOV42H,AMOVA,43HADDCA,#OOHMOV43H,AMOVA,44HADDA,#O1HMOV44H,AMOVA,45HADDCA,#OOHMOV45H,AKEYO1:MOVDPTR,#1FFFHMOVA,#OFEHMOVX@DPTR,AJBPl.7,KEY02INC4aHMOVA,4aHCJNEA,#OAH,KEY02MOV4aH,#OOHMOVA,46HCJNEA,#OOH,KEY02LCALLKEY2INC46HKEY02:JNBPl.7,BECK1MOV46H,#OOHBECK1:MOVA,#ODFHMOVX@DPTR,ANOPNOPJBPl.7,KEY03INCR2INC4bHMOVA,4bHCJNEA,#OFFH,L00P02MOV4bH,#OOHINC4cHMOVA,4cHSUBBA,#08HJNCL00P03L00P02:CJNER2,#OAH,KEY03MOVR2,#OOHMOVA,47HCJNEA,#OOH,KEY03L00P03:LCALLKEY1INC47HKEYO3:JNBPl.7,BECK2MOV4bH,#OOHMOV4cH,#OOHMOV47H,#OOHBECK2:MOVA,#OBFHMOVX@DPTR,ANOPNOPJBPl.7,KEY04INCR3INCR5CJNER5,#OFFH,LOOPOOMOVR5,#OOHINCR6MOVA,R6SUBBA,#08HJNCLOOPO1LOOPOO:CJNER3,#08H,KEY04MOVR3,#OOHMOVA,48HCJNEA,#OOH,KEY04LOOPO1:LCALLKEY3INC48HKEY04:JNBPl.7,BECK3MOVR5,#OOHMOVR6,#OOHMOV48H,#OOHBECK3:MOVA,#7FHMOVX@DPTR,ANOPNOPJBPl.7,T1O1INCR4CJNER4,#OAH,T1O1MOVR4,#OOHMOVA,49HCJNEA,#OOH,T1O1LCALLKEY4INC49HT1O1:MOV41H,#OOHNOPPOPDPLPOPDPHPOPPSWPOPBPOPACCSETBEA/23RETIRETMOVR3,2DHSAMP:MOVRO,#20HPID:MOVR2,25HLCALLDSUMMOVR2,#04HMOVR3,24HMOV2CH,R4MOVDPTR,#5FFaHLCALLCPL1MOV2DH,R5SAMI:MOVX@DPTR,ALCALLSUMMOV2BH,2AHNOPMOV29H,R2MOV2AH,29HWAIT:JBP3.2,WAITMOVR3,27HRETMOVXA,@DPTRLCALLSMULCPL1:MOVA,R3MOV@RO,AMOV30H,R4CPLAINCROMOV31H,R5ADDA,#01HDJNZR2,SAMIMOVR2,29HMOVR3,ARETMOVR3,2AHRETFILTER:MOVRO,#20HLCALLCPL1SUM:MOVA,R2MOVR6,#OOHLCALLSUMADDA,R3MOVR7,#OOHMOVR3,26HMOVR2,AMOVR2,#04HLCALLSMULRETSUMI0:MOVA,R7MOVR2,30HSMUL:NOPADDA,@R0MOVR3,31HSBITBIT2EH.0MOVR7,ALCALLDSUMSBIT1BIT2EH.1MOVA,R6MOV30H,R4SBIT2BIT2EH.2ADDCA,#00HMOV31H,R5MOVA,R2MOVR6,AMOVR2,29HRLCAINCROMOVR3,2BHMOVSBIT1,CDJNZR2,SUM10LCALLSUMMOVA,R3MOVR2,#02HMOVR3,2AHRLCASUMI2:MOVA,R6LCALLCPL1MOVSBIT2,CCLRCLCALLSUMANLC,/SBIT1RRCALCALLSUMMOVSBIT,CMOVR6,AMOVR3,28HMOVC,SBIT1MOVA,R7LCALLSMULANLC,/SBIT2RRCAMOVR2,30HORLC,SBITMOVR