Traffic Light Simulator dengan bascom avr dan at mega 8535 Blog Adi Sanjaya Global Techno Solution - AS-GTS

Gambar skema rangkaian Traffic Light Simulator dengan bascom avr dan at mega 8535

Source code Traffic Light Simulator dengan bascom avr dan at mega 8535

$regfile = "m8535.dat"

$crystal = 16000000

Config Portc = Output

Config Porta = Output

Do

Portc = &B11011110

Porta = &B11110011

Wait 3

Portc = &B11011101

Porta = &B11110011

Wait 1

Portc = &B11011011

Porta = &B11110110

Wait 3

Portc = &B11011011

Porta = &B11110101

Wait 1

Portc = &B10011011

Porta = &B11111011

Wait 3

Portc = &B01011011

Porta = &B11111011

Wait 1

Portc = &B11110011

Porta = &B11110011

Wait 3

Portc = &B11101011

Porta = &B11110011

Wait 1

Loop

End