Thông báo

Collapse
No announcement yet.

Clock 60 LED trang tri

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

  • #16
    Nguyên văn bởi phphuong80 Xem bài viết
    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
    ................. Pleiku .................... GIA LAI ...................

    Comment


    • #17
      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

      Comment


      • #18
        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 đó
        Last edited by dat 302; 02-06-2011, 20:35.

        Comment


        • #19
          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
          Code:
          $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
          Last edited by dat 302; 03-06-2011, 17:03.

          Comment


          • #20
            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.

            Comment


            • #21
              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á

              Comment


              • #22
                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

                Comment


                • #23
                  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!

                  Comment


                  • #24
                    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

                    Comment


                    • #25
                      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é,

                      Comment


                      • #26
                        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

                        Comment


                        • #27
                          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

                          Comment


                          • #28
                            Đâ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

                            Comment


                            • #29
                              Nguyên văn bởi phphuong80 Xem bài viết
                              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ô??
                              Vì không biết mọi việc trên đời đều là ảo. thế cho nên......!

                              Comment


                              • #30
                                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

                                Comment

                                Về tác giả

                                Collapse

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

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

                                Collapse

                                Đang tải...
                                X