Menampilkan HURUF S pada dot matrik 5x7 bascom avr dan at mega 8535 Blog Adi Sanjaya Global Techno Solution - AS-GTS

Menampilkan HURUF s pada dot matrik 5x7 bascom avr dan at mega 8535

Gambar skema rangkaian Menampilkan HURUF s pada dot matrik 5x7 bascom avr dan at mega 8535

Source code Menampilkan HURUF s pada dot matrik 5x7 bascom avr dan at mega 8535

$regfile = "m8535.dat"

$crystal = 16000000

Config Portc = Output

Config Portd = Output

Dim I As Byte

Do

For I = 0 To 4

Portd = Lookup(i , Kolom)

Portc = Lookup(i , Baris)

Waitms 5

Next

Loop

End

Kolom:

Data &HFE , &HFD , &HFB , &HF7 , &HEF

Baris:

Data &B10111001,&B10110110,&B10110110,&B10110110,&B11001110