CASA INTELIGENTE
OMAR GRANADOS OSPINA EDWARD OREJUELA VILLANUEVA
UNIVERSIDAD COOPERATIVA DE COLOMBIA FACULTAD FACULTAD DE INGENIERÍA ING ENIERÍA BOGOTA 24 DE MAYO DE 2013
INTRODUCCIÓN
Este !"#e$t" se !e%&'(% $") e& *') +e %*'%)(%! $")"$','e)t"s e) &% ,%te!'% +e +",-t'$% #% ./e est% es /)% !%,% +e &% ')e)'e!% ,/# ')te!es%)te "! s/s %&'$%$'")es %+e,s )"s e!,'te e& /s" +e ,'$!"$")t! ,'$!"$")t!"&%+ "&%+"!es "!es # +e,s $",")e)tes $",")e)tes e&e$t!-)'$"s e&e$t!-)'$"s &"s $/%&es $/%&es s") +e /s" e) e& $/!s" %& $/%& !ese)t%!e,"s e& !ese)te !"#e$t" +e /)% $%s% ')te&'e)te %$'e)+" /s" +e /) ,'$!"$")t!"&%+"! 1*566% /) +'s&%# &$+ # "t!"s $",")e)tes %$t'7"s # %s'7"s +e &% e&e$t!-)'$% %)&"% # +e este ,"+" te)e! /) $'!$/'t" %)&"" +''t%& %!% e& ,")t%8e # !/e9% +e& !"#e$t":
OBJETIVOS O98et'7" e)e!%&;
•
A/t",%t'(%! # $")t!"&%! &%9"!%!es $"t'+'%)%s +e /)% $%s%
O98et'7"s ese$*'$"s;
•
M%)e8" +e '$ 1*566%
•
Us" +e& &$+
•
Us" +e& te$&%+" ,%t!'$'%&
•
A,&'*'$%$'-) +e $"!!'e)te %!% /) ,"t"!
•
V's/%&'(%! ,e)< e) &% &$+
•
A$$es" +es+e e& te$&%+"
•
Us" +e $",'&%+"! '$$ %!% !e%&'(%! &% !"!%,%$'-) +e& ,'$!"$")t!"&%+"!
MARCO TEÓRICO
Microcontrolador
U) ,'$!"$")t!"&%+"! =%9!e7'%+" >C? UC " MCU@ es /) $'!$/'t" ')te!%+" !"!%,%9&e? $%%( +e e8e$/t%! &%s -!+e)es !%9%+%s e) s/ ,e,"!'%: Est $",/est" +e 7%!'"s 9&"./es */)$'")%&es? &"s $/%&es $/,&e) /)% t%!e% ese$*'$%: U) ,'$!"$")t!"&%+"! ')$&/#e e) s/ ')te!'"! &%s t!es !')$'%&es /)'+%+es */)$'")%&es +e /)% $",/t%+"!%; /)'+%+ $e)t!%& +e !"$es%,'e)t"? ,e,"!'% # e!'*!'$"s +e e)t!%+%s%&'+%: A&/)"s ,'$!"$")t!"&%+"!es /e+e) /t'&'(%! %&%9!%s +e $/%t!" 9'ts # */)$'")%) % 7e&"$'+%+ +e !e&"8 $") *!e$/e)$'%s t%) 9%8%s $"," 4 (? $") /) $")s/," +e 9%8% "te)$'% =,W " ,'$!"7%t'"s@: P"! &" e)e!%&? te)+! &% $%%$'+%+ %!% ,%)te)e! &% */)$'")%&'+%+ % &% ese!% +e /) e7e)t" $"," /&s%! /) 9"t-) " +e "t!% ')te!!/$'-)? e& $")s/," +e e)e!% +/!%)te e& s/e" =!e&"8 +e &% CPU # &"s e!'*!'$"s +e &% ,%#"!%@ /e+e se! s-&" )%)"7%t'"s? &" ./e %$e ./e ,/$"s +e e&&"s ,/# %+e$/%+"s %!% %&'$%$'")es $") 9%te!% +e &%!% +/!%$'-): Ot!"s ,'$!"$")t!"&%+"!es /e+e) se!7'! %!% !"&es +e !e)+','e)t" $!t'$"? +")+e se% )e$es%!'" %$t/%! ,s $"," /) !"$es%+"! +''t%& +e se%& =DSP@? $") 7e&"$'+%+es +e !e&"8 # $")s/," +e e)e!% ,s %&t"s:
DISPLAY LDC
L%s %)t%&&%s +e $!'st%& &./'+" =LCD@ se %) "/&%!'(%+" ,/$" e) &"s <&t',"s %"s? +e9'+" % s/ !%) 7e!s%t'&'+%+ %!% !ese)t%! ,e)s%8es +e tet" =*'8"s # e) ,"7','e)t"@? 7%&"!es )/,!'$"s # s,9"&"s ese$'%&es? s/ !e$'" !e+/$'+"? s/ 9%8" $")s/," +e "te)$'%? e& !e./e!','e)t" +e s"&" ')es +e& PIC %!% s/ $")e'-) # s/ *%$'&'+%+ +e !"!%,%$'-) e) &e)/%8es +e %&t" )'7e& ="! e8e,&"? &e)/%8e C@: Des+e t"+" /)t" +e 7'st% e& e,&e" +e& +'s&%# LCD 12 =LCD 21@ +e9e!% $")s'+e!%!se $"," &% !',e!% "$'-) % &% "!% +e +e$'+'! "! /) +'s"s't'7" +e !ese)t%$'-) %&*%)/,!'$%? e$et" $/%)+" &%s $")+'$'")es +e '&/,')%$'-) %,9'e)t%& )" se%) &%s ,s *%7"!%9&es: E) este <&t'," $%s" se +e9e!% e)s%! e) e& e,&e" +e +'s&%#s +e 6 se,e)t"s? ./e %/)./e )" t'e)e) &% ,'s,% 7e!s%t'&'+%+ t'e)e) &% 7e)t%8% '))e%9&e +e s/s ,e8"!es $%!%$te!st'$%s +e 7's'9'&'+%+ %<) e) &"s %,9'e)tes ,s +es*%7"!%9&es: E) &% %$t/%&'+%+ e'ste) +'7e!s"s ,"+e&"s +e +'s&%# LCD? %/)./e &"s ,s $",/)es s") &"s LCD 12 =1 $%!%$te!es 2 *'&%s@ " LCD 21? "9e!)%+"s "! e& $")t!"&%+"! 't%$' D44650? ./e se % $")7e!t'+" e) e& est)+%! +e *%$t" %!% &%s %&'$%$'")es $") ,'$!"$")t!"&%+"!es PIC: Ese$*'$%,e)te se %! !e*e!e)$'% %& +'s&%# LM01L? ./e t'e)e &%s $%!%$te!st'$%s ,e)$'")%+%s? %/)./e $/%&./'e! "t!" +'s&%# LCD $") e& $")t!"&%+"! D44650 " $",%t'9&e se /e+e /t'&'(%!: E'ste) LCD 12 $") +'*e!e)tes $",9')%$'")es +e $"&"!es +e *")+" # tet":
TRANSISTOR DARLINGTON
Est% $")*'/!%$'-) s'!7e %!% ./e e& +'s"s't'7" se% $%%( +e !""!$'")%! /)% !%) %)%)$'% +e $"!!'e)te #? %& "+e! est%! t"+" ')te!%+"? !e./'e!e ,e)"s es%$'" ./e +"s t!%)s'st"!es )"!,%&es e) &% ,'s,% $")*'/!%$'-): L% %)%)$'% t"t%& +e& D%!&')t") es e& !"+/$t" +e &% %)%)$'% +e &"s t!%)s'st"!es ')+'7'+/%&es: U) +'s"s't'7" t'$" t'e)e /)% %)%)$'% e) $"!!'e)te +e 1000 " s/e!'"!: T%,9') t'e)e /) ,%#"! +es&%(%,'e)t" +e *%se e) %&t%s *!e$/e)$'%s ./e /) <)'$" t!%)s'st"!? +e % ./e /e+% $")7e!t'!se *$'&,e)te e) ')est%9&e: L% te)s'-) 9%see,'s"! t%,9') es ,%#"!? s'e)+" &% s/,% +e %,9%s te)s'")es 9%see,'s"!? # %!% t!%)s'st"!es +e s'&'$'" es s/e!'"! % 1:2V: L% 9et% +e /) t!%)s'st"! " %! D%!&')t") se %&&% ,/&t'&'$%)+" &%s +e &"s t!%)s'st"!es ')+'7'+/%&es: L% ')te)s'+%+ +e& $"&e$t"! se %&&% ,/&t'&'$%)+" &% ')te)s'+%+ +e &% 9%se "! &% 9et% t"t%&:
TECLADO MATRICIAL
U) te$&%+" ,%t!'$'%& es /) $")8/)t" +e 9"t")es =sH't$es@ +'s/est"s e) *"!,% +e ,%&&%? +e ,"+" ./e )" se !e./'e!%) +e ,/$%s &)e%s %!% s/ ')te!*%$e: De e$"? &% ,%#"!% +e &"s te$&%+"s =')$&/#e)+" ./'( e& +e t/ $",/t%+"!%@ */)$'")% $") /)% est!/$t/!% s','&%!: E) est% !$t'$% t!%9%8%!e,"s $") /) te$&%+" +e 44: C"," se %!e$'% e) &% s'/'e)te ',%e)? $%+% 9"t-) +e& te$&%+" est $")e$t%+" % %&/)% +e &%s *'&%s R"H? "! /) &%+" # "! e& "t!"? % %&/)% +e &%s $"&/,)%s C"&:
MOTOR DC
E& ,"t"! +e $"!!'e)te $")t')/% es /)% ,./')% ./e $")7'e!te &% e)e!% e&$t!'$% $")t')/% e) ,e$)'$%? !"7"$%)+" /) ,"7','e)t" !"t%t"!'": E) &% %$t/%&'+%+ e'ste) )/e7%s %&'$%$'")es $") ,"t"!es e&$t!'$"s ./e )" !"+/$e) ,"7','e)t" !"t%t"!'"? s')" ./e $") %&/)%s ,"+'*'$%$'")es? e8e!$e) t!%$$'-) s"9!e /) !'e&: Est"s ,"t"!es se $")"$e) $"," ,"t"!es &')e%&es: Est% ,./')% +e $"!!'e)te $")t')/% es /)% +e &%s ,s 7e!st'&es e) &% ')+/st!'%: S/ *$'& $")t!"& +e "s'$'-)? %! # 7e&"$'+%+ &% %) $")7e!t'+" e) /)% +e &%s ,e8"!es "$'")es e) %&'$%$'")es +e $")t!"& # %/t",%t'(%$'-) +e !"$es"s: Pe!" $") &% &&e%+% +e &% e&e$t!-)'$% s/ /s" % +'s,')/'+" e) !%) ,e+'+%? /es &"s ,"t"!es +e $"!!'e)te %&te!)%? +e& t'" %s)$!")"? /e+e) se! $")t!"&%+"s +e '/%& *"!,% % !e$'"s ,s %$$es'9&es %!% e& $")s/,'+"! ,e+'" +e &% ')+/st!'%: A es%! +e est" &"s ,"t"!es +e $"!!'e)te $")t')/% se s'/e) /t'&'(%)+" e) ,/$%s %&'$%$'")es +e "te)$'% =t!e)es # t!%)7%s@ " +e !e$'s'-) =,./')%s? ,'$!"s ,"t"!es? et$:@
MARCO PRÁCTICO Diara!a d" #l$%o E& !"!%,% % !e%&'(%! se +'7'+e e) 4 +'%!%,%s; 1.
Me)<
Es e& !"!%,% !')$'%&
Y )"s ,/est!% $-," */)$'")% $%+% s' se !es'")% &% te$&% $"!!es")+'e)te /es este !es")+e % "t!" !"!%,% +e)t!" +e& !')$'%&: 2.
Le+s
Es /) s/9!"!%,% ./e ,e &&e7% % "t!" ,e)< $") e& *') +e %$t'7%! $/%&./'e!% +e &"s 4 &e+s ./e !e!ese)t%) /)% 9",9'&&% +e /)% $%s% # se +% s/ !ese$t'7" )",9!e:
3.
M"t"!
S' e) e& ,e)< !')$'%& se se&e$$'")% &% "$'-) ,"t"! este %9!e /) ,e)< $") 7%!'"s t'"s +e 7e&"$'+%+es # %!% %/s%! e& ,"t"!:
4.
C&%7e +e %$$es"
Y este <&t'," )"s !e!ese)t% &% %!te +e %$$es" +e &% $%s% e& $/%& %&,%$e)% /)% $&%7e e) &% ,e,"!'% +e& '$ # &% $",%!% $") &% ')!es%+%:
DIAGRAMA DE BLO&UES
E& +'%!%,% +e 9&"./es )"s +% % !%)+es !%s"s &" ./e se !ete)+e %$e! e) /) !"#e$t"? %$t'7'+%+? ')7est'%$'-) et$: G!%$'%s % este es ,s se)$'&&% &% $",!e)s'-) +e )/est!" !"#e$t" s') te)e! ./e !"*/)+'(%! +e /)% ,%)e!% ,/# ese$*'$%:
CÓDIGO EN LENGUAJE C E& &e)/%8e +e !"!%,%$'-) $ es ,/# $")"$'+" # +e !%) /t'&'+%+ e) )/est!" !"#e$t" +e9'+" % ./e es /) &e)/%8e +e !"!%,%$'-) +e /) )'7e& %&t" e!" +e *$'& $",!e)s'-)? /s%,"s e& $",'&%+"! '$$ %!% e)e!%! )/est!" %!$'7" :e e& $/%& !e$")"$e )/est!" '$ #% ./e es e& $-+'" +e ,./')%: C-+'" K')$&/+e 9+&'9:$ K')$&/+e LCD:C K9#te 9+"!t9 5 K')$&/+e st+&'9: K!", 02100Q3Q?Q4Q?Q3Q?Q4Q
7"'+ %$$es"=@ $%! ')t '
$%! +%t%4? $&%7e4
M%t!'$es %!% /%!+%! $&%7e # +%t"s
&$+')'t=@ 9+')'t=@ '0
"s'$'-) +e &% ,%t!'(
!')t*=&$+/t$?*D''t" C&%7e 1)@
P%!% !',e! +%t"
H'&e='3@ 9+et$=@ '* =0@ +%t%' 'XX
Lee e& te$&%+" S' se % /&s%+" %&/)% te$&% se /%!+% e) &% "s'$'-) $"!!es")+'e)te +e &% ,%t!'(
!')t*=&$+/t$?*D''t" C&%7e /)?'X1@ S'/'e)te +%t" *"! ='0'3'XX@
P%s% +%t"s +e ee!", % &% ,%t!'( $&%7e
$&%7e'!e%+ee!",='@ '* ==+%t%0$&%7e0@ZZ=+%t%1$&%7e1@ZZ=+%t%2$&%7e2@ZZ=+%t%3$&%7e3@@ C",%!% &"s +%t"s $") &% $&%7e !')t*=&$+/t$?*P/e!t% A9'e!t%@ "/t/t'=PINA0@ +e&%#,s=1[00@ "/t/t&"H=PINA0@
S' es '/%& +% /&s" %& !e&
e&se !')t*=&$+/t$?*P/e!t% Ce!!%+%@ C&%7e e!!")e% +e&%#,s=1000@
')t $")t K')tTIMER1
7"'+ TIMER1's!=7"'+@ '* =$")t20@ OUTPUTA=000@ sett',e!1=303@ $")tXX
7"'+ &/$es=@ set/%+$"!ts=NOANALOGS@ set/%+$=ADCCLOC\DIV2@ set/s=PSPDISABLED@ set/s'=SPISSDISABLED@ set/t',e!0=RTCCINTERNAL]RTCCDIV1@set/H+t=WDT15MS@ set/t',e!1=T1INTERNAL]T1DIVBY5@ set/t',e!2=T2DISABLED?0?1@
set/$",%!%t"!=NCNCNCNC@ set/7!e*=FALSE@ e)%9&e')te!!/ts=INTTIMER1@ e)%9&e')te!!/ts=GLOBAL@
TODO; USER CODE $")t0 $%! &$+"t"#=1?1@ &$+/t$=1:C"$')%@ &$+"t"#=10?1@ &$+/t$=2:C",e+"!@ &$+"t"#=1?2@ &$+/t$=3:S%&%@ &$+"t"#=10?2@ &$+/t$=4:%9't%$'")@ sett',e!1=303@ H'&e=Q0Q@ 9+et$=@ sH't$ =@ $%se Q1Q; "/t/t'=PINA1@ 9!e% $%se Q2Q;
"/t/t'=PINA2@ 9!e% $%se Q3Q; "/t/t'=PINA3@ 9!e% $%se Q4Q; "/t/t'=PINA[@ 9!e% +e*%/&t; &$+/t$=*@ &$+/t$=O$'") I)$"!!e$t%@ +e&%#,s=1000@ 9!e% Q0Q 7"'+ H,=@
set/%+$"!ts=NOANALOGS@ set/%+$=ADCCLOC\DIV2@ set/s=PSPDISABLED@ set/s'=SPISSDISABLED@ set/t',e!0=RTCCINTERNAL]RTCCDIV1@ set/t',e!1=T1DISABLED@
set/$",%!%t"!=NCNCNCNC@ set/7!e*=FALSE@
TODO; USER CODE set/$$1=CCPPWM@ $%! . &$+"t"#=1?1@ &$+/t$=1:A&t%@ &$+"t"#=10?1@ &$+/t$=2:Me+'%@ &$+"t"#=1?2@ &$+/t$=3:B%8%@ &$+"t"#=10?2@ &$+/t$=4:P%!%!@ H'&e=.Q0Q@ .9+et$=@ sH't$ =.@ $%se Q1Q; set/t',e!2=T2DIVBY1? 2[[? 1@ %!% +e8%%! /) *!e$/e)$'% *'8% setH,1+/t#=200@e& "!$e)t%8e +e& $'$&" /t'&? s"&" 7"# % ,"+'*'$%! est" +e&%#,s=2[@ 9!e% $%se Q2Q; set/t',e!2=T2DIVBY1? 2[[? 1@ %!% +e8%%! /) *!e$/e)$'% *'8%
setH,1+/t#=[0@e& "!$e)t%8e +e& $'$&" /t'&? s"&" 7"# % ,"+'*'$%! est" +e&%#,s=2[@ 9!e% $%se Q3Q; set/t',e!2=T2DIVBY1? 2[4? 1@ %!% +e8%%! /) *!e$/e)$'% *'8% setH,1+/t#=10@e& "!$e)t%8e +e& $'$&" /t'&? s"&" 7"# % ,"+'*'$%! est" +e&%#,s=2[@ 9!e% $%se Q4Q; set/t',e!2=T2DIVBY1? 2[[? 1@ %!% +e8%%! /) *!e$/e)$'% *'8% setH,1+/t#=0@e& "!$e)t%8e +e& $'$&" /t'&? s"&" 7"# % ,"+'*'$%! est" +e&%#,s=2[@ 9!e% +e*%/&t; &$+/t$=*@ &$+/t$=O$'") I)$"!!e$t%@ +e&%#,s=1000@ 9!e% .Q0Q
7"'+ ,%')=@ set/%+$"!ts=NOANALOGS@
$%! H'&e =TRUE@ &$+')'t=@ 9+')'t=@ &$+"t"#=1?1@ &$+/t$=1:L/$es@ &$+"t"#=10?1@ &$+/t$=2:M"t"!@ &$+"t"#=1?2@ &$+/t$=3:A$$es" P/e!t%@
H'&e=Q0Q@ 9+et$=@
sH't$ =@ $%se Q1Q; &$+/t$=*@ &/$es=@ 9!e% $%se Q2Q; &$+/t$=*@ H,=@ 9!e%
$%se Q3Q; &$+/t$=*@ %$$es"=@ 9!e% +e*%/&t; &$+/t$=*@ &$+/t$=O$'") I)$"!!e$t%@ +e&%#,s=1000@ 9!e% Q0Q
Es /) "$" ete)s"^ De ,%)e!% ,/# se)$'&&% e&'$%!e e& */)$'")%,'e)t" +e este $-+'" $",'e)(% +e*')'e)+" &'9!e!%s # */ses &"s $/%&es s") )e$es%!'"s %!% &% +e9'+% $",!e)s'-) # !"te$$'-) +e& '$ +es/s +e est" se ')'$'% $") /)% */)$'-) !')$'%& e& $/%& )"s ,/est!% /) ,e)< +e +")+e +ee)+'e)+" +e &% "$'-) +ese%+% se !"$e+e % &&%,%! &% !/t')% $"!!es")+'e)te e) este $%s" %# 3 /)% %!% !e)+e! &e+s "t!% %!% &% 7e&"$'+%+ +e /) ,"t"! # e& %$$es" "! ,e+'" +e /)% $&%7e? % s/ 7e( $%+% /)" +e &"s t!es %)te!'"!es ,e)$'")%+"s est) $",/est" "! /) s/9,e)< e& $/%& )"s ')+'$%!% ./e %$e! # $-," !"$e+e! % %$t'7%! +e ,%)e!% ,/# se)$'&&% !%$'%s % )/est!% e)t!%+% ./e es /) te$&%+" ,%t!'$'%& +e 34:
ES&UEMÁTICO L% s',/&%$'-) +e este !"#e$t" se /e+e !e%&'(%! !%$'%s % )/est!" es./e,% +e +'se" e&e$t!-)'$" e& $/%& se ,/est!% e) &% s'/'e)te *'/!% # &" s',/&%!e,"s e) /) !"!%,% +'se%+" %!% $'!$/'t"s ./e se &&%,% P!"te/s
CONCLUSIONES
Es !e%&,e)te s%t's*%$t"!'" &&e7%! % $%9" /) !"#e$t" +e t%& ,%)'t/+ #% ./e se 7e &% ese)$'% +e &" ./e es /) ')e)'e!" # +e $-," +e9e %*!")t%! # t",%! +e$'s'")es %& ,",e)t" +e !e%&'(%! t%&es &%9"!es %+e,s es /) $",'e)(" % /) $%," ,/# !%)+e $"," &" es &% +",-t'$% #% ./e "+e,"s "t','(%! # ,e8"!%! e& $")s/," +e e)e!% "! %&" se e,'e(% ./'( este se% /) !"#e$t" % */t/!" $"," /)% e,!es% +e+'$%+% % est% &%9"! #% ./e )" es ,/# $")"$'+% %+e,s $") +'se"s !"'"s se /e+e e,e(%! % 9%8%! $"st"s %!% "+e! !e%&'(%! # +%! ,%)te)','e)t" % est% *%)tst'$% &%9"!:
'EB GRA()A
http://www.programarpicenc.com/libro/cap03-display-lcd-16x2-2x16-hd44780-miroc-pro.html http://es.wiipedia.org/wii/!icrocontrolador http://es.wiipedia.org/wii/"ransistor#$arlington http://es.wiipedia.org/wii/!otor#de#corriente#contin%a
