Clock 60 LED trang tri

[thi tran]

Vừa thiết kế xong sản phẩm này, mọi người xem và cho biết ý kiến nha. Thanks
www.youtube.com/watch?v=HDmNg__Fkz4

Thật là đẹp quá đi thôi ! mình lập trình ntn mà 89 nó làm 1 lúc 2 việc vậy mấy pro ? ngưỡng mộ anh Phương wa

[ckd08]

Muốn gì thì cứ mail cho tác giả

Đây là sản phẩm Đồng hồ LED siêu sáng, ứng dụng để trang trí phòng khách rất lạ và đẹp mắt, với các hiệu ứng quay vòng của 60 LED, có chế độ tự động giảm độ sáng vào ban đêm, nhìn rõ, không bị chói mắt, thay thế đèn ngủ. Giá bán lẻ sản phẩm này là 320.000 vnđ/cái. Chi tiết liên hệ:
Email: phphuong80@yahoo.com.vn
ĐT: 0909.351969 gặp A.Phương

[dat 302]

Anh Phưong post cái ni lên diễn đàn mục đích là để thương mại thôi. Mình làm cái ni mãi mà không chạy thấy anh ấy pro nên gửi mail mấy lần hỏi anh ấy mà anh ấy có chịu hồi âm lại cho mình đâu. Theo em nghĩ diễn đàn này là để trao đổi và học hỏi chứ mua bán thì anh nên lên trang web rao vặt hay vật giá đi anh ạ. Đôi điều em góp ý vậy thôi mong anh đừng dận em anh nhé. Nhưng phải công nhân là anh Phương pro thiệt, nói tóm lại là em vẫn phục anh đó

[dat 302]

Giờ mình mong anh em có thể góp ý cho mình về cái mạch đồng hồ của mình với các anh em nhé. Cũng ngại hỏi nhưng trình độ mình có hạn nên anh em thông cảm. Đây là sơ đồ mạch của mình gồm sơ đồ nguyên lý, layout và code mong anh em bớt chút thời gian giúp đỡ mình với nhé.

Đây là layout mình đã vẽ

Còn đây là code của cái mạch ni code này mình được bác pctcom cho mình

$MOD51
;=====================================

  	XUNG_NHAY	 	DATA	38H		; XUNG 100ms
 	BIEN_NHAY    	DATA	39H		;0 = SANG TAT CA DEN , 1 = NHAY led TUONG UNG KHI set
  	GIAY         	DATA	40H
  	PHUT         	DATA	41H
  	GIO          	DATA	42H
  	DONVI_GIAY   	DATA	47H
  	CHUC_GIAY    	DATA	48H
  	DONVI_PHUT   	DATA	49H
  	CHUC_PHUT    	DATA	4AH
  	DONVI_GIO    	DATA	4BH
 	CHUC_GIO     	DATA	4CH
	PHAN_TRAM_GIAY	DATA	4DH
	FLAG_SET		DATA	4EH 	;0 = KHONG SET , 1 = SET PHUT , 2 = SET GIO
	LED_GIAY       	BIT		P2.0
	LED_C_GIAY     	BIT		P2.1
 	LED_PHUT       	BIT		P2.2
	LED_C_PHUT     	BIT		P2.3
	LED_GIO       	BIT		P2.4
	LED_C_GIO     	BIT		P2.5
;--------I2C-------
	SCL				BIT		P3.0
	SDA				BIT		P3.1
	SW_1			BIT		P3.2
	SW_2			BIT		P3.3
	SW_3			BIT		P3.4
	LED_DATA		EQU		P0
	BYTE_W			EQU	11010000B
	BYTE_R			EQU	11010001B
	ADD_LOW			EQU	62H
	DATA_DS			EQU	63H
;=====================================
;=====================================
	ORG 00H
	LJMP 	MAIN
;===========================
;===========================
	ORG 0BH
	LJMP 	NGAT_TIME
;===========================
;===========================
	ORG 030H
MAIN: 					;reset tat ca cac bien
	MOV 	GIAY,#0
	MOV 	PHUT,#0
	MOV 	GIO,#0
	MOV 	BIEN_NHAY,#0
	MOV		XUNG_NHAY,#0
	MOV		FLAG_SET,#0
	MOV 	R0,#0
	MOV 	IE,#10001010B
	MOV 	TMOD,#11H
	MOV 	TL0,#LOW(-9216)
	MOV 	TH0,#HIGH(-9216)
	SETB 	TR0
	MOV		A,#0FFH
	MOV		LED_DATA,A
	MOV 	DPTR,#BANGSO
		CLR	SCL
		CLR	SDA
		NOP
		SETB	SCL
		SETB	SDA
		NOP
		MOV     ADD_LOW,#00H
		MOV     DATA_DS,#00H
		LCALL   WRITE_BYTE
	
