Ứng dụng vi điều khiển thiết kế bộ điều khiển động cơ điện một chiều

L I C M ƠN Sau trình h c t p nghiên c u t i trư ng i H c Nha Trang em xin chân thành c m ơn nhà trư ng, quý th y cô khoa Khai Thác quý th y cô b môn giúp i n– i nT cho em b n ã t n tình d y d , t o i u ki n h c t p y t k t qu cao h c t p c bi t em xin chân thành c m ơn th y giáo ThS Nh Kh i Hồn ã t n tình hư ng d n, giúp Xin g i em trình th c hi n tài n m i ngư i b n bè lịng bi t ơn s ng viên h tr t c k t qu ngày hôm Xin chân thành c m ơn! Sinh viên Cao Văn Hòa PH N NH N XÉT C A CÁN B Tên HƯ NG D N tài: ng d ng vi i u n thi t k b i u n ng i n m t chi u H tên sinh viên th c hi n : Cao Văn Hòa Mã s sinh viên: 4913024019 Khóa 49, chun ngành cơng ngh k thu t i n – i n T Nh n xét c a CÁN B HƯ NG D N: …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… ………………………………………… I M: ………………(B ng ch …………….) DH Nha Trang, ngày … Tháng ….Năm…… CÁN B HƯ NG D N NH N XÉT C A GIÁO VIÊN PH N BI N Tên tài: ng d ng vi i u n thi t k b i u n ng i n m t chi u H tên sinh viên th c hi n: Cao Văn Hòa Mã s sinh viên : 4913024019 Khóa 49, chun ngành Cơng ngh k thu t i n – i n T Nh n xét c a giáo viên ph n bi n : …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… ……………………………………………………………… Giáo viên ph n bi n NH N XÉT C A GIÁO VIÊN PH N BI N Tên tài: ng d ng vi i u n thi t k b i u n ng i n m t chi u H tên sinh viên th c hi n: Cao Văn Hòa Mã s sinh viên : 4913024019 Khóa 49, chun ngành Cơng ngh k thu t i n – i n T Nh n xét c a giáo viên ph n bi n : …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… …………………………………………………………………………………… ……………………………………………………………… Giáo viên ph n bi n M CL C Chương : T NG QUAN V TÀI ………………………………… …… 1.1 Lý ch n tài…………………… ………………… …… ………1 1.2 M c ích th c hi n tài………………………………… ……… 1.3 N i dung tài…………………………… …………………… …… 1.4 Phương pháp nghiên c u…………………………………………………2 1.5 Gi i quy t v n …………………………………………………………2 Chương : TÌM HI U V NG CƠ I N M T CHI U…………………… 2.1 T m quang tr ng c a ng i n m t chi u……………………… 2.2 C u t o c a ng i n m t chi u……………………………… 2.2.1 Ph n tĩnh hay stato…………………………………………………… 2.2.2 Ph n quay hay roto…………………………………………………… 2.2.3 Nguyên lý làm vi c phương trình c n b ng i n áp c a ng i n m t chi u……………………………………………………………………… 2.2.4 M máy ng i n m t chi u i u ch nh t c ……………… 2.2.4.1 M máy ng i n m t chi u………….……………………………6 2.2.4.1 i u ch nh t c …………………………………………………… Chương 3: CÁC LINH KI N LIÊN QUAN……………………………………… 3.1 Vi i u n MCS51…………………………………………….…… 3.1.1 Gi i thi u chung………………………………………………… 3.1.2 Gi i thi u vi i u n AT89x52…………………………………… 3.1.2.1 Sơ chân c a AT89x52…………………………………………… 11 3.1.2.2 T ch c b nh …………………………………………………… 13 3.1.2.3 Các b nh th i/b m…………………………………………… 15 3.1.2.4 i u n ng t………………………………………………… 19 3.1.2.4.1 Khái quát……………………………………………………… 19 3.1.2.4.2 X lý ng t………………………………………………….……… 21 3.1.2.4.3 ng d ng ng t……………………………………………….…… 22 a Ng t b nh th i…………………………………….………… …… 22 b Ng t ngoài…………………………………………… …………… 23 3.1.2.5 Ho t ng truy n thông n i ti p…………………………… …… 24 3.2 IC MAX232 tìm hi u k t n i máy tính theo chu n RS232C.………26 3.2.1 IC MAX232…………………………………………………… …… 26 3.2.1 K t n i máy tính theo chu n RS232C………………………… 27 3.3 LCD 16x2…………………………………………………… ………29 3.3.1 Ch c chân………………………………………….……… 29 3.3.2 Các thành ph n ch c c a LCD16x2……………………………30 3.3.3 Các ch truy n d li u t p l nh c a LCD…………………… 30 3.3.4 Nguyên t c hi n th ký t LCD………………………………… 32 3.4 74LS148……………………………………………………………… 32 3.5 TRANSISTOR H1061……………………………………… ……… 33 Chương : THI T K H TH NG……………………………………… ……… 35 4.1 Sơ ch c năng……………………………………………… ……….35 4.2 Thi t k ch c năng…………………………………………… .35 4.2.1 Ph n c ng……………………………………………………………….35 4.2.2 Ph n m m……………………………………………………… 36 4.3 Thi t k m ch nguyên lý……………………………………….……….36 4.3.1 Gi i thi u Ocard……………………………………………………… 36 4.3.2 Module ngu n……………………………………………… ……… 37 4.3.3 Module m ch c u H……………………………………… ………… 38 4.3.3.1 Tìm hi u m ch c u H……………………………………………… 38 4.3.3.2 Tìm hi u d ng c u t o b n c a m ch c u H thư ng g p m ch i u n ng DC………………………………….………… 39 4.3.3.3 Module m ch c u H………………………………………………… 39 4.3.4 Module vi i u n……………………………………….… 42 4.3.5 Module giao ti p máy tính - RS232……………………… ……… 43 4.3.6 Module báo ho t ng c a ng cơ…………………………… 44 4.3.7 Module o t c ng cơ…………………………………………….44 4.4 Tìm hi u phương pháp i u r ng xung (PWM) thi t k ph n m m…………………………….……………………………………… 45 4.4.1 Tìm hi u phương pháp i u r ng xung (PWM)…………… 45 4.4.2 Thi t k ph n m m…………………………………………… 46 4.4.2.1 Lưu thu t toán………………………………………….…………46 4.4.2.2 Sơ thu t toán…………………………………………… .47 4.4.2.3 Gi i thi u ngôn ng l p trình Visual Basic v i truy n thơng n i ti p………………………………………………………………… … 49 4.4.2.4 Ph n m m vi t chương trình n p cho vi i u n…… … 49 Chương : ÁNH GIÁ K T QU VÀ K T LU N…………………………… 52 5.1 Ch y th nghi m ánh giá k t qu ……………………………… 52 5.1.1 Ch y th nghi m…………………………………………………… 52 5.1.2 ánh giá k t qu thu c………………………… ……………… 53 5.2 K t lu n………………………………………………………………53 5.3 Hư ng phát tri n tài…………………………………….…………54 TÀI LI U THAM KH O………………………………………… …………55 PH C L C……………………………………………………… ………… 56 i DANH M C CÁC B NG TÊN B NG N I DUNG TRANG B ng 3.1 Các ch c riêng c a chân c ng p3 11 B ng 3.2 Tr ng thái ghi sau reset 13 B ng 3.3 M t s ghi chuyên d ng c a vi i u n AT89X52 15 B ng 3.4 Các ch 17 B ng 3.5 B ng vector ng t 22 B ng 3.6 B ng s p x p chân c a c ng n i ti p 28 B ng 3.7 B ng t p l nh c a LCD 32 B ng 3.8 B ng tr ng thái IC 74LS148 33 B ng 3.9 B ng thông s c a transistor H1061 34 B ng 4.1 B ng li t kê giá tr baud h p l 50 B ng 4.2 B ng mô t giá tr ch n l h p l 50 ho t ng c a b m ii DANH M C CÁC HÌNH TÊN HÌNH N I DUNG TRANG Hình 2.1 Hình nh c u t o chung c a Hình 3.1 Sơ Hình 3.2 M ch t o dao AT89X52 Hình 3.3 Sơ nghép n i truy n thơng n i ti p 24 Hình 3.4 Sơ chân IC MAX232 26 Hình 3.5 C ng n i ti p RS232 g m lo i :25 chân chân 27 Hình 3.6 LCD 16X12 29 Hình 3.7 Sơ 33 Hình 3.8 Transistor H1061 Hình 4.1 Sơ Hình 4.2 Chương trình ocard 36 Hình 4.3 Sơ module ngu n 37 Hình 4.4 Sơ nguyên lý kh i ngu n 38 Hình 4.5 Sơ nguyên lý m ch c u H dùng tín hi u i u n 39 Hình 4.6 Sơ nguyên lý m ch c u H dùng tín hi u i u n 40 Hình 4.7 Sơ nguyên lý module m ch c u H 42 Hình 4.8 Sơ nguyên lý module vi i u n 42 Hình 4.9 Sơ kh i giao ti p gi a máy tính vi i u n 43 Hình 4.10 Sơ nguyên lý kh i giao ti p máy tính 43 Hình 4.11 Sơ hi n th thơng báo ho t Hình 4.12 Sơ nguyên lý module o t c Hình 4.13 ng m t chi u chân vi i u n 10 ng cho b t o dao ng chip chân 74ls148 13 34 ch c Module i u n ng ng c a ng ng th d ng xung i u ch PWM Hình 4.14 Lưu thu t tốn t ng quát i u n Hình 4.15 Lưu thu t tốn bàn phím 35 44 44 45 ng 47 48 iii Hình 4.16 Giao di n ph n m m l p trình read51 Hình 5.1 Hình nh module hi n th trình ho t ng Hình 5.2 Hình nh ho t Hình 5.3 Hình nh giao di n i u n Hình 5.4 Hình nh toàn b ph n c ng ng c a 51 ng c a ng 52 52 ng máy tính 53 54 Chương T NG QUAN V 1.1 Lý ch n TÀI tài i u n máy i n m t lĩnh v c nghiên c u ng d ng thi t b , khí c sơ i u n ph c v nhu c u thay mô men, t c i i lư ng c a chuy n ng hay i u n v trí tùy theo yêu c u phát sinh c a m i lo i hình s n xu t ng m t chi u c s d ng t lâu h truy n t c yêu c u d i i u ch nh l n, ho t ng M ts ch kh i ng, hãm ng d ng quan tr ng c a n nh, t c ng có i u n cao h thư ng xuyên o chi u ng i n m t chi u truy n ng cho xe i n, máy công c , máy v n chuy n, máy cán, máy nghi n, v.v… Chính v y “ chi u” ng d ng vi i u n thi t k b ng i n m t tài có tính ng d ng th c t cao 1.2 M c ích th c hi n tài Thi t k mô hình xây d ng chương trình trình ho t ng c a 1.3 N i dung i u ng m t chi u, hi n th ng Hi n th trình ho t V i i u n ng c a mơ hình lên máy tính thơng qua c ng RS232 tài tài ta c n hoàn thành n i dung sau: - Tìm hi u sơ lư c v ng i n m t chi u - Tìm hi u v vi i u n linh ki n liên quan - Thi t k h vi i u n th c hi n ch c sau: + i u n t c chi u quay c a + Hi n th tr ng thái ho t - Tìm hi u nguyên lý ho t ch nh ng c a ng m t chi u ng m t chi u ng c a m ch c u H áp d ng vào mơ hình ng - Hi n th q trình ho t ng c a mơ hình lên máy tính i u 62 clr c add a,#1 mov r7,a thoat_tang: lcall PWM cjne r1,#0ffh,chayngich1 lcall hienthi3 sjmp thoat2 chayngich1: cjne r1,#0fh,thoat2 lcall hienthi4 thoat2: ret giam: ; o n x lý phím gi m clr c cjne r7,#30,khong_bang_giam sjmp thoat_giam khong_bang_giam: jc thoat_giam jnc giam_giam giam_giam: mov a,r7 clr c subb a,#1 mov r7,a thoat_giam: lcall PWM cjne r1,#0ffh,chayngich2 lcall hienthi3 sjmp thoat3 chayngich2: cjne r1,#0fh,thoat3 lcall hienthi4 thoat3: ret ;////////////////// I U R NG XUNG///////////////// ; o n i u r ng xung PWM: mov r4,#20 lap_xung_thuan: mov r3,#150 mov r2,a clr c mov a,r3 subb a,r2 mov r5,a 63 duong_thuan: lcall xung_duong djnz r5,duong_thuan cjne r1,#0ffh,am_nghich am_thuan: lcall xung_am_thuan djnz r2,am_thuan sjmp het am_nghich: cjne r1,#0fh,thoat_run lcall xung_am_nghich djnz r2,am_nghich het: djnz r4,lap_xung_thuan sjmp thoat_thoat_run thoat_run: clr chaythuan clr chayngich thoat_thoat_run: the_end: ret xung_duong: setb chaythuan setb chayngich nop ret xung_am_thuan: setb chayngich clr chaythuan nop ret xung_am_nghich: setb chaythuan clr chayngich ret doisotocdo: ; o n i s lư ng hi n th LCD mov a,r7 mov b,#100 div ab mov r1,a MOV A,B MOV B,#10 DIV AB MOV R2,A ret 64 doi_so_hang_ngin: mov a,r1 add a,#30h ret doi_so_hang_tram: mov a,r2 add a,#30h ret doi_so_hang_chuc: mov a,b add a,#30h ret hienthi1: ; o n hi n th mov a,#80h lcall nap_lenh mov dptr,#db3 mov r2,#19 loop3: clr a movc a,@a+dptr lcall nap_dulieu lcall tab inc dptr djnz r2,loop3 mov a,#C0h lcall nap_lenh mov dptr,#db4 mov r2,#19 loop4: clr a movc a,@a+dptr lcall nap_dulieu lcall tab inc dptr djnz r2,loop4 ret ; o n hi n th hienthi2: mov a,#80h lcall nap_lenh mov dptr,#db9 mov r2,#19 loop9: clr a 65 movc a,@a+dptr lcall nap_dulieu lcall tab inc dptr djnz r2,loop9 mov a,#C0h lcall nap_lenh mov dptr,#db10 mov r2,#19 loop10: clr a movc a,@a+dptr lcall nap_dulieu lcall tab inc dptr djnz r2,loop10 ret ; o n hi n th hienthi3: mov a,#01h lcall nap_lenh lcall tab mov a,#80h lcall nap_lenh mov dptr,#db5 mov r2,#19 loop5: clr a movc a,@a+dptr lcall nap_dulieu lcall tab inc dptr djnz r2,loop5 mov a,#C0h lcall nap_lenh mov dptr,#db6 mov r2,#12 loop6: clr a movc a,@a+dptr lcall nap_dulieu lcall tab 66 inc dptr djnz r2,loop6 mov a,#0cch lcall nap_lenh push 01h push 02h lcall doisotocdo lcall doi_so_hang_ngin lcall nap_dulieu LCALL tab lcall doi_so_hang_tram Lcall nap_dulieu lcall tab lcall doi_so_hang_chuc lcall nap_dulieu lcall tab pop 02h pop 01h lcall tab ret ; o n hi n th hienthi4: mov a,#01h lcall nap_lenh lcall tab mov a,#80h lcall nap_lenh mov dptr,#db7 mov r2,#19 loop7: clr a movc a,@a+dptr lcall nap_dulieu lcall tab inc dptr djnz r2,loop7 mov a,#C0h lcall nap_lenh mov dptr,#db8 mov r2,#12 loop8: clr a movc a,@a+dptr lcall nap_dulieu 67 lcall tab inc dptr djnz r2,loop8 mov a,#0cCh lcall nap_lenh push 01h push 02h; nap gia tri dem lcall doisotocdo lcall doi_so_hang_ngin lcall nap_dulieu LCALL tab lcall doi_so_hang_tram Lcall nap_dulieu lcall tab lcall doi_so_hang_chuc lcall nap_dulieu lcall tab pop 02h pop 01h lcall tab ret ; o n hi n th hienthi5: mov a,#01h lcall nap_lenh lcall tab mov a,#80h lcall nap_lenh mov dptr,#db11 mov r2,#19 loop11: clr a movc a,@a+dptr lcall nap_dulieu lcall tab inc dptr djnz r2,loop11 mov a,#C0h lcall nap_lenh mov dptr,#db12 mov r2,#14 loop12: 68 clr a movc a,@a+dptr lcall nap_dulieu lcall tab inc dptr djnz r2,loop12 mov a,#0cDh lcall nap_lenh push 01h push 02h lcall doisotocdo lcall doi_so_hang_ngin lcall nap_dulieu LCALL tab lcall doi_so_hang_tram Lcall nap_dulieu lcall tab lcall doi_so_hang_chuc lcall nap_dulieu lcall tab pop 02h pop 01h lcall tab RET ; o n dùng tt c dattocdotang: lcall tang mov a,#'i' lcall truyen LCALL hienthi5 ljmp thoat ; o n dùng gi m t c dattocdogiam: lcall giam mov a,#'s' lcall truyen LCALL hienthi5 ljmp thoat 69 noitiep: ; o n n i ti p JNB RI,$ CLR RI CLR EA MOV A,SBUF CJNE A,#'C',NEXT1 lCALL D1 lJMP THOAT1 NEXT1: CJNE A,#'D',NEXT2 LCALL D2 lJMP THOAT1 NEXT2: CJNE A,#'T',NEXT3 LCALL D3 lJMP THOAT1 NEXT3: CJNE A,#'N',NEXT4 LCALL D4 LJMP THOAT1 NEXT4: CJNE A,#'B',NEXT5 LCALL tang LJMP THOAT1 NEXT5: CJNE A,#'U',NEXT6 LCALL giam LJMP THOAT1 NEXT6: CJNE A,#'H',THOAT1 LCALL GIATRI THOAT1: CLR RI SETB EA reti GIATRI: CLR RI JNB RI,$ MOV A,SBUF MOV R7,A cjne r1,#0ffh,chayngich3 lcall hienthi3 sjmp thoat4 70 chayngich3: cjne r1,#0fh,thoat4 lcall hienthi4 sjmp thoat4 thoat4: ret D1: mov r6,#55h setb p2.3 CLR P2.0 lcall hienthi1 ret D2: SETB P2.0 SETB P2.1 SETB P2.2 CLR P2.3 setb chaythuan setb chayngich mov r6,#00h mov r7,#100 mov r1,#00h lcall hienthi2 ret ; o n x lý start ; o n x lý stop D3: ; o n x lý ch y thu n CLR P2.1 SETB P2.0 SETB P2.2 mov r1,#0ffh lcall hienthi3 lcall start ret D4: ; o n x lý ch y ngh ch SETB P2.0 SETB P2.1 CLR P2.2 mov r1,#0fh lcall hienthi4 LCALL start ret 71 ; o n dùng cho hi n th LCD db1: dB "DO AN TOT NGHIEP " db2 : dB "DIEU KHIEN D CO " DB3 : DB " OPEN START " DB4 : DB "CHON CHE DO QUAY" DB5 : DB "DONG CO Q THUAN " DB6 : DB "GIA TRI DAT:" dB7 : DB "DONG CO Q NGICH " DB8 : DB "GIA TRI DAT:" DB9 : DB " SORRY D CO STOP" DB10 : DB "PLEASE OPEN D CO " db11:db "DAT GIA TRI OPEN" DB12: DB"GIA TRI DAT :" end 72 Chương trình VB Public CHIEU_QUAY As String Public k As Integer ‘ KHAI BÁO Private Sub cmd_1_Click() Sha_1(0).BackColor = 255 ' CHO DONG CO CHAY Sha_1(1).BackColor = MSComm1.Output = "C" Hscroll1.value=100 End Sub Private Sub cmd_2_Click() Sha_1(1).BackColor = 255 ' DUNG DONG CO Sha_1(0).BackColor = Sha_1(4).BackColor = Sha_1(5).BackColor = MSComm1.Output = "D" Timer_chieu_quay.Enabled = False HScroll1.Enabled = False End Sub Private Sub cmd_4_Click() If cmd_4.Value = True Then MSComm1.Output = "U" Sha_1(3).BackColor = 255 End If If cmd_4 = False Then Sha_1(3).BackColor = End If End Sub Private Sub Cmd_5_Click() If Sha_1(0).BackColor = 255 Then ' dieu chinh dong co quay thuan Sha_1(4).BackColor = 255 Sha_1(5).BackColor = MSComm1.Output = "T" CHIEU_QUAY = "T" HScroll1.Value = Hscroll1.value Timer_chieu_quay.Interval = 550 - HScroll1.Value * Timer_chieu_quay.Enabled = True HScroll1.Enabled = True End If End Sub 73 Private Sub Cmd_6_Click() If Sha_1(0).BackColor = 255 Then ' dieu chinh dong co quay ngich Sha_1(4).BackColor = Sha_1(5).BackColor = 255 MSComm1.Output = "N" CHIEU_QUAY = "N" HScroll1.Value = Hscroll1.value Timer_chieu_quay.Interval = 550 - HScroll1.Value * Timer_chieu_quay.Enabled = True HScroll1.Enabled = True End If End Sub Private Sub Cmd_7_Click() ' ket thuc End End Sub NG C NG COM ‘// DO N KH I Private Sub Form_Load() Form1.Width = 20490 Form1.Height = 11520 MSComm1.CommPort = ' DOAN KHOI DONG CONG COM VOI TOC DO 9600 Baud If MSComm1.PortOpen = True Then MSComm1.PortOpen = False MSComm1.Settings = "9600,N,8,1" MSComm1.RThreshold = MSComm1.SThreshold = MSComm1.InputLen = MSComm1.InputMode = comInputModeText MSComm1.PortOpen = True Image_dc.Picture = LoadPicture("E:\do an tot nghiep\Hinh anh\Quat 2.bmp") End Sub Private Sub Timer3_Timer() Dim x As String Dim y As String x = Left(Text3.Text, 1) y = Right(Text3.Text, Len(Text3.Text) - 1) Text3.Text = y + x End Sub Private Sub Timer4_Timer() Text5.Text = Time End Sub 74 Private Sub MSComm1_OnComm() //' DOAN NHAN DU LIEU TU VI DIEU KHIEN DUA LEN Text7.Text = MSComm1.Input For i=0 to 191 If chr(i)=text7.text then Text8.text= i* 61 & (V/P) End if Next i Select Case Text7.Text Case "n" Sha_1(5).BackColor = 255 Sha_1(4).BackColor = HScroll1.Enabled = True Case "t" Sha_1(5).BackColor = Sha_1(4).BackColor = 255 Case "c" Sha_1(0).BackColor = 255 Sha_1(1).BackColor = HScroll1.Enabled = True Case "d" Sha_1(0).BackColor = Sha_1(1).BackColor = 255 Sha_1(5).BackColor = Sha_1(4).BackColor = Case “s” If Hscroll1.value= 150 then Hscroll1.value=150 Else Hscroll1.value=Hscroll1.value + End if Case “i” If Hscroll1.value= 30 then Hscroll1.value=30 Else Hscroll1.value=Hscroll1.value - End if Timer_chieu_quay.Enabled = False End Select End Sub 75 Private Sub Timer_chieu_quay_Timer() ' DOAN LOAD MO HINH QUAT BIEU THI TOC DO CUA DONG CO k=k+1 If k = Then If CHIEU_QUAY = "T" Then Image_dc.Picture = LoadPicture("E:\do an tot nghiep\Hinh anh\Quat 3.bmp") Else: Image_dc.Picture = LoadPicture("E:\do an tot nghiep\Hinh anh\Quat 1.bmp") End If Else If k = Then Image_dc.Picture = LoadPicture("E:\do an tot nghiep\Hinh anh\Quat 2.bmp") Else If k = Then If CHIEU_QUAY = "T" Then Image_dc.Picture = LoadPicture("E:\do an tot nghiep\Hinh anh\Quat 1.bmp") Else: Image_dc.Picture = LoadPicture("E:\do an tot nghiep\Hinh anh\Quat 3.bmp") End If k=0 End If End If End If End Sub Private Sub HScroll1_Change() MSComm1.Output = "H" ' DOAN TRUYEN GIA TRI DIEU CHINH TOC DO Timer_chieu_quay.Interval = 550 - HScroll1.Value * ' DUNG DE DUNG CHINH TOC DO QUAY CUA QUAT Text6.Text = HScroll1.Value MSComm1.Output = Chr(Text6.Text) End Sub Private Sub Timer1_Timer() Dim x As String Dim y As String x = Left(Text1.Text, 1) y = Right(Text1.Text, Len(Text1.Text) - 1) Text1.Text = y + x End Sub SO DO NGUYEN LY VCC 9V DC R1 R2 100K R5 J1 R7 Q1A H1061 D1 1K H1061 1K VCC MOTO DC R4 D2 Q3A 3 A1015 100 PWM R3 100K 100 R8 R6 A1015 D4 Q2A H1061 D3 Q4A H1061 1K 1 1K D9 LM7805 220V/AC + VIN G ND 5V/DC - VOUT CON2 C8 A1015 R17 470 P2.0 P2.1 P2.2 R22 100k LED C6 2200uF/16V CHAY NGICH CHAY THUAN 470uF/16V 470 R18 Q13 2N1132A R11 P2.3 R21 100k VIN G ND LM7809 560 VOUT C9 470uF/16V R19 470 STOP 9V/DC A1015 R20 470 R20 D11 LED 100k START A1015 R R12 R20 100k VCC CON NOI LCD 16 15 14 13 12 11 10 U1 21 22 23 24 25 26 27 28 J3 PWM TxD RxD 10 11 12 13 14 15 16 17 15 14 30 29 U2 P3.4 ON 10 11 12 13 OFF CHAY THUAN D0 D1 D2 D3 D4 D5 D6 D7 CHAY NGICH Q0 Q1 Q2 EO GS P2.0/A8 P2.1/A9 P2.2/A10 P2.3/A11 P2.4/A12 P2.5/A13 P2.6/A14 P2.7/A15 39 38 37 36 35 34 33 32 P0.0/AD0 P0.1/AD1 P0.2/AD2 P0.3/AD3 P0.4/AD4 P0.5/AD5 P0.6/AD6 P0.7/AD7 P3.0/RXD P1.0/T2 P3.1/TXD P1.1/T2-EX P3.2/INT0 P1.2 P1.3 P3.3/INT1 P3.4/T0 P1.4 P1.5 P3.5/T1 P1.6 P3.6/WR P1.7 P3.7/RD ALE/PROG PSEN 19 18 XTAL1 XTAL2 31 EA/VPP RST RESET EI TTOCDO 11.0592MHZ AT89C52 74LS148 GTOCDO VCC 33p R10 100 SW 33p C1 C RESET R9 10K VCC VCC D14 MAX232 P3.4 1k C1815 4.7k R15 R14 1k CONNECTOR DB9 12 14 13 R1OUT R2OUT T2OUT R2IN T1OUT R1IN T1IN T2IN GND P1 R16 1k R13 16 LED BAO XUNG VCC LED THU 15 LED PHAT C1+ C1C2+ C2V+ V- C4 10uF RxD TxD 11 10 C5 10uF C3 10uF C2 10uF ... ……………………………………………………………… Giáo vi? ?n ph n bi n NH N XÉT C A GIÁO VI? ?N PH N BI N Tên tài: ng d ng vi i u n thi t k b i u n ng i n m t chi u H tên sinh vi? ?n th c hi n: Cao Văn Hòa Mã s sinh vi? ?n : 4913024019... CÁN B HƯ NG D N NH N XÉT C A GIÁO VI? ?N PH N BI N Tên tài: ng d ng vi i u n thi t k b i u n ng i n m t chi u H tên sinh vi? ?n th c hi n: Cao Văn Hịa Mã s sinh vi? ?n : 4913024019 Khóa 49, chuyên...PH N NH N XÉT C A CÁN B Tên HƯ NG D N tài: ng d ng vi i u n thi t k b i u n ng i n m t chi u H tên sinh vi? ?n th c hi n : Cao Văn Hịa Mã s sinh vi? ?n: 4913024019 Khóa 49, chun ngành công ngh k thu