Hier mal eine Variante, die dir die Zeit zwischen dem Ansteigen und dem Fallen eines Signals ausgibt. Das Ausrechnen, durch was du teilen musst um auf 'ne sinnvolle Zeiteinheit zu kommen, überlasse ich mal dir.
Code:
$regfile = "4433def.dat"  
$crystal = 4000000
$baud = 9600
Config Timer1 = Timer , Prescale = 8
Start Timer1
On Int0 C1rise : On Int1 C1fall
Enable Int0 Rising : Enable Int1 Falling
Enable Interrupts
do
  loop 'Endlosschleife
C1rise: 'Bei Beginn den Timer zurücksetzen
  timer1=0
  return
C1fall: 'Am Ende steht in timer1 drin, wie lange das Signal an war.
  print timer1
  return
PS: Ich hab' keine Ahnung, wie lange die Print-Befehl von Bascom braucht.