Chatbox Điện Tử Viễn Thông 09A

Tiến Dũng chào mừng các bạn đến với Điện Tử Viễn Thông 09A!
Cấm nói tục chửi thề...^^!

Thứ Bảy, 9 tháng 4, 2011

Code vi xử lý 16f877a đếm sản phẩm 00-99

PROCESSOR 16F877A
#INCLUDE
__CONFIG _CP_OFF & _WDT_OFF & _BODEN_OFF & _PWRTE_ON & _XT_OSC & _WRT_OFF & _LVP_OFF & _CPD_OFF
DONVI EQU 20H
CHUC EQU 21H
DEM EQU 23H
ORG 0000H

          BCF STATUS,6
          BSF STATUS,5
          MOVLW B'11110000'
          MOVWF TRISB
          BCF TRISD,0
          BCF TRISA,0
          BCF TRISA,1
          BSF TRISA,2
          BCF STATUS,5
          CLRF PORTA
          CLRF PORTB
          CLRF PORTD
          MOVLW D'0'
          MOVWF DONVI
          MOVLW D'0'
          MOVWF CHUC
MAIN         

          MOVF DONVI,W
          MOVWF PORTB
          MOVLW B'11111110'
          MOVWF PORTA
          CALL DELAY
          MOVF CHUC,W
          MOVWF PORTB
          MOVLW B'11111101'
          MOVWF PORTA
          CALL DELAY

BATDAUDEM

          BTFSS PORTB,6
          GOTO KT
          GOTO MAIN
KT
          BTFSS PORTB,6
          GOTO BATDAUDEM
          INCF DONVI,1
          MOVLW D'10'
          XORWF DONVI,0
          BTFSS STATUS,2
          GOTO BATDAUDEM
LOOP
          CLRF DONVI
          INCF CHUC,1
          MOVLW D'10'
          XORWF CHUC,0
          BTFSS STATUS,2
          GOTO BATDAUDEM
          CLRF CHUC
          BSF PORTD,0
          GOTO BATDAUDEM

DELAY
          BSF STATUS,5
          BCF STATUS,6
          BCF OPTION_REG,3
          BCF OPTION_REG,2
          BCF OPTION_REG,1
          BSF OPTION_REG,0
          BCF STATUS,5
          MOVLW D'20'
          MOVWF DEM
BATDAU
          MOVLW D'130'
          MOVWF TMR0
          BSF STATUS,5
          BCF OPTION_REG,5
          BCF STATUS,5
LOOP1
          BTFSS INTCON,2
          GOTO LOOP1
          BCF INTCON,2
          DECFSZ DEM,1
          GOTO BATDAU
 
RETURN

END

Muốn lấy file proteus mô phỏng liên hệ yahoo: dinh_tien_dung.0112@yahoo.com

10 nhận xét:

  1. cám ơn nha! nếu có bai đếm xe nào cho xin luon nha. Sưu tầm mai mốt học lại mà!

    Trả lờiXóa
  2. bạn nhóm nào thế..bài đếm xe àh..có gì liên hệ vào yahoo mình gửi cho..đang upload file để đưa lên blog cho lớp..

    Trả lờiXóa
  3. đếm xe có giống như đếm sản phẩm hok vậy.! bài orcad chưa vẽ nữa. ăn cắp vẽ đại luôn

    Trả lờiXóa
  4. ĐẾm xe cũng giống giống 1 tí..khác một số chỗ thui..chỗ đó mình chưa tìm hiểu..hyhy

    Trả lờiXóa
  5. Em đang làm về Đếm và phân loại SP trắng và đen Giao tiếp PIC 16F877A voi PC sử dụng VB. Em đã truyền được dữ liệu lên PC nhưng hiển thị không đúng ,xin mấy huynh chỉ em hướng giải quyết. Đây là file gồm Chương trình , mô phỏng bàng proteus và VB. http://www.mediafire.com/?195d8sza5tcjubg
    Huynh nào rảnh xem và chỉ em hướng giải quyết Mail của em : vuhoan_vu@yahoo.com

    Trả lờiXóa
  6. mình thấy nó củng hay hay đó! Để tìm được hướng giải quyết sẽ post lên liền. Mình củng thích cái đề tài này. Nếu tìm được trước thì post cho tui tham khảo nhá! hihi!

    Trả lờiXóa
  7. eo oi! thay minh ma ta? ai goi ban vay?

    Trả lờiXóa
  8. Anh nào có sơ đồ mạch đếm xe ra vào sử dụng 16f877a thì cho em xin nha! Em đang rất cần! Mong các anh giúp dùm! email của em là ngoclam0007@gmail.com

    Trả lờiXóa
  9. anh oi co code mach den dem xe xuat ra led 7 doan k cho em xin nha + voi so do nguyen ly luon nha
    email: kidminhhaiku@gmail.com

    Trả lờiXóa
  10. bạn ơi có code mạch đếm sản phẩm dùng pic 16f877a có 3 nút nhấn để cài đặt ko? giúp mình với mình viết code hoài mà ko chạy được

    Trả lờiXóa