Menampilkan isi variabel dengan bascom avr dan at mega 8535 Blog Adi Sanjaya Global Techno Solution - AS-GTS

Menampilkan isi variabel dengan bascom avr dan at mega 8535

Skema rangkaian Akses LCD 16x2  Menampilkan isi variabel dengan bascom avr dan at mega 8535

Source code Akses LCD 16x2  Menampilkan isi variabel dengan bascom avr dan at mega 8535

$regfile = "m8535.dat"

$crystal = 16000000

Config Lcdpin = Pin , Rs = Portc.0 , E = Portc.1 , Db4 = Portc.2

Config Lcdpin = Pin , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5

Config Lcd = 16 * 2

Cursor Off

Dim Var1 As Byte , Var2 As Byte

Cls

Lcd "Variabel 1="

Lowerline

Lcd "Variabel 2="

Do

Locate 1 , 12

Lcd Var1

Lcd " "

Locate 2 , 12

Lcd Var2

Lcd " "

Incr Var1

Decr Var2

wait 1

Loop

End