các ứng dụng của 8051 vào thực tế

[langtu89]

chao minh hieu

bạn hướng dẫn viết chưởngtinh diều chỉnh tốc đọ dọng cơ 1 chiều theo 2 cấp nhan và châm bạn vẽ hình mo phong chưong trinh dếm tốc đọ động cợ 1 chiieù và hiển thi ra 4 led và chương trình này nưa thank mong tin

[minhhieu]

bạn hướng dẫn viết chưởngtinh diều chỉnh tốc đọ dọng cơ 1 chiều theo 2 cấp nhan và châm bạn vẽ hình mo phong chưong trinh dếm tốc đọ động cợ 1 chiieù và hiển thi ra 4 led và chương trình này nưa thank mong tin

//================================================== ===
mấy hôm nữa mình rảnh sẽ viết cho bạn. bạn thông cảm nhé vì mình đang bận quá.

[langtu89]

minhhieu oi giup minh voi minh dang can gap chuong trinh dieu khien va do hien thi toc đọ dc 1 chieu ban nhớ boss cả mo phong pro nũa nhé phần trưoc bạn co gui nhung bi loi ban nho cho minh mail nhé mail của mình quanghai8888@yahoo.com
ban sua cho minh chương trinhnay lam sao đẻ dộng cơ chỉ quay theo 1 chiều va theo 3 muc toc dộ khác nhau (nếu có thẻ xin viet lai = c va giai thich cho mihnnhé tai lieu trong vd trong mo ter

;HC11 PWM Motor Control Example
;Demonstrates ADC and Timer Output Capture functions

PORTA             equ      $1000
PORTC             equ      $1003
PORTB             equ      $1004
DDRC              equ      $1007
TOC1              equ      $1016
TOC2              equ      $1018
TCTL1             equ      $1020
TCTL2             equ      $1021
TMSK1             equ      $1022
TFLG1             equ      $1023
TMSK2             equ      $1024
PACTL             equ      $1026
ADCTL             equ      $1030
ADR1              equ      $1031
ADR2              equ      $1032

                org $F000

start:          lds  #$FF

		ldaa #$FF			;Port C is output
		staa DDRC

		ldaa #$80			;Enable OC1 interrupts.
		staa TMSK1			;

		ldaa #$2			;Set the prescaler (divide by 16)
		staa TMSK2

		ldaa #$80			;Enable PA7 as output
		staa PACTL
	
                          
                ldaa #$10			;Start first ADC conversion - multi mode enable
                staa ADCTL
                          
		ldd #$0100			;Load the capture register
		std TOC1
			
		cli				;Enable interupts

loop		wai
		bra loop



;OC1 interrupt service
oc1f		ldaa #$10 			;Start another ADC conversion
		staa ADCTL

		ldaa ADR1			;Read the pot position from ADC channel 1
		staa PORTB			;Display it
                                                                                                   
		suba #127			;0x7F is zero reference.
		
		bne oc1f_ne            		;Jump if values not same

;Set Both outputs low. Motor is stationary
		clrb                                   
		stab PORTA			;Both OC1 and OC2 outputs low
		stab TCTL1			;TOC2 mode is disabled
		bra done
		
;Non-zero drive - decide if +ve or -ve:
		
oc1f_ne		bcs oc1f_cs

;Positive result - motor spins clockwise:

		ldab #$40			;Port A drives this value:
		stab PORTA
		clrb				;Release TOC2 latch - Port A acquires value, above.
		stab TCTL1
		ldab #$40 			;TOC 2 output toggles on OC2 event; motor drive stops.
		stab TCTL1
		bra done		

;Negative result - motor spins anti-clockwise:

oc1f_cs		ldab #$80			;Port A drives this value:
		stab PORTA
		clrb                            ;Release TOC2 latch - Port A acquires value, above.
		stab TCTL1
		ldab #$40 			;TOC 2 output toggles on OC2 event; motor drive stops.
		stab TCTL1
		nega				;Invert result -> 0xFF -> 0x01 etc.

;Now set up TOC2 to trigger at a time forward of TOC1. This means that the motor will 
;be powered for the number of ticks in ACCA * 256.                                                                                
		                                                     		                                                     		                                                     
done:		tab     			;TOC 2 is set to trigger after this no of cycles.
 		clra
		rolb
		rola
		rolb
		rola		
		rolb
		rola
		rolb
		rola		
		rolb
		rola		
		addd TOC1  
		std TOC2 
		
		ldd #$1000
		addd TOC1
		std TOC1
		
		ldaa #$80			;Clear the TOC 1 interrupt
		staa TFLG1
		rti


;Interrupt Vectors

		org $FFE8
		dw oc1f		

                org $FFFE
                dw start

[langtu89]

mình hỏi thêm nhé

//================================================== ====
mình có thể hướng dẫn bạn, còn bạn tự viết code nhé.

bạn muốn điều khiển động cơ một chiều có nhiều cách mình giới thiêu một cách là thay đổi độ rộng của xung đưa ra điều khiển.

ví dụ : P0.1 là tín hiệu đưa ra điều khiển

P0_1 = 1;
delay(100); // trễ 100 ms
P0_1 = 0 ;
delay(10);

để có tốc độ thay đổi bạn chỉ thay đổi thời gian trễ dài hay ngắn tương đương với thay đổi độ rộng xung đưa ra điều khiển.

nhưvay tín hiêu tín hiệu dưa ra đièu khiển là p 1 nhưng còn đọng cơ thì nối vao chân nào và nối như thế nào và tín hiêu đo tốc đọ đạt ổ dau giúp mình với

[TDH-BN]

tín hiệu ra của mạch đồng hồ đủ để dùng cho mạch so sánh nên không cần qua tầng khuếch đại nữa đâu. Bạn vào mail mình đã vẽ mạch rồi đấy. bạn có thể dùng con IC LM324 hoặc LM393 để làm mạch so sánh. điều chỉnh biến trở để mạch so sánh hoạt động tốt nhất.
(có ai biết cách gửi file đính kèm chỉ mình với)

Bạn trả lời bài viết bằng Pót Reply ở đó có add file đính kèm đó.
Rùi bạn chỉ cần add file từ máy tính lên thôi.
Theo mình thì mục này là ứng dụng thực tế các bạn nên cho thêm mạch mô phỏng Proteus hoặc mạch chematic (dùng orcad hoặc protel ),có như vậy mọi người mới thực sự ứng dụng nó để test mạch thực tế .Mình thấy từ việc dịch từ KeilC hay mô phỏng khi test thực tế khó hơn nhiều

[nguyentienxi]

có ai biet về ds1307 lấy real time như thế nào kông giúp em với,em chả biết tí gi ve nó cả

[minhhieu]

Bạn langtu89 vào hòm mail của mình. mình mới up lên code và ví dụ mô phỏng điều khiển động cơ một chiều công suất nhỏ. bạn muốn công suất ra lớn và điện áp cao phải dùng đến mạch cách li và tăng công suất... đây chi là ví dụ tham khảo cho bạn thôi. Bạn dùng proteus 7.1 sp2 mô phỏng mới được và dùng KeilC để dịch file. Bạn tự ghép với phần code đếm tốc độ động cơ nhé.

[minhhieu]

Sao mình vào mail của bạn được. Vậy bạn có thể gởi mail cho mình được ko vậy. Tên hộp mail là: hongtamdientu@yahoo.com . Cám ơn bạn trước nha.

mình tạo một hòm mail để mọi người có thể vào đó lấy tài liệu. Nếu vào không thấy trong phần "hộp thư đến" thì bạn chọn trong mục "Tất cả các thư" hoăc "Các thư đã gửi" để down tài liệu. địa chỉ mail ở trang đầu mình đã ghi rồi.

[minhhieu]

bạn langtu89 xem hình vẽ để hình dung ra đĩa Encoder và một photo diode làm phần cảm biến tốc độ quay của động cơ.

[minhhieu]

Đây là tài liệu học C cho 8051 dịch bằng KeilC (tài liệu tiếng anh).

[minhhieu]

Còn đây là tài liệu về Assembler

[minhhieu]

Còn đây là tài liệu về Timer

[minhhieu]

Bạn nào quan tâm đến làm đồng hồ bằng 89 tham khảo ví dụ này

[choemhocvoi]

Anh MinhHieu a.Minh ko biet khi viet CT protues7.1 thi dung cai trinh gi
de viet file .asm ,roi sau do dich no ra = ct gi de cho no hop ly voi ct
protues7.1
Xin cho cach huong dan cu the
cam on Anh nhieu nhe.

[minhhieu]

Anh MinhHieu a.Minh ko biet khi viet CT protues7.1 thi dung cai trinh gi
de viet file .asm ,roi sau do dich no ra = ct gi de cho no hop ly voi ct
protues7.1
Xin cho cach huong dan cu the
cam on Anh nhieu nhe.

Nếu bạn sủ dụng ngôn ngữ C có thể dùng KeilC để viết và dịch rất đơn giản, Còn viết bằng Assembler có thể dùng phần mềm Read51 để dịch. sau khi dịch ra sẽ được file có đuôi " .hex " . proteus sử dụng file này để dùng cho mô phỏng.
Còn hướng dẫn cụ thể, tại diễn đàn đã có phần hướng dẫn rồi.
http://dientuvietnam.net/forums/showthread.php?t=1163