【導讀】本文介紹了一種由AT89C51單片機構成的醫(yī)院輸液監(jiān)控系統(tǒng)。動檢測、自動報警等功能也做了詳細的分析與研究。信號傳感方式采用了發(fā)光二極管和三極管。自行設計出適用于多種輸液滴速監(jiān)控器，給出了各個功能模塊的邏輯框圖。期信號處理的適用于多種輸液液體的傳感器。當點滴的速度低于或高于設定值時，單片。機發(fā)出控制信號，進行相應調節(jié)。當有人按下報警按鈕時，與單片機相連I/O口輸出高。電平，也觸發(fā)蜂鳴器報警，提醒醫(yī)護人員和輸液病人采取相應措施，避免事故發(fā)生。個裝置的線路簡單，制作方便，經(jīng)濟實用。

　　

【正文】 際檢測值和設定值已經(jīng)被轉換成 BCD 碼存在 30H到 35H 單元，其中 30H 到 32H 是實際值的從低到高位，從 33H 到 35H 是設定值的從低到高位。電動機的控制就是將實際值和設定值相比較，如果在誤 差范圍內，電動機無動作，如果實際值小于設定值且差值大于誤差允許范圍內，則電動機正轉，反之電動機反轉，控制程序段如下： MOV A， 32H CJNE A， 35H， COMP1 MOV A， 34H SWAP A ADD A， 33H MOV 36H， A MOV A， 31H SWAP A ADD A， 30H CJNE A， 36H， COMP2 LJMP GOOUT COMP2: JC KEY1 JNC KEY2 KEY1: CLR C 河北工程大學畢業(yè)設計說明書 23 ADD A， 03H DA A JC GOOUT CJNE A， 36H， COMP4 LJMP GOOUT COMP4: JC UP JNC GOOUT KEY2: CLR C MOV 37H， 36H MOV 36H， A MOV A， 37H ADD A， 03H DA A JC GOOUT CJNE A， 36H ， COMP5 LJMP GOOUT COMP5: JC DOWN JNC GOOUT COMP1: JC UP JNC DOWN UP: SETB CLR LJMP GOOUT DOWN: CLR SETB LJMP GOOUT 顯示子程序 LCD 顯示器要顯示檢測速度和設定速度，速度值都以 BCD 碼的形式保存，期中檢測速度從低到高存在 30H、 31H、 32H，設定速度存在 33H、 34H、 35H 單元， LCM103 的任務就是把這些數(shù)字顯示在相應位上。數(shù)據(jù)的位數(shù)是從右向左排的，這里安排 1~3 位顯示實際檢測值， 5~7 顯示設定值。向 LCD 傳輸數(shù)據(jù)時，這里采取連續(xù)讀數(shù)據(jù)的方式，即這里河北工程大學畢業(yè)設計說明書 24 按照時許送入首地址，其后這里連續(xù)送如數(shù)據(jù)，數(shù)據(jù)的地址自動加 03 顯示一位數(shù)碼要轉化成 3個 8位二進制數(shù)，顯示不同的數(shù)碼，編程時這里采用了查表的方式，具體程序段如下： PCON: EQU 87H ORG 0000H JMP START ORG 0100H START: CLR 。斷開報警器 SETB CALL OLY500 MOV 20H， 44 。INITIALIZE CALL ERCOM MOV 20H， 24H 。32768HZ CALL WRCOM MOV 20H， 1 。SYSEN CALL WRCOM MOV 20H， 00 。LEDON CALL WRCOM MOV RO， 35H 。 顯示設定值 SETB A CALL WR123 。******LCD 寫命令 ****** ：改為數(shù)碼顯示 WRCOM: SETB NOP CALL DLY5 CLR CALL DLY5 CLR CALL DLY5 NOP SETB CALL DLY5 NOP SETB 河北工程大學畢業(yè)設計說明書 25 CALL DLY5 NOP CLR CALL DLY5 NOP CLR CALL DLY5 NOP SETB CALL DLY5 NOP CLR CALL DLY5 NOP CLR CALL DLY5 NOP SETB CALL DLY5 NOP MOV RT， 9 CLR C LOOPWR: NOP CALL DLY5 CLR CALL DLY5 MOV A， 20H RLC A MOV 20H， A JC WR1 CLR CALL DLY5 JMP WRR WR1: SETB 河北工程大學畢業(yè)設計說明書 26 CALL DLY5 WRR: SETB CALL DLY5 DJNZ R7， LOOPWR RET 。******LCD 寫地址 ****** WRDD: SETB 。/CS=1 CALL DLY5 NOP CLR 。 /CS=0 CALL DLY5 CLR 。 /WR=0 CALL DLY5 SETB 。 D=1(101) CALL DLY5 SETB 。 /WR=1 CALL DLY5 CLR 。 /WR=0 CALL DLY5 CLR 。 D=0 CALL DLY5 SETB 。 /WR=1 CALL DLY5 CLR 。 /WR=0 CALL DLY5 SETB 。 D=1 CALL DLY5 MOV R4， 6 MOV 22H， 21H NOP ADDWR: CALL DLY5 CLR CALL DLY5 MOV A， 21H 河北工程大學畢業(yè)設計說明書 27 RLC A MOV 20H ， A JC WR11 CLR 。DATA=0 CALL DLY5 JMP WRR1 WR11: NOP CALL DLY5 SETB 。DATA=1 CALL DLY5 WRR1: NOP CALL DLY5 SETB CALL DLY5 DJNZ R4， ADDWRZ RET 。******LCD 寫數(shù)據(jù) ****** WRDA: MOV R5 ， 4 ADD WR3 NOP CALL DLY5 CLR CALL DLY5 MOV A， 25H RRC A MOV 25H， A JC WR12 CLR CALL DLY5 JMP WRR2 WR12: NOP CALL DLY5 SETB CALL DLY5 河北工程大學畢業(yè)設計說明書 28 WRR2: NOP CALL DLY5 SETB CALL DLY5 DJN2 R5， ADDWR3 。****** ****** DLY5: NOP NOP NOP ； 各為單字節(jié)指令 NOP RET DLY10S: MOV R0， 200 。 10S DLOP1: CALL DLY25M CALL DLY25M DJNZ R0， DLOP1 RET DLY500: MOV R0， 5 DLOP11: CALL DLY25M CALL DLY25M DJNZ RO， DLOP11 RET 。******LCD 顯示子程序 ****** WR123: NOP SETB CALL DLY5 NOP CLR CALL DLY5 CLR CALL DLY5 SETB CALL DLY5 SETB CALL DLY5 河北工程大學畢業(yè)設計說明書 29 CLR CALL DLY5 CLR CALL DLY5 SETB CALL DLY5 CLR CALL DLY5 SETB CALL DLY5 SETB CALL DLY5 JZ XS2 XS1: MOV R2 ， 2 LP11: CLR CALL DLY5 CLR CALL DLY5 SETB CALL DLY5 DJNZ R2， LP11 MOV R2， 4 LP12: CLR CALL DLY5 SETB CALL DLY5 SETB CALL DLY5 DJNZ R2， LP12 JMP BEGIN XS2: MOV R2， 6 LP2: CLR CALL DLY5 CLR 河北工程大學畢業(yè)設計說明書 30 CALL DLY5 SETB CALL DLY5 DJNZ R2， LP2 BEJIN: MOV R6， 3 MOV A， @RO