ESCUELA SUPERIOR DE INGENIERIA MECANICA Y ELECTRICA
UNIDAD ZACATENCO. ICE ASIGNATURA: Microprocesadores. PROFESOR: Salador Sa!cedo Flores PROYECTO: TRADUCTOR CODIGO MORSE ALUMNO: O"#ieros Go"$%le$ Al&er#o 'OLETA: ()*(+)*,-. GRUPO: /CM, No.de lis#a: */ T!r"o: T!r"o: 0esper#i"o 1oras de Proceso: +
I"#rod!cci2": PIC *F3,,) Pri"cipales carac#er4s#icas del Pic *F3,,)
5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5
Microco"#rolador co" 6od!lo US' (.). Sopor#a Lo7 speed *., M&8s 9 !ll speeds *(M&8s. *;' de 6e6oria de do&le acceso 4a US' +, pi"es I8O dispo"i&les Me6oria de pro
de +( ;' RAM de ()3 '9#es EEPROM de da#os de (,/ '9#es 0elocidad de la CPU *( MIPS Oscilador e?#er"o de dos 6odos >as#a 3 M1$ Oscilador i"#er"o seleccio"a&le e"#re rec!e"cias desde +*;1$ >as#a M1$ Oscilador sec!"dario co" Ti6er * de >as#a +(;1$ Opcio"es de oscilador d!al per6i#e" @!e la elocidad de la CPU 9 del 62d!lo US' sea" diere"#es ADC de *) &i#s 9 *+ ca"ales Tec"olo<4a "a"o a## @!e &ri"da carac#er4s#icas 9 !"cio"es de &aBo co"s!6o 9 a>orro de e"er<4a 0ol#aBe de operaci2" 3.(0 a ,.,0 3 Ti6er desde Ti6er) a Ti6er+. U"o de &i#s 9 + de */ &i#s ( 62d!los de cap#!ra8co6paraci2"8PM EUSART SPP SPI IC. () !e"#es de i"#err!pcio"es + e?#er"as Resis#e"cias de p!ll!ps e" el p!er#o ' pro
5 5 5 5 5
F!"ci2" del pi" MCLR opcio"al 'ro7"o!# Rese# de alor pro
El ATMEGA*/P()PU es !" 6icroco"#rolador picoPo7er de &i#s &asado e" RISC de */ &i#s @!e co6&i"a 6e6oria =as> ISP de */;' co" capacidades de lec#!ra 9 escri#!ra EEPROM de ,*(&9#es SRAM de *;' (+ l4"eas de E 8 S de !so ilos orie"#ada por &9#e p!er#o serie SPI co"er#idor A 8 D de / ca"ales de *) &i#s #e6pori$ador de iorro de e"er<4a seleccio"a&les por so#7are. El disposi#io !"cio"a e"#re (.- a ,.,0. Al eBec!#ar i"s#r!ccio"es po#e"#es e" !" solo ciclo de reloB el disposi#io alca"$a elocidades apro?i6adas de *MIPS por M1$ &ala"cea"do el co"s!6o de e"er<4a 9 la elocidad de procesa6ie"#o. El disposi#io se a&rica !#ili$a"do la #ec"olo<4a de 6e6oria "o ol%#il de al#a de"sidad de A#6el. El =as> ISP i"#e
El c2di
Para la separaci2" de pala&ras #ra"s6i#idas el #ie6po es de apro?i6ada6e"#e #res eces el de la ra9a. Morse reco"oci2 la ido"eidad de es#e sis#e6a 9 lo pa#e"#2 B!"#o co" el #elHas#a @!e s!ras#a el aJo ()), pos#erior6e"#e los ora sido si"#o"i$ada correc#a6e"#e.
Descripci2" del pro9ec#o 5La idea &%sica del pro9ec#o era crear !" #rad!c#or de carac#eres a c2diace !so de la API de i"do7s para acceder a los COM e" el c!al se i"#rod!ce la cade"a de carac#eres @!e se desea reprod!cir. 5Es#os carac#eres p!ede" decodiKcarse a #raHs de !"a &oci"a a 6a"era de so"ido a #raHs de !" led a 6a"era de seJal o e" s! deec#o de a6&as or6as co" la a9!da de !" pro#o&oard. Pri"cipales pro&le6as e"co"#rados: Al i"icio #!i6os el pro&le6a de @!e al correr el proac4a la co6!"icaci2" co" el p!er#o serial al @!e es#a&a co"ec#ado el Microco"#rolador la 6a"era e" @!e resoli6os es#o !e B!"#ar los c2diero. Es#o
resoli2 "!es#ro pro&le6a 9 as4 loa&a pero el e"ce"dido del led era 6!9 #e"!e 9 "o se alca"$a&a a apreciar &ie" las seJales. Posi&les aplicacio"es de es#e pro9ec#o: E"#re las posi&les aplicacio"es e" @!e poda6os reali$ar !" 6odelo a 6%s a a 6a"era de poder reali$ar lla6ados de a!?ilio o co6!"icarse co" o#ros &arcos cerca"os a dis#a"cia.
Ma#erial: *Pic *F3,,) * A#6e6 * o>6 Mi"i &!$$er ( ,66 LED De6os#racio" del circ!i#o.
De6os#racio" de Codi
i"cl!de ios#rea6
(.
i"cl!de 7i"do7s.>
+. 3.
!si"< "a6espace s#dQ
,. /. -. .
i"# 6ai" /****************************
.
CONFIGURACION DEL PUERTO COM
*).
****************************/
**.
1ANDLE >SerialQ
*(.
>Serial Crea#eFileCOM+
*+.
GENERICVREAD W GENERICVRITE
*3.
)
*,.
)
*/.
OPENVEXISTING
*-.
FILEVATTRI'UTEVNORMAL
*.
)Q
*. (). (*.
i >SerialIN0ALIDV1ANDLEV0ALUE i Ge#Las#ErrorERRORVFILEVNOTVFOUND co!# T>e COM por# does"# e?is# e"dlQ
((.
(+.
co!# Error: I"alid 1a"dle e"dlQ
(3.
(,. (/.
DC' dc&SerialPara6s )Q
(-.
dc&SerialPara6s.DC'le"<#>si$eo dc&SerialPara6sQ 88 Es#a li"ea es#a 6al e" el PDF a@!i es#a &ie"
(.
i [Ge#Co66S#a#e>Serial \dc&SerialPara6s
(.
co!# Error
+).
+*.
dc&SerialPara6s.'a!dRa#eC'RV/))Q
+(.
dc&SerialPara6s.'9#eSi$eQ
++.
dc&SerialPara6s.S#op'i#sONESTOP'ITQ
+3.
dc&SerialPara6s.Pari#9NOPARITYQ
+,.
i [Se#Co66S#a#e>Serial \dc&SerialPara6s
+/. +-.
co!# Error se##i"< serial por# s#a#e e"dlQ
+. +.
COMMTIMEOUTS #i6eo!#s)Q
3).
#i6eo!#s.ReadI"#eralTi6eo!#,)Q
3*.
#i6eo!#s.ReadTo#alTi6eo!#Co"s#a"#,)Q
3(.
#i6eo!#s.ReadTo#alTi6eo!#M!l#iplier*)Q
3+.
#i6eo!#s.ri#eTo#alTi6eo!#Co"s#a"#,)Q
33.
#i6eo!#s.ri#eTo#alTi6eo!#M!l#iplier *)Q
3,.
i [Se#Co66Ti6eo!#s>Serial \#i6eo!#s
3/.
co!# Error Se##i"< #i6e o!# e"dlQ
3-.
3. 3.
/********************
,).
TRANSMISION DE DATOS
,*.
********************/
,(.
c>ar s$'!] ^*_ )Q
,+.
DORD d7'9#esRead )Q
,3.
c>ar pala&ra^/3_Q 88 `
,,. ,/.
7>ile pala&ra^)_ [ [
,-.
co!# Pala&ra [ para salir: Q
,.
ci" pala&raQ
,.
co!# e"dlQ
/).
!"si<"ed s>or# i"# i )Q
/*.
7>ile pala&ra^i_ [ )
/(.
s$'!]^)_ pala&ra^i_Q
/+.
i [ri#eFile>Serial s$'!] * \d7'9#esRead NULL
/3.
co!# No se p!do e"dlQ
/,.
&rea;Q
//.
/-.
iQ
/.
/.
-).
De6os#racio" de Codi
!"si<"ed s>or# i"# p!"#o -)Q // Duracion del punto
(.
!"si<"ed s>or# i"# ra9a p!"#o ` 3Q // Duracion de la raa
+.
!"si<"ed s>or# i"# "e
3.
!"si<"ed s>or# i"# le#ra9le#ra p!"#o ` ,Q // Duracion del apa!ado entre letra"
,. /. -. .
oid pla9To"ei"# #o"e i"# d!ra#io" i"# spea;erPi" // Send" t#e "i!nal to t#e "pea$erPin
or lo"< i )Q i d!ra#io" ` *)))LQ i #o"e ` (
.
di
*).
dela9Microseco"ds#o"eQ
**.
di
*(.
dela9Microseco"ds#o"eQ
*+. *3.
*,. */. *-. *.
oid pla9To"eLedi"# #o"e i"# d!ra#io" i"# spea;erPi" i"# ledPi" // Send" t#e "i!nal to "pea$erPin and ledPin
or lo"< i )Q i d!ra#io" ` *)))LQ i #o"e ` (
*.
di
().
di
(*.
dela9Microseco"ds#o"eQ
((.
di
(+.
di
(3.
dela9Microseco"ds#o"eQ
(,. (/.
(-. (. (.
// %%%%%%%%%% CLASE LETRA %%%%%%%%%
class le#ra
+).
pria#e:
+*.
c>ar carac#erQ
+(.
c>ar` codi
++.
i"# ledPi"Q
+3.
p!&lic:
+,.
le#ra c>ar car c>ar` cad !"si<"ed s>or# i"# pi"Q
+/.
oid se# c>ar car c>ar` cad !"si<"ed s>or# i"# pi"Q
+-.
oid 6os#rar Q
+.
oid so"ar Q
+.
oid 6os#rarYso"ar Q
3).
Q
3*. 3(. 3+.
le#ra::le#ra c>ar car c>ar` cad !"si<"ed s>or# i"# pi" // Con"tructor
33.
carac#er carQ
3,.
codi
3/.
ledPi" pi"Q
3-.
pi"ModeledPi" OUTPUTQ
3.
3. ,). ,*.
oid le#ra::se# c>ar car c>ar` cad !"si<"ed s>or# i"# pi" // Setter
,(.
carac#er carQ
,+.
codi
,3.
ledPi" pi"Q
,,.
,/. ,-. ,.
oid le#ra::6os#rar // S#o&" t#e code in in t#e ledPin
,.
!"si<"ed s>or# i"# B )Q
/).
7>ile codi
/*.
i codi
/(.
di
/+.
dela9 p!"#oQ
/3.
di
/,.
dela9 "e
//.
else i codi
/-.
di
/.
dela9 ra9aQ
/.
di
-).
dela9 "e
-*.
-(.
BQ
-+.
-3.
dela9 le#ra9le#raQ
-,.
-/. --. -.
oid le#ra::so"ar // Sound" t#e code on t#e "pea$erPin
-.
!"si<"ed s>or# i"# B )Q
).
7>ile codi
*.
i codi
(.
pla9To"e 33) *)) Q
+.
dela9 "e
3.
else i codi
,.
pla9To"e 33) *)) ` 3 Q
/.
dela9 "e
-.
.
BQ
.
).
dela9 le#ra9le#raQ
*.
(. +. 3.
oid le#ra::6os#rarYso"ar // Sound" and "#o&" t#e code 'ledPin ( "pea$erPin)
,.
!"si<"ed s>or# i"# B )Q
/.
7>ile codi
-.
i codi
.
pla9To"eLed 33) *)) ledPi"Q
.
dela9 "e
*)).
else i codi
*)*.
pla9To"eLed 33) *)) ` 3 ledPi"Q
*)(.
dela9 "e
*)+.
*)3.
BQ
*),.
*)/.
dela9 le#ra9le#ra8(Q
*)-. *).
// %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
*). **). ***.
oid se#!p Serial.&e
**(. **+.
pi"Mode OUTPUTQ
**3. **,.
i"# le#raIN )Q
**/.
!"si<"ed s>or# i"# ledPi" *+Q
**-.
oid loop
**.
di
**.
le#raIN )Q
*().
le#raIN Serial.readQ
*(*.
le#ra le# ) ledPi"Q
*((.
s7i#c> le#raIN
*(+. *(3. *(,. *(/. *(-. *(. *(. *+). *+*. *+(. *++. *+3. *+,. *+/. *+-. *+. *+. *3). *3*. *3(. *3+. *33. *3,. *3/. *3-. *3. *3. *,). *,*. *,(.
case a: le#.se# a . ledPi"Q break Q
case &: le#.se# & ... ledPi"Q break Q
case c: le#.se# c .. ledPi"Q break Q
case d: le#.se# d .. ledPi"Q break Q
case e: le#.se# e . ledPi"Q break Q
case : le#.se# ... ledPi"Q break Q
case <: le#.se# < . ledPi"Q break Q
case >: le#.se# > .... ledPi"Q break Q
case i: le#.se# i .. ledPi"Q break Q
case B: le#.se# B . ledPi"Q break Q
case ;: le#.se# ; . ledPi"Q break Q
case l: le#.se# l ... ledPi"Q break Q
case 6: le#.se# 6 ledPi"Q break Q
case ": le#.se# " . ledPi"Q break Q
case o: le#.se# o ledPi"Q break Q
*,+. *,3. *,,. *,/. *,-. *,. *,. */). */*. */(. */+. */3. */,. *//. */-. */. */. *-). *-*. *-(. *-+. *-3. *-,. *-/. *--. *-. *-. *). **. *(. *+. *3. *,. */. *-. *. *. *). **. *(. *+.
case p: le#.se# p .. ledPi"Q break Q
case @: le#.se# @ . ledPi"Q break Q
case r: le#.se# r .. ledPi"Q break Q
case s: le#.se# s ... ledPi"Q break Q
case #: le#.se# # ledPi"Q break Q
case !: le#.se# ! .. ledPi"Q break Q
case : le#.se# ... ledPi"Q break Q
case 7: le#.se# 7 . ledPi"Q break Q
case ?: le#.se# ? .. ledPi"Q break Q
case 9: le#.se# 9 . ledPi"Q break Q
case $: le#.se# $ .. ledPi"Q break Q
case ): le#.se# ) ledPi"Q break Q
case *: le#.se# * . ledPi"Q break Q
case (: le#.se# ( .. ledPi"Q break Q
case +: le#.se# + ... ledPi"Q break Q
case 3: le#.se# 3 .... ledPi"Q break Q
case ,: le#.se# , ..... ledPi"Q break Q
case /: le#.se# / .... ledPi"Q break Q
case -: le#.se# - ... ledPi"Q break Q
case : le#.se# .. ledPi"Q break Q
case : le#.se# . ledPi"Q
*3.
break Q
*,.
case .: le#.se# . ... ledPi"Q
*/.
break Q
*-.
case : le#.se# .. ledPi"Q
*.
break Q
*.
case : le#.se# .... ledPi"Q
()).
break Q
()*.
case : le#.se# .... ledPi"Q
()(. ()+.
break Q
()3.
//let+o"trar'),
(),.
//let"onar'),
()/. ()-.
le#.6os#rarYso"arQ
Co"cl!sio"es 5Co" el desarrollo de es#e pro9ec#o co"cl!i6os e" @!e !e !" e?cele"#e eBercicio para co6e"$ar a co"ocer los co6po"e"#es de los A#6eas#a al
