欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標(biāo)題: 瑞薩78K0S的血壓測量儀電路+單片機(jī)源代碼+設(shè)計(jì)文檔 [打印本頁]
作者: halibote523    時(shí)間: 2018-9-25 09:55
標(biāo)題: 瑞薩78K0S的血壓測量儀電路+單片機(jī)源代碼+設(shè)計(jì)文檔
基于單片機(jī)設(shè)計(jì)的血壓血氧電路以及源碼，可供大家參考學(xué)習(xí)！

電路原理圖如下：3




血壓計(jì)是用來測量人體血壓的儀器，使用它可以給醫(yī)生或者患者提供一定的診斷信息，當(dāng)前使用的醫(yī)用血壓計(jì)大多都是使用水銀來測量血壓，這樣會(huì)對環(huán)境造成一定的污染，本方案利用電子式的方法配合醫(yī)用聽診器可以測量人體血壓。

1.2規(guī)格和主要技術(shù)參數(shù)
工作電壓：2.4V 3V
供電：電池AAAX2
功耗：9uA(靜態(tài)）
顯示：LCD,3V，l/3偏置，4分時(shí)

血壓測量范圍：

20-280mmHg(壓力線顯示）:

20-320mmHg(數(shù)字顯示）

測量精度：血壓±3mmllg
顯示分辨率：

數(shù)字式：lmmllg:
指示線：2mmllg
操作環(huán)境：+丨0〇C至+40〇C
相對濕度：30%至85%
存放環(huán)境：-20〇C至+55oC.


系統(tǒng)采用2節(jié)1.5V的電池供電，但是壓力檢測單元需要使用4V左右的電源才能正常工作所以系統(tǒng)中使用了一棵升壓芯片,并且在電源部分有控制信號(hào)，當(dāng)需要升壓時(shí)打開控制,不需要時(shí)關(guān)閉升壓芯片，從而達(dá)到低功耗的目的。

壓力傳感器控制電路：


上閣是壓力傳感器部分的電路，放大器A1A將輸入的信號(hào)放大，放大器A1C受信號(hào)控制產(chǎn)生一個(gè)鋸齒波,放大器A1B用來產(chǎn)生參考電壓，用來對信號(hào)進(jìn)行調(diào)零操作，放大器AID搭輸入的壓力信號(hào)和鋸齒波比較產(chǎn)生一個(gè)與壓力信號(hào)成IF.比的方波信號(hào)。

第五章軟件部分
5.1軟件模塊

在這個(gè)系統(tǒng)中，軟件可以分成4個(gè)部分，它們分別是：主程序部分，驅(qū)動(dòng)部分，1622驅(qū)動(dòng)部分，顯示部分

5.2主程序部分
主程序部分在文件niain.s中，它主要完成壓力的監(jiān)測，和零點(diǎn)的校準(zhǔn)，程序如下:

  1. #include "drive.h"
  2. #include "ht1622.h"
  3. #include "display.h"
  4. #include "port.h"
  5. extrn HT1622_init
  6. public main_pro
  7. maind        DSEG        at 0fe00h
  8. Pbuff:                        DS        32
  9. maind2        DSEG        saddrp
  10. PbuffOPTR:        DS        2
  11. PbuffIPTR:        DS        2
  12. ZeroDat:                DS        2
  13. StartP:                        DS        2
  14. stopcount:        DS        2
  15. MaxP:                                DS        2
  16. MinP:                                DS        2
  17. timercount:        DS        2

  19. key:                                DS        1
  20. CheckMode:        DS        1
  21. count:                        DS        1
  22. temp1:                        DS        1
  23. mainc        cseg
  24. wait:
  25.                 b=#0
  26. wait1:
  27.                 dbnz b,$wait1
  28.                 ret

  30. main_pro:
  31.         stopcount=#0(ax)
  32.         call        !disp_close
  33.         while(forever)
  34.                 call        !sys_get_key
  35.                 switch(a)
  36.                 case KEY_ON_OFF:
  37.                         call        !open_test
  38.                         stopcount=#0(ax)
  39.                         call        !disp_close
  40.                 break
  41.                 case        KEY_CHECK:
  42.                         call        !open_check
  43.                         stopcount=#0(ax)
  44.                         call        !disp_close
  45.                 break
  46.                 default:
  47.                         call        !stop_mode
  48.                 break
  49.                 ends
  50.         endw
  51.         ret

  53. open_test:
  54.         set1        CE_P
  55.         call        !wait
  56.         call        !sys_open_sensor
  57.         call        !HT1622_init
  58.         call        !wait
  59. ;--------開機(jī)3秒鐘
  60.         call        !disp_on
  61.         call        !disp_all_on
  62.         call        !disp_dat_to_hard
  63.         ZeroDat=#0(ax)
  64.         b=#50
  65.         count=#0
  66. open_test1:
  67.                 push        bc
  68.                 repeat
  69.                         call        !sys_get_sensor_dat
  70.                 until(!cy)
  71.                 call        !In_pbuff
  72.                 call        !pro_pbuff
  73.                 call        !wait_noc
  74.                 WDTE=#0ACH
  75.                 call        !sys_get_key
  76.                 pop        bc
  77.         dbnz b,$open_test1

  79. ;-------判斷是否能正常工作
  80.         b=#25
  81.         temp1=#0
  82. open_test2:
  83.                 push        bc
  84.                 repeat
  85.                         call        !sys_get_sensor_dat
  86.                 until(!cy)
  87.                 call        !In_pbuff
  88.                 call        !pro_pbuff
  89.                 call        !wait_noc
  90.                 WDTE=#0ACH
  91.                 pop        bc
  92.         dbnz b,$open_test2

  94.         call        !disp_all_off
  95.         if_bit(temp1.0)
  96.                 a=#1
  97.                 call        !diap_map
  98.         endif
  99.         temp1++
  100.         call        !disp_dat_to_hard
  101.         if(temp1>#60)
  102.                 ret
  103.         endif
  104.        
  105.         ax=ZeroDat
  106.         if(ax>#700||ax<#350)
  107.                 b=#25
  108.                 goto open_test2
  109.         endif
  110. ;------開始顯示       
  111.         timercount=#0(ax)
  112.         while(forever)
  113.                 call        !sys_get_sensor_dat
  114.                 if_bit(!cy)
  115. ;------進(jìn)行壓力顯示       
  116.                         call        !In_pbuff
  117.                         call        !disp_all_off
  118.                         call        !pro_pbuff
  119. ;--------得到壓力值
  120.                         push        ax
  121.                         bc=ZeroDat(ax)
  122.                         pop                ax
  123.                         call        !AXSubBC
  124.                         if_bit(cy)
  125.                                 ax=#0
  126.                         endif
  127. ;-------轉(zhuǎn)換為貢柱
  128.                         CALL        !RORCW
  129.                         call        !AX_div8
  130.                         push        ax
  131.                         if(ax>#17)
  132.                                 ax-=#17
  133.                                 call        !disp_dat_to_map
  134.                         endif
  135.                         pop                ax
  136.                         call        !hex2_to_bcd
  137.                         ax=de
  138.                         call        !disp_dat_to_dat
  139.                         call        !sys_get_bat
  140.                         if(a>#110)
  141.                                 a=#0ffH
  142.                                 call        !diap_map
  143.                         endif
  144.                         call        !disp_dat_to_hard
  145.                         call        !get_max_min
  146.                         bc=MinP(ax)
  147.                         ax=MaxP
  148.                         call        !AXSubBC
  149.                         if(ax>#10)
  150.                                 timercount=#0(ax)
  151.                         else
  152.                                 ax=timercount
  153.                                 ax++
  154.                                 if(ax>#15000)
  155.                                         ret
  156.                                 endif
  157.                                 timercount=ax
  158.                         endif
  159.                 endif
  160.                 WDTE=#0ACH
  161.                 call        !sys_get_key
  162.                 if(a==#KEY_ON_OFF)
  163.                         ret
  164.                 endif
  165.         endw
  166.         ret

  168. open_check:
  169.         set1        CE_P
  170.         call        !wait
  171.         hl=#Pbuff
  172.         a=#0
  173.         b=#32
  174.         call        !WriteAll
  175.         call        !sys_open_sensor
  176.         call        !wait
  177.         call        !HT1622_init

  179.         call        !disp_on
  180.         call        !disp_all_off
  181.         call        !disp_dat_to_hard
  182.         count=#0
  183.         CheckMode=#0
  184.         key=#0
  185.         while(forever)
  186.                 call        !sys_get_sensor_dat
  187.                 if_bit(!cy)
  188.                         call        !In_pbuff
  189.                         call        !disp_all_off
  190.                         call        !pro_pbuff
  191.                         switch(CheckMode)
  192.                         case        0:
  193.                                 call        !check_mode0
  194.                         break
  195.                         case        1:
  196.                                 call        !check_mode1
  197.                         break
  198.                         default:
  199.                         break
  200.                         ends
  201.                         call        !hex2_to_bcd
  202.                         ax=de
  203.                         call        !disp_dat_to_dat
  204.                         if(CheckMode==#1)
  205.                                 a=#1
  206.                                 call        !diap_map
  207.                         endif
  208.                         call        !disp_dat_to_hard
  209.                 endif
  210.                 WDTE=#0ACH
  211.                 call        !sys_get_key
  212.                 if(a==#KEY_ON_OFF)
  213.                         key=#1
  214.                 elseif(a==#KEY_CHECK)
  215.                         ret
  216.                 endif
  217.         endw
  218.         ret
  219.        
  220. check_mode0:
  221.         if(ax>#400)
  222.                 push        ax
  223.                 call        !wait_noc
  224.                 pop                ax
  225.                 if_bit(cy)
  226.                         if(key==#1)
  227.                                 StartP=ax
  228.                                 CheckMode++
  229.                                 key=#0
  230.                         endif
  231.                 endif
  232.         endif
  233.         ret
  234. check_mode1:
  235.         push        ax
  236.         bc=StartP(ax)
  237.         pop                ax
  238.         call        !AXSubBC
  239.         if(key==#1)
  240.                                 CheckMode=#0
  241.                                 key=#0
  242.         endif
  243.         ret


  246.        
  247. ;input ax=輸入壓力值
  248. ;output cy=1穩(wěn)定了 cy=0不穩(wěn)定
  249. wait_noc:
  250.         push        bc
  251.         push        ax
  252.         bc=ZeroDat(ax)
  253.         pop                ax
  254.         push        ax
  255.         call        !AXSubBC
  256.         if_bit(cy)
  257.                 bc=ax
  258.                 ax=#0FFFFh
  259.                 call        !AXSubBC
  260.         endif
  261.         if(ax<#3)
  262.                 count++
  263.         else
  264.                 count=#0
  265.         endif
  266.         pop                ax
  267.         pop                bc
  268.         ZeroDat=ax
  269.         if(count>#50)
  270.                 set1        cy
  271.                 count=#0
  272.         else
  273.                 clr1        cy
  274.         endif
  275.         ret
  276. stop_mode:
  277.         WDTE=#0ACH
  278.         ax=stopcount
  279.         ax++
  280.         stopcount=ax
  281.         if(ax<#0ffffH)
  282.                 ret
  283.         endif
  284.         ei
  285.         call        !close_4ms
  286.         call        !sys_close_sensor
  287.         clr1        CE_P
  288.         clr1 PM3.0
  289.         set1        P3.0
  290.         stop
  291.         nop
  292.         nop
  293.         set1        PM3.0
  294.         set1        P3.0
  295.         call        !open_4ms
  296.         stopcount=#0(ax)
  297.         ret

  299. ;********************************
  300. ;功能：傳感器的數(shù)據(jù)方入緩沖區(qū)中
  301. ;入口：hl=buff
  302. ;                         b=個(gè)數(shù)
  303. ;                         c=buff長度
  304. ;                         de=buff開始地址
  305. ;********************************
  306. get_senser_to_buff:
  307.         push        ax
  308. get_senser_to_buff1:
  309.         while(forever)
  310.                 call        !sys_get_sensor_dat
  311.                 if_bit(!cy)
  312.                         break
  313.                 endif
  314.         endw
  315.         [hl+1]=a
  316.         [hl]=x(a)
  317.         hl++
  318.         hl++
  319.         ;ax=buff結(jié)束地址
  320.         push        hl
  321.         hl=de(ax)
  322.         a=c
  323.         call        !AddAtoHL
  324.         ax=hl
  325.         pop        hl
  326.         ;比較hl是否越界
  327.         push        bc
  328.         bc=ax
  329.         ax=hl
  330.         ax<->bc
  331.         call        !CmpAXBC
  332.         if_bit(cy)
  333.                 hl=de(ax)
  334.         endif
  335.         pop                bc

  337.         dbnz        b,$get_senser_to_buff1
  338.         pop                ax
  339.         ret

  341. test_pbuff:
  342.         push        ax
  343.         if(PbuffIPTR==PbuffOPTR)(a)
  344.                 set1        cy
  345.         else
  346.                 clr1        cy
  347.         endif
  348.         pop                ax
  349.         ret
  350.        
  351. In_pbuff:
  352.         push        hl
  353.         push        ax
  354.         HL=#Pbuff
  355.         a=PbuffIPTR
  356.         call        !AddAtoHL

  358.         a=PbuffIPTR
  359.         a+=#2
  360.         a&=#0feH
  361.         if(a>#31)
  362.                 a=#0
  363.         endif
  364.         PbuffIPTR=a
  365.         pop                ax
  366.         [hl+1]=a
  367.         [hl]=x(a)
  368.         pop                hl
  369.         ret
  370.        
  371. Out_pbuff:
  372.         push        hl
  373.         HL=#Pbuff
  374.         a=PbuffOPTR
  375.         call        !AddAtoHL

  377.         a=PbuffOPTR
  378.         a+=#2
  379.         a&=#0feH
  380.         if(a>#31)
  381.                 a=#0
  382.         endif
  383.         PbuffOPTR=a

  385.         x=[hl](a)
  386.         a=[hl+1]
  387.         pop                hl
  388.         ret
  389. ;********************************
  390. ;功能：計(jì)算緩沖區(qū)中數(shù)據(jù)的平均值
  391. ;出口：ax
  392. ;********************************

  394. pro_pbuff:
  395.                 push        bc
  396.                 push        de
  397.                 push        hl
  398.                 hl=#Pbuff
  399.                 c=#0
  400.                 b=#16
  401.                 de=#0
  402. pro_pbuff1:
  403.                         a=[hl]
  404.                         add a,e
  405.                         e=a
  406.                         hl++
  407.                         a=[hl]
  408.                         addc a,d
  409.                         d=a
  410.                         a=#0
  411.                         addc a,c
  412.                         c=a
  413.                         hl++
  414.                 dbnz b,$pro_pbuff1
  415.                 b=#4
  416.                 ax=de
  417. pro_pbuff2:
  418.                 clr1        cy
  419.                 a<->c
  420.                 RORC        a,1
  421.                 a<->c
  422.                 RORC        a,1
  423.                 a<->x
  424.                 RORC        a,1
  425.                 a<->x
  426.                 dbnz b,$pro_pbuff2
  427.                 pop        hl
  428.                 pop        de
  429.                 pop        bc
  430.                 ret

  432. get_max_min:
  433.                 push        ax
  434.                 push        bc
  435.                 push        hl
  436.                 MaxP=#0(ax)
  437.                 MinP=#0ffffh(ax)
  438.                 hl=#Pbuff
  439.                 b=#16
  440. get_max_min1:
  441.                         push        bc
  442.                         x=[hl](a)
  443.                         hl++
  444.                         a=[hl]
  445.                         hl++
  446.                         push        ax
  447.                        
  448.                         bc=MinP(ax)
  449.                         pop                ax
  450.                         push        ax
  451.                         call        !CmpAXBC
  452.                         if_bit(cy)
  453.                                 pop                ax
  454.                                 MinP=ax
  455.                                 push        ax
  456.                         endif

  458.                         ax=MaxP
  459.                         pop                bc
  460.                         push        bc
  461.                         call        !CmpAXBC
  462.                         if_bit(cy)
  463.                                 pop                ax
  464.                                 MaxP=ax
  465.                                 push        ax
  466.                         endif
  467.                        
  468.                         pop                ax
  469.                         pop                bc
  470.                 dbnz b,$get_max_min1
  471.                 pop                hl
  472.                 pop                bc
  473.                 pop                ax
  474.                 ret
  475. end
復(fù)制代碼



全部資料51hei下載地址：
基于瑞薩的血壓測量儀電路 源代碼 設(shè)計(jì)文檔.rar (915.86 KB, 下載次數(shù): 76)




作者: 蘭蘭    時(shí)間: 2019-9-11 15:51
資料好亂啊，重點(diǎn)沒有突出
作者: cba_cba    時(shí)間: 2019-9-12 08:38
這個(gè)瑞薩官網(wǎng)上有，說的比較詳細(xì)。



歡迎光臨 (http://www.raoushi.com/bbs/) Powered by Discuz! X3.1