Aplikasi Seven Segmen Dengan Mikrokontroler
Peralatan keluaran yang sering digunakan dalam menampilkan bilangan adalah penampilan seven segmen yang ditunjukkan pada gambar 3.1. jutuh segmen tersebut dilabelkan dengan huruf a samping
Gambar 4.3 rangkaian 7 segment
'--------------------------------------------------------------------------------
'program seven segment tunggal 1'--------------------------------------------------------------------------------
$regfile = "8535def.dat"
$crystal = 12000000
Config Porta = Output 'deklarasi porta sebagai output
Do
Porta = &B01111001 ' porta menampilkan angaka 1
Waitms 100
Porta = &B00100100 ' porta menampilkan angaka 2
Waitms 100
Porta = &B00110000 ' porta menampilkan angaka 3
Waitms 100
Porta = &B00011001 ' porta menampilkan angaka 4Waitms 100
Porta = &B00010010 ' porta menampilkan angaka 5
Waitms 100
Porta = &B00000010 ' porta menampilkan angaka 6
Waitms 100
Porta = &B01111000 ' porta menampilkan angaka 7
Waitms 100
Porta = &B00000000 ' porta menampilkan angaka 8
Waitms 100
Porta = &B00010000 ' porta menampilkan angaka 9
Waitms 100
Porta = &B01000000 ' porta menampilkan angaka 0
Waitms 100
Loop
End
'program seven segment tunggal 1'--------------------------------------------------------------------------------
$regfile = "8535def.dat"
$crystal = 12000000
Config Porta = Output 'deklarasi porta sebagai output
Do
Porta = &B01111001 ' porta menampilkan angaka 1
Waitms 100
Porta = &B00100100 ' porta menampilkan angaka 2
Waitms 100
Porta = &B00110000 ' porta menampilkan angaka 3
Waitms 100
Porta = &B00011001 ' porta menampilkan angaka 4Waitms 100
Porta = &B00010010 ' porta menampilkan angaka 5
Waitms 100
Porta = &B00000010 ' porta menampilkan angaka 6
Waitms 100
Porta = &B01111000 ' porta menampilkan angaka 7
Waitms 100
Porta = &B00000000 ' porta menampilkan angaka 8
Waitms 100
Porta = &B00010000 ' porta menampilkan angaka 9
Waitms 100
Porta = &B01000000 ' porta menampilkan angaka 0
Waitms 100
Loop
End