hmm.. irgendwie bin ich gerade leicht ueberfordert... gebe ein 5V rechtecksignal auf den icp ... (
die gesammtlänge des signals is 20 ms und wiederholt sich dann, leicht modifiziert )programm sieht so aus:
Code:
$regfile = "m644def.dat"
 $regfile = "m644def.dat"
 $framesize = 32
 $swstack = 32
 $hwstack = 32
 $crystal = 20000000
 $baud = 9600

Config Timer1 = Timer , Prescale = 8 , Edge = Rising
Start Timer1

Dim Kanal(9) As Word
Dim X As Word
Dim Y As Word
On Capture1 Get_kanal Nosave           
Config Pind.6 = Input                                       ' icp pin

                                                        
Enable Capture1
Enable Interrupts

Y = 1
Do

For X = 1 To 8
Print Kanal(x) ; "   " ;
Next X
Print Kanal(9)
Loop



 Get_kanal:

  Push R24
  push r25
  push r26
  push r27

 Kanal(y) = Capture1
 Incr Y
 Timer1 = 0
  pop r27
  pop r26
  pop r25
  pop r24
  If Y = 9 Then
  Y = 1
  End If

Return
 End
wenn das signal anliegt passiert absolut gar nichts... wenn ich aber mit dem finger auf den icp fasse springt er in die interrupt routine...
macht irgednwie keinen sinn finde ich...