;==========================================
LOOP_HIEN_THI:			; chuong trinh chinh chay tai day
;==========================================
	MOV 	A,FLAG_SET				
	CJNE 	A,#0,L_HT
	CALL 	INIT_PORT
L_HT:
	LCALL   HIEN_THI
	LCALL 	SCAN_KEY
	SJMP 	LOOP_HIEN_THI
;==========================================


	INIT_PORT:
;==================================================READS SECONDS
READ_SEC:
			MOV     ADD_LOW,#00h
			LCALL   READ_BYTE
			MOV 	GIAY,DATA_DS
			LCALL	I2C_STOP
;==================================================READS MINUTES
			MOV     ADD_LOW,#01h
			LCALL   READ_BYTE
			MOV 	PHUT,DATA_DS
			LCALL	I2C_STOP
;==================================================READS HOURS
			MOV     ADD_LOW,#02h
			LCALL   READ_BYTE
			MOV 	GIO,DATA_DS
			LCALL	I2C_STOP
	RET
;==================================================================================
;=====stop I2C communication
I2C_Stop:
	CLR       SDA
	SETB      SCL
	NOP
	SETB      SDA
	RET
;==================================================================================
;*****************************************************
;*            WRITE DATA_DS TO DS1307 1 BYTE	*
;*	INPUT 	: ADD_LOW		*
;*		: DATA_DS			*
;*****************************************************
WRITE_BYTE:            CLR     SDA                   ;start bit
                       CLR     SCL
                       MOV     A,#BYTE_W        ;send control byte
                       LCALL   LOOP_BYTE
                       SETB    SDA
                       SETB    SCL
                       JB      SDA,WRITE_BYTE        ;loop until busy
                       CLR     SCL
                       MOV     A,ADD_LOW             ;send address low
                       LCALL   LOOP_BYTE
                       SETB    SDA
                       SETB    SCL
                       JB      SDA,WRITE_BYTE        ;loop until busy
                       CLR     SCL
                       MOV     A,DATA_DS                ;send DATA
                       LCALL   LOOP_BYTE
                       SETB    SDA
                       SETB    SCL
                       JB      SDA,WRITE_BYTE        ;loop until busy
                       CLR     SDA
                       CLR     SCL
                       SETB    SCL                   ;stop bit
                       SETB    SDA
                       RET

;******************************************************
;*            READ DATA FROM DS1307 1 BYTE	*
;* INPUT  : ADD_HIGH			*
;*        : ADD_LOW				*
;* OUTPUT : DATA_DS			*
;******************************************************
READ_BYTE:             CLR     SDA                   ;start bit
                       CLR     SCL
                       MOV     A,#BYTE_W        ;send control byte
                       LCALL   LOOP_BYTE
                       SETB    SDA
                       SETB    SCL
                       JB      SDA,READ_BYTE         ;loop until busy
                       CLR     SCL
                       MOV     A,ADD_LOW             ;send address low
                       LCALL   LOOP_BYTE
                       SETB    SDA
                       SETB    SCL
                       JB      SDA,READ_BYTE         ;loop until busy
                       CLR     SCL

                       SETB    SCL
                       SETB    SDA
                       CLR     SDA                   ;start bit
                       CLR     SCL
                       MOV     A,#BYTE_R        ;send control byte
                       LCALL   LOOP_BYTE
                       SETB    SDA
                       SETB    SCL
                       JB      SDA,READ_BYTE         ;loop until busy
                       CLR     SCL
                       LCALL   LOOP_READ
                       SETB    SDA
                       SETB    SCL
                       CLR     SCL

                       SETB    SCL                   ;stop bit
                       SETB    SDA
                       RET

;****************************************************
;*                      WRITE                       *
;* INPUT: ACC                                       *
;****************************************************
LOOP_BYTE:             PUSH    02H
                       MOV     R2,#08H
LOOP_SEND:             RLC     A
                       MOV     SDA,C
                       SETB    SCL
                       CLR     SCL
                       DJNZ    R2,LOOP_SEND
                       POP     02H
                       RET
;*****************************************************
;*                       READ                        *
;* OUTPUT: ACC                                       *
;*****************************************************
LOOP_READ:             PUSH   02H
                       MOV    R2,#08H
LOOP_READ1:            SETB   SCL
                       MOV    C,SDA
                       CLR    SCL
                       RLC    A
                       DJNZ   R2,LOOP_READ1
                       MOV    DATA_DS,A
                       POP    02H
                       RET


