// SKETCH LAMPU TRAFFICT LIGH PERTIGAAN JALAN
// Definisikan
int UM = 1; // Utara Merah
int UK = 2; // Utara Kuning
int UH = 3; // Utara Hijau
int TM = 4; // Timur Merah
int TK = 5; // Timur Kuning
int TH = 6; // Timur Hijau
int SM = 7; // Selatan Merah
int SK = 8; // Selatan Kuning
int SH = 9; // Selatan Hijau
int BM = 10; // Barat Merah
int BK = 11; // Barat Kuning
int BH = 12; // Barat Hijau
int TeM = 13; // Tenggara Merah
int TeK = A5; // Tenggara Kuning
int TeH = A4; // Tenggara Hijau
int BdM = A3; // B.Daya Merah
int BdK = A2; // B.Daya Kuning
int BdH = A1; // B.Daya Hijau
// PROGRAMMER NBS
void setup() {
pinMode (UM, OUTPUT);
pinMode (UK, OUTPUT);
pinMode (UH, OUTPUT);
pinMode (TM, OUTPUT);
pinMode (TK, OUTPUT);
pinMode (TH, OUTPUT);
pinMode (SM, OUTPUT);
pinMode (SK, OUTPUT);
pinMode (SH, OUTPUT);
pinMode (BM, OUTPUT);
pinMode (BK, OUTPUT);
pinMode (BH, OUTPUT);
pinMode (TeM, OUTPUT);
pinMode (TeK, OUTPUT);
pinMode (TeH, OUTPUT);
pinMode (BdM, OUTPUT);
pinMode (BdK, OUTPUT);
pinMode (BdH, OUTPUT);
// RANCANGAN NBS
}
void loop() {
//ARAH DARI UTARA JALAN
digitalWrite (UM, LOW);
digitalWrite (UK, LOW);
digitalWrite (UH, HIGH);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(3000);
digitalWrite (UM, LOW);
digitalWrite (UK, HIGH);
digitalWrite (UH, LOW);
digitalWrite (TM, LOW);
digitalWrite (TK, HIGH);
digitalWrite (TH, LOW);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(1000);
// ARAH DARI TIMUR JALAN
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, LOW);
digitalWrite (TK, LOW);
digitalWrite (TH, HIGH);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(3000);
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, LOW);
digitalWrite (TK, HIGH);
digitalWrite (TH, LOW);
digitalWrite (SM, LOW);
digitalWrite (SK, HIGH);
digitalWrite (SH, LOW);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(1000);
//ARAH DARI SELATAN JALAN
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, LOW);
digitalWrite (SK, LOW);
digitalWrite (SH, HIGH);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(3000);
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, LOW);
digitalWrite (SK, HIGH);
digitalWrite (SH, LOW);
digitalWrite (BM, LOW);
digitalWrite (BK, HIGH);
digitalWrite (BH, LOW);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(1000);
//ARAH DARI BARAT JALAN
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, LOW);
digitalWrite (BK, LOW);
digitalWrite (BH, HIGH);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(3000);
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, LOW);
digitalWrite (BK, HIGH);
digitalWrite (BH, LOW);
digitalWrite (TeM, LOW);
digitalWrite (TeK, HIGH);
digitalWrite (TeH, LOW);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(1000);
// ARAH DARI TENGGARA JALAN
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, LOW);
digitalWrite (TeK, LOW);
digitalWrite (TeH, HIGH);
digitalWrite (BdM, HIGH);
digitalWrite (BdK, LOW);
digitalWrite (BdH, LOW);
delay(3000);
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, LOW);
digitalWrite (TeK, HIGH);
digitalWrite (TeH, LOW);
digitalWrite (BdM, LOW);
digitalWrite (BdK, HIGH);
digitalWrite (BdH, LOW);
delay(1000);
//ARAH DARI B.DAYA JALAN
digitalWrite (UM, HIGH);
digitalWrite (UK, LOW);
digitalWrite (UH, LOW);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, LOW);
digitalWrite (BdK, LOW);
digitalWrite (BdH, HIGH);
delay(3000);
digitalWrite (UM, LOW);
digitalWrite (UK, HIGH);
digitalWrite (UH, LOW);
digitalWrite (TM, HIGH);
digitalWrite (TK, LOW);
digitalWrite (TH, LOW);
digitalWrite (SM, HIGH);
digitalWrite (SK, LOW);
digitalWrite (SH, LOW);
digitalWrite (BM, HIGH);
digitalWrite (BK, LOW);
digitalWrite (BH, LOW);
digitalWrite (TeM, HIGH);
digitalWrite (TeK, LOW);
digitalWrite (TeH, LOW);
digitalWrite (BdM, LOW);
digitalWrite (BdK, HIGH);
digitalWrite (BdH, LOW);
delay(1000);
}