$regfile = "m8def.dat"                                      '
$crystal = 8000000

Config Portb = Input
       Portb = &B00000000
Config Portd = Input
       Portd = &B0100000
Config Portc = Output
       Portc = &B0000000





Do

   If Pinb.0 = 1 Then
   Toggle Portd.0
   Toggle Portd.1
   End If

 Loop



End