;==========================================
TACHSO:								; tach rieng hang chuc va hang don vi bang cach chia cho 10
;==========================================
	MOV 	A,GIAY					;Lan luot chia cac Bien: Giay, Phut, Gio cho 10 
	MOV 	B,#10H 					;de tach phan Don Vi va Hang Chuc ra, de cat rieng vao cac Bien tuong ung.
	DIV 	AB                 		;PHAN NGUYEN trong A, PHAN DU trong B
	MOV 	CHUC_GIAY,A   			;Luu lai HANG CHUC Giay
	MOV 	DONVI_GIAY,B  			;luu lai DON VI Giay
	;==========
	MOV 	A,PHUT
	MOV 	B,#10H
	DIV 	AB
	MOV 	CHUC_PHUT,A
	MOV 	DONVI_PHUT,B
	;==========
	MOV 	A,GIO
	MOV 	B,#10H
	DIV 	AB
	MOV 	CHUC_GIO,A
	MOV 	DONVI_GIO,B
RET
;========================================
HIEN_THI: 							; HIEN THI LED 7 DOAN
;========================================
    MOV 	A,FLAG_SET			
	CJNE 	A,#0,CHOP_NHAY
    LCALL   HIENTHI
    AJMP	THOAT_HIENTHI
;========================================
CHOP_NHAY:							; KIEM TRA BIEN NHAY VA FLAG_SET DE TAO HIEU UNG NHAY LED DANG SETING
;=================================
	MOV 	A,BIEN_NHAY				
	CJNE 	A,#0,CHOP_NHAY1
	LCALL 	HIENTHI
	AJMP	THOAT_HIENTHI
CHOP_NHAY1:
	LCALL	NHAY
	JMP CHOP_NHAY
THOAT_HIENTHI:
RET
;=================================
HIENTHI:
;=================================
	LCALL 	HIENTHI_S
	LCALL 	HIENTHI_P
	LCALL 	HIENTHI_G
RET
;=================================
NHAY:
;=================================
	MOV		A,FLAG_SET				
	CJNE 	A,#1,KT1		
	LCALL 	HIENTHI_S
	LCALL 	HIENTHI_G
KT1:
	MOV		A,FLAG_SET				
	CJNE 	A,#2,THOAT_N
	LCALL 	HIENTHI_S
	LCALL 	HIENTHI_P
THOAT_N:
RET
;=================================
HIENTHI_S:
;=================================
			;hien thi hang don vi cua Giay
	MOV 	A,DONVI_GIAY
	MOVC 	A,@A+DPTR
    MOV     LED_DATA,A
    CLR 	LED_GIAY
	LCALL 	DL
	SETB 	LED_GIAY
;==========
    MOV 	A,CHUC_GIAY		;hien thi hang chuc cua Giay
	MOVC 	A,@A+DPTR
    MOV 	LED_DATA,A
	CLR 	LED_C_GIAY
	LCALL 	DL
	SETB 	LED_C_GIAY
RET	
;=================================
HIENTHI_P:
;=================================
	MOV 	A,DONVI_PHUT	;hien thi hang don vi cua Phut
	MOVC 	A,@A+DPTR
	MOV 	LED_DATA,A
	CLR 	LED_PHUT
	LCALL 	DL
	SETB 	LED_PHUT
;============
	MOV 	A,CHUC_PHUT		;hien thi hang chuc cua Phut
	MOVC 	A,@A+DPTR
	MOV 	LED_DATA,A
	CLR 	LED_C_PHUT
	LCALL 	DL
	SETB 	LED_C_PHUT
RET	
;=================================
HIENTHI_G:
;=================================
	MOV 	A,DONVI_GIO		;hien thi hang don vi cua gio
	MOVC 	A,@A+DPTR
	MOV 	LED_DATA,A
	CLR 	LED_GIO
	LCALL 	DL
	SETB 	LED_GIO
	;============
	MOV 	A,CHUC_GIO		;hien thi hang chuc cua Gio
	MOVC 	A,@A+DPTR
	MOV 	LED_DATA,A
	CLR 	LED_C_GIO
	LCALL 	DL
	SETB	LED_C_GIO
