LAPORAN PRAKTIK MIKROPROSESSOR & INTERFACE INTERFACE
PERCOBAAN 6: INPUT OUTPUT ANALOG
OLEH : Rina Dwi Yunita Sari TK!A"#$
PROGRAM STUDI TEKNIK TELEKOMUNIKASI %URUSAN TEKNIK ELEKTRO POLITEKNIK NEGERI SEMARANG !#'
I. GAMBAR RANGKAIAN 1. Rangkaian
2. Rangkaian LCD
II.PROGRAM
Program 1 int ()n(*rPin + A, ""()-).t t/) in0ut 0in 1*r t/) 0*t)n(i*2)t)r int -)3Pin + #4, ""()-).t t/) 0in 1*r t/) LED int ()n(*r5a-u) + , ""aria7-) t* (t*r) t/) a-u) .*2in8 1r*2 t/) ()n(*r
*i3 ()tu09; ""3).-ar) t/) -)3Pin a( an OUTPUT: 0inM*3)9-)3Pin< OUTPUT, = *i3 -**09; ""r)a3 t/) a-u) 1r*2 t/) ()n(*r ()n(*r5a-u) + ana-*8R)a39()n(*rPin, ""turn t/) -)3Pin *n 3i8ita->rit)9-)3Pin< HIGH, ""(t*0 t/) 0r*8ra2 1*r ?()n(*r5a-u)@ 2i-i().*n3(: 3)-a9()n(*r5a-u), ""turn t/) -)3Pin *11: 3i8ita->rit)9-)3Pin< LO>, ""(t*0 t/) 0r*8ra2 1*r 1*r ?()n(*r5a-u)@ 2i-i().*n3(: 3)-a9()n(*r5a-u), = Program 2 (Tugas) int ()n(*rPin + A, ""()-).t t//) in0ut 0in 1*r t/) 0*t)n(i*2)t)r int -)3Pin + #4, ""()-).t t/) 0in 1*r t/) LED int ()n(*r5a-u)+ , ""aria7-) t* (t*r) t/) a-u) .*2in8 1r*2 t/) ()n(*r
*i3 ()tu09; ""3).-ar) t/) -)3Pin a( an OUTPUT: 0inM*3)9-)3Pin< OUTPUT, = *i3 -**09; ""r)a3 t/) a-u) 1r*2 t/) ()n(*r ()n(*r5a-u) + ana-*8R)a39()n(*rPin, ""turn t/) -)3Pin *n 3i8ita->rit)9-)3Pin< HIGH, ""(t*0 t/) 0r*8ra2 1*r ?()n(*r5a-u)@ 2i-i().*n3(: 3)-a9#!4()n(*r5a-u), ""turn t/) -)3Pin *11: 3i8ita->rit)9-)3Pin< LO>, ""(t*0 t/) 0r*8ra2 1*r 1*r ?()n(*r5a-u)@ 2i-i().*n3(: 3)-a9#!4()n(*r5a-u), = Program 3 in.-u3) ?Liui3Cr(ta-/@ int ()n(*rPin +A, ""()-).t t/) in0ut 0in 1*r t/) 0*t)n(i*2t)r) int -)3Pin + #4, ""()-).t t/) 0in 1*r t/) LED int ()n(*r5a-u) + , ""aria7-) t* (t*r) t/) a-u) .*2n8 1r*2 t/) ()n(*r
""initia-i) t/) -i7rar wt/ t/) nu27)r( *1 t/) int)r1a.) 0in( Liui3Cr(ta- -.39#!<##<'<<4rit)9-)3Pin< HIGH, ""(t*0 t/) 0r*8ra2 1*r 1*r ?()n(*r5a-u)@ 2i-i().*n3(: 3)-a9()n(*r5a-u), ""turn t/) -)3Pin *11: 3i8ita->rit)9-)3Pin< LO>, ""(t*0 t/) 0r*8ra2 1*r 1*r ?()n(*r5a-u)@ 2i-i().*n3(: 3)-a9()n(*r5a-u), =
Program (Tugas) in.-u3) ?Liui3Cr(ta-/@ int ()n(*rPin +A, ""()-).t t/) in0ut 0in 1*r t/) 0*t)n(i*2t)r) int -)3Pin + #4, ""()-).t t/) 0in 1*r t/) LED int ()n(*r5a-u) + , ""aria7-) t* (t*r) t/) a-u) .*2n8 1r*2 t/) ()n(*r 1-*at ()n(*r5a-u)#,
""initia-i) t/) -i7rar wt/ t/) nu27)r( *1 t/) int)r1a.) 0in( Liui3Cr(ta- -.39#!<##<'<<4
-.37)8in9#6rit)9-)3Pin< HIGH, ""(t*0 t/) 0r*8ra2 1*r 1*r ?()n(*r5a-u)@ 2i-i().*n3(: 3)-a9()n(*r5a-u), ""turn t/) -)3Pin *11: 3i8ita->rit)9-)3Pin< LO>, ""(t*0 t/) 0r*8ra2 1*r 1*r ?()n(*r5a-u)@ 2i-i().*n3(: 3)-a9()n(*r5a-u), =
III.
!A"IL # ANALI"A Dari /a(i- 0)r.*7aan 3i ata( 2aJa 3a0at 3iana-i(a 7a/wa 0)r.*7aan 0)rta2a a3a-a/ in0ut
*ut0ut ana-*8 3)n8an in0ut 7)ru0a 0*t)n(i*2)t)r 3an *ut0ut a3a-a/ LED Uun8uun8 JaJi 0*t)n(i*2)t)r t)r(a27un8 3)n8an 0in 8r*un3 3an '5 ar3uin* ()3an8Jan JaJi t)n8a/ 0*t)n(i*2)t)r t)r(a27un8 3)n8an 0in A 9 sensorPin ar3uin* Pin A ini a3a-a/ 0in an8
7)r1un8(i ()7a8ai ana-*8 in0ut Pa3a *ut0ut< LED t)r(a27un8 3)n8an 0in #4 ar3uin* 9ledPin) 3an 8r*un3 MaJa 0a3a 0r*8ra2 awa- ar3uin* 3itu-i(Jan ()7a8ai 7)riJut:
S)3an8Jan sensorValue
3i8unaJan
()7a8ai
aria7-)
in3iJat*r
ni-ai
3ari
()n(*r
90*t)n(i*2)t)r t)r()7ut UntuJ 2)27a.a ni-ai 3ari ()n(*r 90*t)n(i*2)t)r 3i8unaJan 0)rinta/ sensorValue = analogRead(sensorPin); P)rinta/ analogRead() 7)r1un8(i untuJ 2)n8J*n)r(i ran8) t)8an8an in0ut ana-*8 9 (a20ai ' *-t J) ni-ai 3i8ita- ()n(*r aitu antara (a20ai #!4 P)rinta/ t)()7ut 3i-aJuJan *-)/ ran8Jaian ADC 9Ana-*8 t* Di8itaC*n)rt)r 0a3a Ar3uin* K)2u3ian *ut0ut 3ari 0r*8ra2 a3a-a/ na-a LED an8 2)20unai 3)-a 7)r7)3a 7)3a ()(uai 3)n8an ni-ai aria7-) 0*t)n(i*2)t)r
D)n8an 2)2utar (a27un8an 8)()r J) Jiri atau J) Janan< 2aJa ni-ai aria7-) r)(i(t*r aJan 7)ru7a/ Pa3a 0)r.*7aan ini J)tiJa (a27un8an 8)()r 3i0utar J) Janan 2aJa 3)-a aJan ()2aJin -a27at ()3an8Jan J)tiJa 3i0utar J) Jiri 3)-a ()2aJin .)0at Pa3a (aat 0*t)n(i*2)t)r 3i0utar J) Janan 9 3)-a -a27at artina ti3aJ a3a r)(i(tan(i 3iantara 0in t)n8an 3an 0in an8 t)r(a27un8 J) 8r*un3 ()/in888a t)8an8an 0a3a 0in .)nt)r a3a-a/ *-t ()/in88a ana-*8R)a39 7)rni-ai an8 7)rarti sensorValue = analogRead(sensorPin) ()/in88a 2)n8/a(i-Jan 3)-a -a27at Jar)na ni-ai 3)-a 3ari ()n(*r5a-u) aitu . Pa3a (aat 0*t)n(i*2)t)r 3i0utar J) Jiri 93)-a .)0at artina ti3aJ a3a r)(i(tan(i 3iantara 0in t)n8an 3an 0in an8 t)r(a27un8 J) ' *-t ()/in888a t)8an8an 0a3a 0in .)nt)r a3a-a/ ' *-t ()/in88a ana-*8R)a39 7)rni-ai -)7i/ 7)(ar 3ari 9 ##!4 S)2aJin 7)(ar ni-ai 0*t)n(i*2)t)r ()2aJin .)0at 3)-a< ()7a-iJna ()2aJin J).i- ni-ai 0*t)n(i*2)t)r ()2aJin -a27at 3)-a
Ga27ar /a(i- 0)r.*7aan 0r*8ra2#
Pa3a 0r*8ra2 J)3ua a3a-a/ 2)na20i-Jan *ut0ut an8 7)rJ)7a-iJan 3)n8an 0r*8ra2 0)rta2a %iJa 0a3a 0r*8ra2 0)rta2a< J)tiJa 0*t)n(i*2)t)r 3i0utar J) Janan 3)-a ()2aJin -a27at<3an 0*t)n(i*2)t)r 3i0utar J) Jiri 3)-a ()2aJin .)0at< 2aJa 0a3a 0r*8ra2 J)3ua 2)na20i-Jan ()7a-iJna< J)tiJa 0*t)n(i*2)t)r 3i0utar J) Janan 3)-a ()2aJin .)0at 3an J)tiJa 0*t)n(i*2)t)r 3i0utar J) Jiri 3)-a ()2aJin -a27at UntuJ 2)na20i-Jan 3)-a an8 7)rJ)7a-iJan 2aJa 0a3a 0r*8ra2< 3)-ana a3a-a/ #!4()n(*r5a-u)
Pa3a 0r*8ra2 0)rta2a (aat 0*t)n(i*2)t)r 3i0utar J) Janan 2)n8/a(i-Jan 3)-a -a27at< Jar)na t)8an8an 0a3a 0in .)nt)r *-t ()/in88a ana-*8R)a39 7)rni-ai 9 sensorValue = analogRead(sensorPin). S)/in88a untuJ 2)na20i-Jan 3)-a an8 7)rJ)7a-iJan 9 ()2aJin .)0at 2aJa 0a3a 3)-a ti3aJ 3itu-i(Jan delay(sensorValue) na2un 3itu-i(Jan delay(1023 sensorValue) a8ar ni-ai 3)-a na 7)rJ)7a-iJan 3)n8an 0r*8ra2 0)rta2a Pa3a (aat 0*t)n(i*2)t)r 3i0utar J) Jiri 2)8/a(i-Jan 3)-a .)0at< Jar)na t)8an8an 0a3a 0in .)nt)r t)ta0 ' *-t 3an ana-*8R)a39 7)rni-ai -)7i/ 7)(ar 3ari 9 ##!4 S)/in88a untuJ 2)na20i-Jan 3)-a an8 7)rJ)7a-iJan 9 3)-a -a27at 2aJa 0a3a 3)-a 3itu-i(Jan 1023 sensorValue Pa3a 0r*8ra2 J)ti8a< in0ut an8 3i8unaJan 7)ru0a ! 7ua/ 0*t)n(i*2)t)r< (atu 0*t)n(i*2)t)r untuJ 2)n8atur J*ntra( 3ari LCD 3an (atu -ainna ()7a8ai in0ut ()n(*r P*t)n(i*2)t)r ()7a8ai in0utan ()n(*r t)r(a27un8 3)n8an 0in 8r*un3 3an '5 0a3a ar3uin* ()3an8Jan JaJi t)n8a/na t)r(a27un8 3)n8an 0in A 9 sensorPin 0a3a ar3uin* S)3an8Jan 0*t)n(i*2)t)r untuJ 2)n8atur J*ntra( t)r(a27un8 3)n8an 0in 5(( 3an 533 ()3an8Jan JaJi t)n8a/na t)r(a27un8 0in 5)) LCD LED< t)r(a27un8 3)n8an 0in #4 ar3uin* 9ledPin) 3an 8r*un3 LCD t)r(a27un8 3)n8an 0in !<4<<'<##<#! ar3uin*
Out0ut 2)na20i-Jan JaraJt)r Ana-*8 In0ut 3)n8an JaraJt)r an8Ja 0a3a 7ari( J)3ua a8 ni-aina ()(uai 3)n8an ni-ai 0*t)(i*2)t)r in0ut UntuJ 2)na20i-Jan JaraJt)r Ana-*8 In0ut 0a3a 7ari( 0)rta2a 3i8unaJan 0)rinta/ lcd.setCursor (0,0); 3an lcd.print(!nalog "nput); UntuJ 2)na20i-Jan an8Ja ()(uai 3)n8an ni-ai 0*t)n(i*2)t)r 3i8unaJan 0)rinta/ lcd.print(sensorValue) 3i2ana sensorValue a3a-a/ ni-ai 3ari 0*t)n(i*2)t)r t)r()7ut UntuJ 3a0at 2)n8)ta/ui ni-ai 0*t)n(i*2)t)r 2aJa 3i8unaJan (nta analogRead an8 7)r1un8(i ()7a8ai
.*n)rt)r
ni-ai
sensorValue=analogRead() 0*t)n(i*2)t)r
J)
ni-ai
ana-*8 2aJa 3i8ita-
J)
3i8ita-
ana-*8R)a3 9#!4
aJan
%a3i
J)tiJa
2)n8J*n)r(i
()/in88a
J)tiJa
3i7)ri
0)rinta/
ni-ai
ana-*8
3i7)ri
0)rinta/
lcd.print(sensorValue) 2aJa *ut0ut an8 3ita20i-Jan a3a-a/ ni-ai 0*t)n(i*2)t)r t)r()7ut Pa3a 0r*8ra2 J))20at ran8Jaian in0ut *ut0ut (a2a 3)n8an 0r*8ra2 J)ti8a< /ana (aa 0a3a 0r*8ra2 J))20at *ut0ut an8 3i/a(i-Jan 7)ru0a JaraJt)r an8Ja< 3i2ana 7ari( 0)rta2a a3a-a/ ni-ai 3ari 0*t)n(i*2)t)r ()3an8Jan 7ari( J)3ua a3a-a/: M)na20i-Jan an8Ja untuJ ni-ai 0*t)n(i*2)t)r Juran8 3ari # • M)na20i-Jan an8Ja <'3ari ni-ai 0*t)n(i*2)t)r itu ()n3iri untuJ ni-ai 0*t)n(i*2)t)r • •
#' M)na20i-Jan an8Ja !' untuJ ni-ai 0*t)n(i*2)t)r -)7i/ 3ari '
UntuJ 2)na20i-Jan an8Ja ()(uai 3)n8an ni-ai 0*t)n(i*2)t)r 3i8unaJan 0)rinta/ lcd.print(sensorValue) 3i2ana sensorValue a3a-a/ ni-ai 3ari 0*t)n(i*2)t)r t)r()7ut UntuJ 2)n8)ta/ui ni-ai 0*t)n(i*2)t)r 2aJa 3i8unaJan (nta analogRead an8 7)r1un8(i ()7a8ai .*n)rt)r ni-ai ana-*8 J) 3i8ita- 3an 0)rinta/ sensorValue=analogRead() ()0)rti 0a3a 0r*8ra2 J)ti8a UntuJ 2)na20i-Jan an8Ja 0a3a 7ari( J)3ua< 3i8unaJan (nta i#.
S)n(*r5a-u)
2)ru0aJan ni-ai
3ari 0*t)n(i*2)t)r 0a3a 7ari(
0)rta2a
()3an8Jan
()n(*r5a-u)# a3a-a/ ni-ai 0a3a 7ari( J)3ua %a3i< iJa ()n(*r5a-u) Juran8 3ari # 2aJa ()n(*r5a-u) aJan 2)na20i-Jan an8Ja
%iJa ni-ai ()n(*r5a-u) antara #' 2aJa ni-ai ()n(*r5a-u)# a3a-a/ ()t)n8a/ 3ari ni-ai ()n(*r5a-u) %iJa ni-ai ()n(*r5a-u) -)7i/ 3ari ' 2aJa ()n(*r5a-u)# 2)na20i-Jan an8Ja !'
Ga27ar /a(i- 0)r.*7aan 0r*8ra2
I$.
K%"IMP&LAN 1. sensorValue 3i8unaJan ()7a8ai aria7-) in3iJat*r ni-ai 3ari ()n(*r 90*t)n(i*2)t)r
UntuJ 2)27a.a ni-ai 3ari ()n(*r 90*t)n(i*2)t)r 3i8unaJan 0)rinta/ sensorValue = analogRead(sensorPin); 2. P)rinta/ analogRead() 7)r1un8(i untuJ 2)n8J*n)r(i ran8) t)8an8an in0ut ana-*8 9 (a20ai ' *-t J) ni-ai 3i8ita- ()n(*r aitu antara (a20ai #!4 4 Pa3a 0r*8ra2# ()2aJin 7)(ar ni-ai 0*t)n(i*2)t)r ()2aJin .)0at 3)-a< ()7a-iJna ()2aJin J).i- ni-ai 0*t)n(i*2)t)r ()2aJin -a27at 3)-a . Pa3a 0r*8ra2! untuJ 2)na20i-Jan 3)-a an8 7)rJ)7a-iJan
2aJa 0a3a 3)-a
3itu-i(Jan delay(1023-sensorValue) a8ar ni-ai 3)-a na 7)rJ)7a-iJan 3)n8an 0r*8ra2 0)rta2a '. UntuJ 2)na20i-Jan an8Ja ()(uai 3)n8an ni-ai 0*t)n(i*2)t)r 3i8unaJan 0)rinta/ lcd.print(sensorValue) 3i2ana sensorValue a3a-a/ ni-ai 3ari 0*t)n(i*2)t)r t)r()7ut . Pa3a 0r*8ra2 sensorValue 2)ru0aJan ni-ai 3ari 0*t)n(i*2)t)r 0a3a 7ari( 0)rta2a ()3an8Jan sensorValue1 a3a-a/ ni-ai 0a3a 7ari( J)3ua UntuJ 2)na20i-Jan an8Ja 0a3a 7ari( J)3ua< 3i8unaJan (ta i#.
