code AVR Calculator Digital

CALCULATOR DIGITAL 12.53 Bascom AVR 2 comments Berikut tahap-tahap dalam membuat Calculator Digital dengan AVR A

Views 79 Downloads 1 File size 82KB

Report DMCA / Copyright

DOWNLOAD FILE

Recommend stories

Citation preview

CALCULATOR DIGITAL 12.53 Bascom AVR 2 comments Berikut

tahap-tahap

dalam

membuat

Calculator

Digital

dengan

AVR

Alat-alat yang dibutuhkan adalah sebagai berikut: 1.

ATMEGA-16

2.

Keypad-Small-Calc

3.

LM016 (LCD) Langkah selanjutnya adalah melakukan simulasi dengan menggunakan beberapa software pendukung, software yang dibutuhkan adalah:

1.

Proteus(ISIS 7 Professional)

2.

Bascom-AVR Mari kita mulai untuk melakukan simulasi terlebih dahulu:

1.

Buatlah rangkaian sesuai dengan gambar di bawah ini dengan menggunakan Software Proteus(ISIS 7 Profesional):

2.

setelah selesai merangkai gunakan software Bascom-AVR dengan mengetikkan kode sebagai berikut:

$regfile

=

$crystal Config Config

“m16def.dat” =

Kbd

= Lcd

Portd =

1000000 ,

Debounce 16

= *

30 2

Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7 , Rs = Portb.3 , E = Portb.2 Dim

A

As

Byte

Dim

B

As

Byte

Dim

Key

Dim

C

Dim

D

As

Byte

Dim

E

As

Byte

Dim

F

As

Byte

As

Byte

As

Byte

Cls Cursor

Off

Locate

2

,

Lcd

1

“calculator

dig”

E

=

0

B

=

0

Q: Waitms

200

‘B

=

A

0

=

If

A

Getkbd() >

15

Then

Goto

Q

Else Key

=

If

Lookup(a

Key

,