RET
;=================================
NGAT_TIME:
;=================================
	INC		XUNG_NHAY
	INC 	PHAN_TRAM_GIAY   		;DAT TIMER CHAY 1/100 GIAY
	MOV 	TL0,#LOW(-9216)
	MOV 	TH0,#HIGH(-9216)
	SETB 	TR0
	;===============   
	PUSH ACC
	PUSH PSW						;Thanh ghi trang thái chuong trình
	;==========
	MOV 	A,XUNG_NHAY				;TAO XUNG NHAP NHAY = 1/4 GIAY
	CJNE 	A,#25,TIME1
	MOV 	XUNG_NHAY,#0
	INC		BIEN_NHAY
	MOV 	A,BIEN_NHAY				
	CJNE 	A,#3,TIME1
	MOV 	BIEN_NHAY,#0
	;==========
TIME1:
	MOV 	A,PHAN_TRAM_GIAY		;Kiem tra bien PHAN_TRAM_GIAY - Thoat khoi ngat Time0 neu khong =
	CJNE 	A,#100,THOAT_NGAT_TIME
	MOV 	PHAN_TRAM_GIAY,#0		;Neu = 100 thì set bien nay = 0
	;===============
THOAT_NGAT_TIME:
	LCALL 	TACHSO
	POP 	PSW
	POP 	ACC
RETI
;==================================
SCAN_KEY:					;KIEM TRA PHIM NHAN
;==================================
SW1:				        ;SET TIME
	JB		SW_1,SW2
	INC		FLAG_SET				
	MOV		A,FLAG_SET
	CJNE 	A,#3,L_SW1

;==========	
		MOV     ADD_LOW,#01H
		MOV     DATA_DS,PHUT
		LCALL   WRITE_BYTE
;==========	
	MOV             FLAG_SET,#0

L_SW1:
	LCALL	DL1
	LCALL	DL1
	LCALL	DL1
	LCALL	DL1
	LJMP	NOKEY
;===============
SW2:						  ;SET_MIN
	JB		SW_2,SW3				
	MOV		A,FLAG_SET				
	CJNE 	A,#0,SW20
	LJMP	NOKEY
SW20:
	MOV		A,FLAG_SET				
	CJNE 	A,#1,TANG_GIO			;
	JB		SW_2,SW3
;===============
TANG_PHUT:
	INC 	PHUT					;Roi tang Bien phut them 1
	MOV 	A,PHUT
	CJNE 	A,#60,L_SW2				;
	MOV 	PHUT,#0					;Neu = 60 thì set bien nay = 0
L_SW2:
	LCALL	DL1
    LCALL	DL1
	LJMP	SW2
;===============
TANG_GIO:                            ;SET HOUR
	JB		SW_2,SW3
	MOV		A,FLAG_SET
	CJNE 	A,#2,SW3
	JB		SW_2,SW3
	INC 	GIO						;Roi tang Bien Gio them 1
	MOV 	A,GIO
	CJNE 	A,#24,L_TANG_GIO		;Bien gio = 60? - Thoat khoi ngat Time0 neu khong =
	MOV 	GIO,#0	
L_TANG_GIO:
	LCALL	DL1
    LCALL	DL1
	LJMP	TANG_GIO
;==============================
SW3:								;DANG NHAN SW3?
	JB		SW_3,NOKEY				;KHONG NHAN SW2? KIEM TRA SW3
	MOV		A,FLAG_SET				
	CJNE 	A,#0,SW30
	LJMP	NOKEY
SW30:	
	MOV		A,FLAG_SET				;DANG NHAN SW2. KIEM TRA CHE DO CHINH GIO HAY CHINH PHUT.	
	CJNE 	A,#1,GIAM_GIO			;
	JB		SW_3,NOKEY
;===============	
GIAM_PHUT:
	DEC 	PHUT					;Roi tang Bien phut them 1
	MOV 	A,PHUT
	CJNE 	A,#-1,L_SW3			;Bien Phut = -1? - Thoat khoi ngat Time0 neu khong =
	MOV 	PHUT,#59			;Neu = -1 thì set bien nay = 60
L_SW3:
	LCALL	DL1
    LCALL	DL1
	LJMP	SW3
;===============
GIAM_GIO: 
;===============   
	JB		SW_3,NOKEY
	MOV		A,FLAG_SET
	CJNE 	A,#2,NOKEY
	
	LCALL	HIENTHI
	JB		SW_3,NOKEY
	DEC 	GIO						;Roi Giam Bien Gio them 1
	MOV 	A,GIO
	CJNE 	A,#-1,L_GIAM_GIO				;Bien gio = -1? - Thoat khoi ngat Time0 neu khong =
	MOV 	GIO,#23	
L_GIAM_GIO:
	LCALL	DL1
    LCALL	DL1
	LJMP 	GIAM_GIO
;===============	
NOKEY:
RET
;=================================
DL:
;=================================
	MOV 	R7,#200
	DJNZ 	R7,$
	RET
