Program Lampu Knight Rider Menggunakan Mikrokontroller Atmega8

$regfile = "m8def.dat"
$crystal = 8000000
Config Portc = Output

Const Delaytime = 20

Do

   Portc = &B11111111
   Waitms Delaytime
   Portc = &B00000001
   Waitms Delaytime
   Portc = &B00000010
   Waitms Delaytime
   Portc = &B00000100
   Waitms Delaytime
   Portc = &B00001000
   Waitms Delaytime
   Portc = &B00010000
   Waitms Delaytime
   Portc = &B00100000
   Waitms Delaytime
   Portc = &B01000000
   Waitms Delaytime
   Portc = &B10000000
   Waitms Delaytime

Loop

End