Thông báo

Collapse
No announcement yet.

///////cảm biến siêu âm và pic6f877a///////

Collapse
X
 
  • Lọc
  • Giờ
  • Show
Clear All
new posts

  • ///////cảm biến siêu âm và pic6f877a///////

    đây là đoạn code siêu âm hoạt động ở chế đọ mode2
    dùng pic. nhưng khi test thì không hiện gì lên LCD mong mọi người giúp đỡ
    xem dùng hộ cái!!!!!!!

    #include <16f877a.h>
    #include <defs_16f877a.h>
    #include <def_877a.h>
    #use delay(clock=20000000)
    #fuses HS
    #BYTE TRISC = 0x87
    #BIT TRISC2 = 0x87.2
    #BYTE PORTC = 0x07
    #BIT RC2 = 0x7.2
    #include <lcd_lib_4bit.c>
    float getvar = 0, distance = 0;
    int1 has_echo = 0, trg = 0;

    void trigger(); //t?o trigger
    void init();

    #INT_CCP1
    void ccp1_isr()
    {
    if(!trg) {
    //Khi có xung echo c?nh lên
    set_timer1(0); //Reset timer1 v? 0
    setup_ccp1(CCP_CAPTURE_FE); //chuy?n sang dò xung c?nh xu?ng
    trg = 1;
    }
    else
    {
    //Khi có xung echo c?nh xu?ng
    getvar = get_timer1(); //??c giá tr? timer1 ngay khi có xung echo c?nh xu?ng
    distance = ((getvar /111)*3.2-14.7);//(getvar - 485)/28.3; // S? li?u d?a theo k?t qu? ?o th?c t?
    has_echo = 1;
    disable_interrupts(GLOBAL);
    }
    }



    void main()
    {
    init();
    //LCD_init();
    while (1)
    {

    trigger();
    while(!has_echo);
    lcd_putcmd(0xc0);
    printf(lcd_putchar,"K/C:%6.2f", distance);
    delay_us(200);
    }
    }
    void init()
    {
    //Timer 1 clock in = Fosc/4 = 5Mhz
    //Speed of Speech = 344m/s ,Max time echo =25ms
    //=> Max Distance of SRF05 = (344m/s*25ms)/2 = 4.3m
    // Min time echo = 100us
    //=> Min Distance of SRF05 = (344m/s*100us)/2 = 3.44cm
    //=> Timer 1 with Ts = (1/5MHz)*Pre = 0.4uS (Prescaler = 2);
    //=> Reg Timer 1 Circle
    lcd_init();
    setup_timer_1(T1_INTERNAL|T1_DIV_BY_8);
    //Thi?t l?p Capture CCP1 dò xung c?nh lên
    setup_ccp1(CCP_CAPTURE_RE);
    enable_interrupts(INT_CCP1); // Cho phép ng?t khi CCP1 có tín hi?u
    }

    void trigger()

    {
    trg = 0;
    has_echo = 0;
    TRISC2 = 0; //set chân RC2 làm output
    RC2 = 1; //trigger
    delay_us(20);
    RC2 = 0;
    TRISC2 = 1; //set chân RC2 làm input
    setup_ccp1(CCP_CAPTURE_RE);
    enable_interrupts(GLOBAL);
    }

  • #2
    mọi người đọc cho ý kiến với ??
    có test chạy được thì bảo nhá!!!!

    Comment


    • #3
      //nguyen van duc
      //KS tu dong hoa
      //cong thuc tinh thoi gian T= (65536-VALUE)*(4/Fosc)*P

      #include <16F877A.h>
      #include <def_877a.h>
      #FUSES NOWDT, HS, NOPUT, NOPROTECT, NODEBUG, NOBROWNOUT,NOLVP, NOCPD, NOWRT,PUT
      #use delay(clock=20000000)
      #use fast_io(d)
      #use fast_io(b)
      #use fast_io(a)
      #use fast_io(c)
      int16 CCP1value;
      int16 CCP1Oldvalue;
      BOOLEAN CCP1Captured;
      int16 ketqua,dodai,hangdonvi,hangchuc,hangtram;
      int16 thoigiantruyen;
      int8 i;

      #INT_CCP1
      void ngat_ccp1()
      {
      CCP1Captured = TRUE;
      CCP1Oldvalue=CCP_1;
      CCP_1=0;
      }

      #INT_CCP2
      void ngat_ccp2()
      {
      CCP1Value = CCP_2 - CCP1Oldvalue;
      CCP_2=0;
      }
      #INT_TIMER0
      void interup_timer0()
      {i++;
      set_timer0(8);
      if(i>=79){
      output_high(PIN_A0);
      if(i>=160){i=0;
      output_low(PIN_A0);
      }
      //delay_ms(1500); //tin hieu phat xung it nhat phai dat 10us
      //output_low(Pin_a2);//dua chan A1 ve 0 doi lan phat xung tiep theo}
      }
      }

      void init_ccp()
      {
      setup_ccp1(CCP_capture_FE);
      setup_ccp2(CCP_capture_RE);
      setup_timer_1(T1_INTERNAL|T1_DIV_BY_4); //tang mot gia tri timer1 mat 4/5uS
      setup_timer_0(RTCC_INTERNAL|RTCC_DIV_256);
      CCP1value=0;
      CCP1Oldvalue=0;
      CCP1Captured=TRUE;
      enable_interrupts(INT_CCP1);
      enable_interrupts(INT_CCP2);
      enable_interrupts(INT_TIMER0);
      enable_interrupts(GLOBAL);


      }
      void Main()
      {
      init_ccp();
      set_tris_d(0x00);
      set_tris_b(0x00);
      set_tris_c(0xff); //ff xac lap cac chan port C la chan input
      set_tris_a(0x00);
      set_timer0(8);
      while(true){
      if(CCP1Captured){
      thoigiantruyen=CCP1value;
      ketquathoigiantruyen*4*1000)/5)/58; //neu thoi gian truyen duoc tinh la mini S thi chia 58 ra centimet
      if(ketqua/10==0)
      dodai=1;
      if(ketqua/10>0&&ketqua/100==0)
      dodai=2;
      if(ketqua/100>0)
      dodai=3;
      if(dodai==1){hangdonvi=ketqua;hangchuc=0;hangtram= 0;}
      if(dodai==2){hangdonvi=ketqua%10;hangchuc=ketqua/10;hangtram=0;}
      if(dodai==3){hangdonvi=(ketqua%100)%10;hangtram=ke tqua/100;hangchuc=(ketqua/10)%10;}
      CCP1Captured=FALSE;
      }
      output_d(hangtram);
      output_high(pin_d5);
      delay_ms(150);
      output_d(hangchuc);
      output_high(pin_d6);
      delay_ms(150);
      output_d(hangdonvi);
      output_high(pin_d7);
      delay_ms(150);
      output_low(pin_d5);
      output_low(pin_d6);
      output_low(pin_d7);
      };
      }

      mình làm cái này rội chạy ngon đo chính xác khoảng cách, nhưng lâu rồi kho nhớ cái code này có phải của nó khong, lục trong máy tính gửi cho ban tham khảo.

      Comment


      • #4
        cái này nhầm à nghe "ketquathoigiantruyen*4*1000)/5)/58" bỏ 1000 đi

        Comment

        Về tác giả

        Collapse

        chungpmth Tìm hiểu thêm về chungpmth

        Bài viết mới nhất

        Collapse

        • mansion123
          Bật mí những điều ít ai biết về thi công gỗ óc chó
          bởi mansion123
          Thi công gỗ óc chó giúp không gian trở nên sang trọng, ấm cúng, gần gũi hơn. Sự kết hợp giữa thẩm mỹ và chất lượng cao của gỗ óc chó chắc chắn sẽ mang lại giá trị lâu dài và làm hài lòng ngay cả những khách hàng khó tính nhất. Vậy đằng
          ...
          hôm nay, 16:08
        • tuyennhan
          Trả lời cho Tiếng Anh cho người Việt
          bởi tuyennhan
          Cái thư sai ngay câu chào Dear sir mới đúng Hi chỉ dùng cho người quen , các vấn đề về kỹ thuật nó không trả lời hoặc nói loanh quanh tránh ảnh hưởng đến công ty .
          Giup1 người cần không giúp người không cần với lại văn mình vợ người nha đừng quên .
          hôm nay, 07:44
        • vi van pham
          Trả lời cho Tiếng Anh cho người Việt
          bởi vi van pham
          Cám ơn những lời chúc tốt đẹp của em.

          Việc em làm giống như chê sếp dốt, chẳng những không có miếng xôi nào để ăn mà còn chịu nhiều trù dập lên bờ , xuống ruộng.

          Hãy tránh vết xe đổ của tui đi. Dành thời gian lo cho gia đình....
          hôm nay, 02:00
        • nhathung1101
          Trả lời cho Tiếng Anh cho người Việt
          bởi nhathung1101
          Ngoại ngữ là không thể thiếu, nhất là làm việc với công nghệ.

          Nhưng học để tán gái hay để đọc datasheet, manual là chuyện cần quan tâm.

          Và đọc ở nguồn nào đáng tin cậy, chứ cứ lên tictok hay facebook học lỏm thì...
          Hôm qua, 22:18
        • dinhthuong80
          Trả lời cho Tiếng Anh cho người Việt
          bởi dinhthuong80
          Bác nói rất khách quan và chính xác. Ngoại ngữ là chìa khóa thăng tiến dù làm gì. Chả thế mà nay nước mình dạy tiếng Anh từ tiểu học.

          Nhớ hồi năm 2006 em ra Hải Phòng, Hải Dương tìm việc, thời đó ở Bình Dương lương công...
          Hôm qua, 14:51
        • dinhthuong80
          Trả lời cho Tiếng Anh cho người Việt
          bởi dinhthuong80
          Cảm ơn bạn, ĐT cũng có ý nghĩ như vậy.

          Thực ra, lỗi của hãng đó ( gọi là hãng vì không chỉ một model sản phẩm) là về phần cứng, ĐT tuy không biết về lập trình phần mềm nhưng cũng thấy rằng sẽ chẳng khó khăn gì đáng...
          Hôm qua, 14:39
        • dinhthuong80
          Trả lời cho Tiếng Anh cho người Việt
          bởi dinhthuong80
          Dạ, bác bảy mấy tuổi đời rồi cũng không kém bố cháu bao nhiêu. Tuổi nghề thì bác cũng đáng tuổi cha chú.

          Nhưng 2 điều trên thì chưa hẳn đã đáng quí và đáng tôn trọng bằng việc bác rất nhiệt tình chia sẻ kinh nghiệm chuyên...
          Hôm qua, 14:28
        • bqviet
          Trả lời cho Tiếng Anh cho người Việt
          bởi bqviet
          Đúng, nếu chú tâm thì chỉ cần mỗi tiếng Việt là đã khá đủ để làm đa số công việc thông thường, ở thời đại ngày nay khi tài liệu sách vở phương tiện thông tin liên lạc đã nhiều. Nhưng cũng chính ở thời nay giao lưu các nước nhiều...
          21-02-2025, 20:26
        • mèomướp
          Trả lời cho Tiếng Anh cho người Việt
          bởi mèomướp
          Dạ cháu nghĩ chú dinh... cứ mạnh dạn gửi thư đi ạ, chú có thể gửi bằng văn bản in chuyển phát nhanh sẽ có giá trị hơn. Vấn đề chưa hẳn là cần hãng làm gì đó, mà chỉ đơn giản là mình cảm thấy nhẹ lòng vì đã làm những việc bản...
          21-02-2025, 12:32
        • vi van pham
          Trả lời cho Tiếng Anh cho người Việt
          bởi vi van pham
          Những lần hắt hơi sổ mũi làm tôi mệt lã, phải dùng rượu uống để ngũ. Tôi cũng đang uống rượu 1 mình, viết vài dòng này cho em ( có lẽ dt chỉ bằng tuổi em tôi).

          Dinh thuong dang đi vào vết xe đổ của tôi. Càng chứng minh, có...
          20-02-2025, 21:31
        Đang tải...
        X