MiniMax
18.12.2010, 20:14
Hallo Zusammen,
ich habe im wiki folgendes Gefunden:
$baud = 9600
$crystal = 16000000
$regfile "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 64
Config Timer0 = Timer , Prescale = 256 , Capture Edge = Falling , Noise Cancel = 1
Enable Timer0
On Timer0 Pausedetected
Config Int1 = Falling 'Summensignal an int1 (am Mega32: Port D3), Reaktion auf fallende Flanke
Enable Interrupts
Enable Int1 'einschalten Int1
On Int1 Measure 'springe zum Interrupt von Timer0
Dim Empf(6) As Word
Dim Channel As Byte
Do 'Main Loop gibt Signale per UART aus
Print Empf(1) ; " CH1"
Print Empf(2) ; " CH2"
Print Empf(3) ; " CH3"
Print Empf(4) ; " CH4"
Print Empf(5) ; " CH5"
Print Empf(6) ; " CH6"
Print " "
Waitms 500
Loop
Measure: 'Reaktion auf fallende Flanke
If Channel > 0 And Channel < 6 Then
Empf(channel) = Timer0
End If
Timer0 = 6 'preload für 4ms
Incr Channel
Return
Pausedetected:
Channel = 0
Return
End
Der Code kann so wie ich es sehe ja nur 6 Kanäle aus dem Summensignal Filter?
Da ich den Simprop Gigascan 5 Nehme, möchte ich gerne alle 12 Kanäle auslesen. Kann ich jetzt einfach den Zähler von <6 auf <12 erhöhen?
Oder kann ich das anders Lösen?
ich habe im wiki folgendes Gefunden:
$baud = 9600
$crystal = 16000000
$regfile "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 64
Config Timer0 = Timer , Prescale = 256 , Capture Edge = Falling , Noise Cancel = 1
Enable Timer0
On Timer0 Pausedetected
Config Int1 = Falling 'Summensignal an int1 (am Mega32: Port D3), Reaktion auf fallende Flanke
Enable Interrupts
Enable Int1 'einschalten Int1
On Int1 Measure 'springe zum Interrupt von Timer0
Dim Empf(6) As Word
Dim Channel As Byte
Do 'Main Loop gibt Signale per UART aus
Print Empf(1) ; " CH1"
Print Empf(2) ; " CH2"
Print Empf(3) ; " CH3"
Print Empf(4) ; " CH4"
Print Empf(5) ; " CH5"
Print Empf(6) ; " CH6"
Print " "
Waitms 500
Loop
Measure: 'Reaktion auf fallende Flanke
If Channel > 0 And Channel < 6 Then
Empf(channel) = Timer0
End If
Timer0 = 6 'preload für 4ms
Incr Channel
Return
Pausedetected:
Channel = 0
Return
End
Der Code kann so wie ich es sehe ja nur 6 Kanäle aus dem Summensignal Filter?
Da ich den Simprop Gigascan 5 Nehme, möchte ich gerne alle 12 Kanäle auslesen. Kann ich jetzt einfach den Zähler von <6 auf <12 erhöhen?
Oder kann ich das anders Lösen?