;==================
DL1:			 
;==================
 PUSH 00H
 PUSH 01H
 MOV R1,#20O
DEL:
LCALL   HIEN_THI
LCALL   HIEN_THI
LCALL   HIEN_THI
 MOV R0,#250
 DJNZ R0,$
 DJNZ R1,DEL
 POP 01H
 POP 00H
RET
;===================
DELAY_1MS:
;===================
	MOV 	R7,#200
DL_1MS_1:
	MOV 	R6,#200
	DJNZ 	R6,$
	DJNZ 	R7,DL_1MS_1
RET
;====================
DELAY:
;====================
	NOP
	NOP	
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
RET
;=================================
BANGSO:
;=================================
	DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
RET	
END

[hahai]

bây giờ bạn thử bằng cách này nhé ! bạn rút 2 cái jack kết lối ra led và xem cái led chỉ thị từ chân 7 của con ds1307 xem có nhấp nháy không ? nếu có nhấp nháy thì chứng tỏ mạch ok, còn ko thấy động tĩnh gì thì chứng tỏ mạch và code có vấn đề, trước mắt bạn cứ thử như thế đi đã tiếp đến mình sẽ bàn tiếp.

[dat 302]

ok Có người bày rồi chờ mãi cũng có 1 vị anh hùng mình cảm ơn bạn rất rất nhiều mình sẽ làm như bạn nói ngay. Hi hi vui quá

[dat 302]

http://i1191.photobucket.com/albums/...302/mach-1.jpg

Bạn hahai ơi mình đã làm như bạn rồi mà mấy con led đó nó không nhấp nháy mà có điều mình chưa hiểu khi mình đo áp ở chỗ chân c con bjt pnp của mạch cách li giữa nguồn 12v và nguồn của con vdk chỉ được có 7v thôi, nhưng như vậy nó cũng làm cho các con led 7 đoạn sáng rồi( mới chỉ là vấn đề sang thôi chứ chẳng được chi cả) trong lúc đó chân c ở bjt pnp ở cái mạch cách li giữa con ds1307 và nguồn 12v mình đo không được 2v làm cho mấy con led này không sáng được. Thiệt là khó hiểu wá đi. Bạn có thể nêu ra một vài lý do được không. Mình cũng sẽ cố suy nghĩ nhưng nói chung là vẫn khó hiểu

[ckd08]

Bạn ơi! Bạn bỏ cái code của bạn vào thẻ code đi, để dài quá chiếm hết cả trang. Cái thẻ có hình "#" ấy
Thân!

[dat 302]

Có bạn nào xem qua bài của mình gửi lên cái được không? Mình xin cảm ơn các bạn rất nhiều

[hahai]

Bạn ktra lại mạch darlington của bạn đi, chắc như vậy ko dùng được 12V rồi, bạn xem cái mạch mà mình gửi cho bạn ấy, cái mạch ấy mình lắp chạy cho led đơn sáng đẹp luôn hihi, lý do bạn được có 7V là vì quyét led thì ko thể đủ điện áp cả 12V đâu, bạn thử lắp cái mạch darlington giống của mình xem có được ko nhé,

[dat 302]

Bạn up mach của bạn lên cho mình xem cái bạn. Mình nghĩ mạch của mình thì không sai đâu mình nghĩ chương trình sai sửa đi sử lại rồi mà vẫn không được bạn ạ. Nếu có chương trình thì bạn có thể gửi cho mình tham khảo với bạn nhé. Thank bạn nhiều

[zinzin8991]

mạch của anh phương đẹp quá. e cũng muốn làm mạch mà làm hoài không được. e cũng học nhưng khó quá. mong anh gởi code và bài làm cho em được không. email của em : traitimdoncoi8991@gmaiil.com

[donglkb]

Đây là diễn đàn share kiến thức cho nhau, không dành cho những người shoow hàng hay kinh doanh. Xin cảm ơn. Chủ topic hãy xem lại mình. Anh em cùng nhau học hỏi mà đụng rồi biến đâu mất

[Ng_Hau]

Vừa thiết kế xong sản phẩm này, mọi người xem và cho biết ý kiến nha. Thanks
www.youtube.com/watch?v=HDmNg__Fkz4

cái này là bạn tự làm hay kiếm đâu??
nếu tự làm thì có thể úp file sơ đồ và code lên cho a e tham khảo đc kô??

[donglkb]

Người ta up thì up lâu rồi chứ đâu có biến lun như bây giờ đâu mua 320k/1 cái thì ổng bán cho kìa