Bascom Inline-Assembler

[Che Guevara]

Wie meinst du das mit dem Hochzählen? Hier

Isr_int0:                                                'falling edge detection
If Channel > 0 And Channel < 6 Then                         'fill empf(1-5)
  Empf(channel) = Timer0
End If
Timer0 = 6                                                  'preload for 4.096 ms
Incr Channel                                                'Increase Channel
Return

wird die Variable hochgezählt. Wenn du etwas anderes wissen möchtest, dann verstehe ich deine Frage leider nicht.

Gruß
Chris

[MagicWSmoke]

Wie meinst du das mit dem Hochzählen?

Ist ok, hab's jetzt gesehen. Selektive Wahrnehmung

[Che Guevara]

Ok
Aber jetzt ist meine Frage noch offen?!
Ich frage Channel nach >= 1 und < 6 ab. Wenns in dem Bereich ist, dann lese ich die Timer0 Variable WIE ein?

   LSL   r24                                                ' * 2 (wordlength)
   CLR   r25                                                ' clear  (r24 kann ja nicht grösser als 8 werden)
   Loadadr Dummy , X                                        ' addr Empf(0)
   ADD   XL, r24                                            ' addr Empf + 2*channel
   ADC   XH, r25
   !IN    r24, TCNT0                                        ' timer0
   ST    X+ , r24                                           ' empf(channel) = timer0
   ST    X  , r25

Funktioniert dann trotzdem, oder? Hier wird ja, soweit ich das verstanden habe, nur Channel nach links geschiftet, da Empf ein Word ist. Dann wird der entsprechende Empf-Feld-Bereich addresiert und Timer0 wird dort hineingeschrieben!?
Muss ich außer den normal verwendeten Registern und SREG sonst noch was sichern? Warum muss ich überhaupt SREG sichern?

Gruß
Chris

[MagicWSmoke]

dann lese ich die Timer0 Variable WIE ein?

So:

   !IN    r24, TCNT0                                        ' timer0

Funktioniert dann trotzdem, oder? Hier wird ja, soweit ich das verstanden habe, nur Channel nach links geschiftet, da Empf ein Word ist. Dann wird der entsprechende Empf-Feld-Bereich addresiert und Timer0 wird dort hineingeschrieben!?

Warum brauchst Du ein Wordarray, wenn Du nur einen 8Bit-Timer hast ? Werden da noch Rechnungen im Array durchgeführt ?

Warum muss ich überhaupt SREG sichern?

Weil das SREG Statusflags enthält, die z.B. von INC oder CPI verändert werden.

[Che Guevara]

Nein, ich meinte, wie ich die Variable dann ins Array schreibe? So, wie ich gerade eben nochmal gespostet habe?

Ja, es werden noch Rechnungen durchgeführt und somit benötigt man ein Word. Ich habs e schon mal als Byte deklariert, aber das wollte dann nicht so recht. Deswegen ists ein Word.
Ok, das verstehe ich.

Gruß
Chris

[MagicWSmoke]

Nein, ich meinte, wie ich die Variable dann ins Array schreibe? So, wie ich gerade eben nochmal gespostet habe?

Ja.

Ja, es werden noch Rechnungen durchgeführt und somit benötigt man ein Word. Ich habs e schon mal als Byte deklariert, aber das wollte dann nicht so recht. Deswegen ists ein Word.

Werden die Rechnungen innerhalb der Arrayvariable durchgeführt oder in einer extra Variablen ?

[Che Guevara]

Hier sind die Berechnungen im Code:

'--Noise filter--
For I = 1 To 5
  Meanrx(i) = Meanrx(i) * 3
  Meanrx(i) = Meanrx(i) + Empf(i)                           '"lowpass filter" of the RC signal
  Shift Meanrx(i) , Right , 2                               ' (=divide by 4)
  Aempfh(i) = Meanrx(i) + 17                                'upper acceptable fluctuation
  Aempfl(i) = Meanrx(i) - 17                                'lower acceptable fluctuation
  If Empf(i) > Aempfh(i) Or Empf(i) < Aempfl(i) Then        'compare allowed fluctuation with current rc reading
     Empf(i) = Meanrx(i)                                    'if fluctuation was too high -> replace with averaged value
     Print "Error reading channel: " ; I                    'handy to check for RC problems
  End If
Next

'Empf(X) are filled in "getreceiver". They usually contain values ranging from 63 - 137.
'Empf(throttlechannel) is the throttle stick. it will be rescaled differently.
If Empf(throttlechannel) > 61 And Empf(throttlechannel) < 139 Then       'don't process values that can't be correct
  Sempf(throttlechannel) = Empf(throttlechannel) - 61
  Sempf(throttlechannel) = Sempf(throttlechannel) * 3       '==> values ranging from 3 (stick at bottom) to 228 (full throttle)
End If
'Now nick, roll, yaw and idle up switch

If Empf(nickchannel) > 61 And Empf(nickchannel) < 139 Then  'don't process values that can't be correct
  Sempf(nickchannel) = Empf(nickchannel) - 100              'convert to values ranging from -37 to +37
End If
If Empf(rollchannel) > 61 And Empf(rollchannel) < 139 Then  'don't process values that can't be correct
  Sempf(rollchannel) = Empf(rollchannel) - 100              'convert to values ranging from -37 to +37
End If
  If Empf(yawchannel) > 61 And Empf(yawchannel) < 139 Then  'don't process values that can't be correct
  Sempf(yawchannel) = Empf(yawchannel) - 100                'convert to values ranging from -37 to +37
End If
If Empf(5) > 61 And Empf(5) < 139 Then                      'don't process values that can't be correct
  Sempf(5) = Empf(5) - 100                                  'convert to values ranging from -37 to +37
End If

Eigentlich findet alles nicht im Array statt, trotzdem gehts nicht als Byte. Vielleicht liegt das daran, dass bei Fehlerhaftem Signal die Variable Meanrx in Empf geschrieben wird. Sicher bin ich mir da aber nicht. Vielleicht hast du eine Erklärung?

Gruß
Chris