ATMega4809 externer Interrupt

[Torsten N. (torstenm1979)]

Hallo,

ich versuche mich gerade im Simulator an einem ATMega4809, da ich plane, 
den Arduino Nano Every für ein Projekt zu verwenden.

Mit den ATMega-Controllern bin ich ganz gut vertraut, aber beim 4809er 
schaffe ich es nicht, den externen Interrupt korrekt zu programmieren.

; --- main.asm ---

#define Value    R16
#define Status    R17
#define HighByte  R18
#define LowByte    R19

.cseg
.org 0x0000 rjmp reset
.org 0x000C rjmp setPointAcquisition_Triggered

reset:
  ldi    HighByte, HIGH(RAMEND)
  out    CPU_SPH, HighByte
  ldi    LowByte, LOW(RAMEND)
  out    CPU_SPL, LowByte

  rcall  setPointAcquisition_Initialize

  sei

main:
  jmp    main

.include "m4809def.inc"
.include "setPointAcquisition.asm"

; --- setPointAcquisition.asm ---

.include "m4809def.inc"

.equ SetPointInputPort    = PORTA_PIN0CTRL
.equ SetPointInputPin    = 0x1

setPointAcquisition_Initialize:
  lds    Value, SetPointInputPort
  sbr    Value, SetPointInputPin
  sts    SetPointInputPort, Value

  ret

setPointAcquisition_Triggered:
  push  Value
  lds    Status, CPU_SREG_offset

  sts    CPU_SREG_offset, Status
  pop    Value

  reti

Ich möchte PortA0 als externen Interrupt programmieren, um einen 
Sollwert zu erfassen (PWM Signal). Wenn ich im Simulator das 
entsprechende Pin0 auf HIGH setze, springt der Programmzähler korrekt in 
die ISR hinein und der Controller arbeitet diese ab. Nach dem der 
Programmzähler die ISR verlassen hat, springt er sofort wieder hinein - 
obwohl ich nur auf die Flanken triggere.

Gibt es bei diesem Controller irgendwelche Besonderheiten, was den 
externen Interrupt betrifft?

MfG Torsten

[Veit D. (devil-elec)]

Hallo,

du musst das Interrupt Flag zurücksetzen. Das machen die neuen 
Controller zu 99,9% nicht mehr automatisch. Also ohne Manual lesen 
pauschal selbst zurücksetzen.

[Torsten N. (torstenm1979)]

Hallo,

das habe ich schon versucht, ohne Erolg:

setPointAcquisition_Triggered:
  push  Value
  lds    Status, CPU_SREG_offset

  lds    Value, PORTA_INTFLAGS
  cbr    Value, 0x01
  sts    PORTA_INTFLAGS, Value

  sts    CPU_SREG_offset, Status
  pop    Value

  reti

MfG Torsten

[Veit D. (devil-elec)]

Hallo,

ist der Pin außen beschalten? Mit internen Pullup probiert?
Ansonsten musst du warten bis die Assemblerprofis hier aufschlagen.

[Torsten N. (torstenm1979)]

Hallo,

keine Hardware, zur Zeit bin ich nur im Simulator unterwegs.

MfG Torsten

[Spess53 .. (hardygroeger)]

Hi

.include "m4809def.inc"

Wozu ist das zweimal drin?

MfG Spess

[Torsten N. (torstenm1979)]

G' Morgen,

es sind eigentlich zwei Dateien.

MfG Torsten

[Veit D. (devil-elec)]

Hallo,

habe das mal übersetzt in direkte Register... das funktioniert mit 
echten Every Board. Kabelbrücke zwischen PB0 und PD3, dann takten beide 
Ausgänge syncron mit "both edges". Solltest du in Assembler übersetzen 
können.  :-)

#include <avr/interrupt.h>
#include <util/delay.h>

// PB0 - Arduino Pin  9
// PE2 - Arduino Pin 13
// PD3 - Arduino Pin 14

#define F_CPU 3333333UL

int main (void)
{
  VPORTB.DIR     &= PIN0_bm;             // Input
  PORTB_PIN0CTRL = 0;    // 
  PORTB_PIN0CTRL |= PORT_PULLUPEN_bm;    // 
  PORTB_PIN0CTRL |= 0x01;                // Interrupt enabled with sense on both edges
  VPORTE.INTFLAGS = PIN0_bm;             // delete Interrupt Flag
  VPORTE.DIR     |= PIN2_bm;             // Led 13
  VPORTD.DIR     |= PIN3_bm;             // Takt 14
  sei();
  
  while(1)
  { 
    VPORTD.IN = PIN3_bm;                // toggle Taktpin 14
    _delay_ms (100);
  }
}

ISR (PORTB_PORT_vect)
{
  VPORTE.IN       = PIN2_bm;   // toggle Led 13
  VPORTB.INTFLAGS = PIN0_bm;   // delete Flag
}

[Torsten N. (torstenm1979)]

Hallo,

danke dafür, werde es heute Abend mal im Simulator testen.

Noch eine Frage. Lässt sich der Nano Every mit AVR Studio direkt 
flashen? Ich arbeite generell nicht mit der Arduino IDE.

MfG Torsten

[Wilhelm M. (wimalopaan)]

Veit D. schrieb:
> VPORTE.INTFLAGS = PIN0_bm

Besser bei PORTB.

Veit D. schrieb:
> VPORTE.IN       = PIN2_bm;   // toggle Led 13

Das geht zwar so ist aber Obsfucation. Dafür gibt es OUTTGL.

[Ingo L. (corrtexx)]

Torsten N. schrieb:
> Lässt sich der Nano Every mit AVR Studio direkt
> flashen?
Nein, du kannst aber mit AVR Dude arbeiten, dass funktioniert, ist aber 
nicht komfortabel. Alternativ, die UPDI Schnittstelle auf dem Board 
anlöten/kontaktieren und den Mega4809 direkt ansprechen.

@echo off
setlocal


c:\windows\system32\mode.com com22: baud=1200 dtr=on
c:\windows\system32\mode.com com22: dtr=off

avrdude -C "C:\Users\Admin\AppData\Local\Arduino15\packages\arduino\tools\avrdude\6.3.0-arduino17/etc/avrdude.conf" -v -patmega4809 -cjtag2updi -PCOM22 -b115200 -e -D -Uflash:w:C:\Users\Admin\Desktop\3V1_PSR.hex:i -Ufuse0:w:0x00:m -Ufuse1:w:0xC4:m -Ufuse2:w:0x02:m -Ufuse5:w:0xC9:m -Ufuse6:w:0x07:m -Ufuse7:w:0x00:m -Ufuse8:w:0x00:m {upload.extra_files} 

PAUSE

AVR Dude installieren und der Path-Variable zufügen, schauen an welchem 
COM-Port sich der Every anmeldet und dann noch den Pfad zum Hex-File 
anpassen. Fuses nach bedarf, in diesem Code wird der interne OSC von 
16MHz auf 20MHz geschraubt. Achtung, der COM-Port muss 3x geändert 
werden, ich habe mich noch nicht damit beschäftigt, eine Art #define 
dafür zu machen.

[Torsten N. (torstenm1979)]

Danke Ingo :-)

MfG Torsten

[S. L. (sldt)]

> das habe ich schon versucht, ohne Erolg ... 'cbr ...'

Wie wäre es mit 'ori Value, 0x01'?
  Denn: 'Pin interrupt flag n is cleared by writing a ‘1’ to it'.

Korrektur:
'andi Value, ~0x01' ist wohl besser; oder, wenn es dieses (aus meiner 
Sicht unglückliche) 'cbr' sein muss: 'cbr Value, ~0x01'.

[Veit D. (devil-elec)]

Wilhelm M. schrieb:
> Veit D. schrieb:
>> VPORTE.INTFLAGS = PIN0_bm
>
> Besser bei PORTB.
>
> Veit D. schrieb:
>> VPORTE.IN       = PIN2_bm;   // toggle Led 13
>
> Das geht zwar so ist aber Obsfucation. Dafür gibt es OUTTGL.

Kann man machen, VPORTx ist jedoch einen Takt schneller.

[Veit D. (devil-elec)]

Hallo,

@ Torsten, Ingo
Wenn die Kommandozeile für einen passt, kann man diese oder mehrere in 
AS/MS eintragen.
Beitrag "Re: UPDI Programmer bauen - alias "El Tangas""
Vorher kompilieren, logisch.  :-)  :-)

[Wilhelm M. (wimalopaan)]

Veit D. schrieb:
> Hallo,
>
> @ Torsten, Ingo
> Wenn die Kommandozeile für einen passt, kann man diese oder mehrere in
> AS/MS eintragen.
> Beitrag "Re: UPDI Programmer bauen - alias "El Tangas""
> Vorher kompilieren, logisch.  :-)  :-)

Die neuere, bessere Variante heißt: pymcuprog

https://pypi.org/project/pymcuprog

Wie vorher braucht man für UPDI auch nur einen USB/seriell-Umsetzer 
(z.B. CP2102) und eine Diode oder Widerstand.

[Wilhelm M. (wimalopaan)]

Veit D. schrieb:
> Wilhelm M. schrieb:
>> Veit D. schrieb:
>>> VPORTE.INTFLAGS = PIN0_bm
>>
>> Besser bei PORTB.
>>
>> Veit D. schrieb:
>>> VPORTE.IN       = PIN2_bm;   // toggle Led 13
>>
>> Das geht zwar so ist aber Obsfucation. Dafür gibt es OUTTGL.
>
> Kann man machen, VPORTx ist jedoch einen Takt schneller.

Dann nimmt der C-Programmierer eben:

#define VPORTE_OUTTGL VPORTE_IN

(und der C++-Programmierer macht es sich beliebig hübsch - und sicher!)

[S. L. (sldt)]

Korrektur der Korrektur:
  Die Zeile in der ISR: entweder 'andi Value, 0x01' oder eben 'cbr 
Value, ~0x01'.

Was mir sonst auffiel:
- statt '.org 0x000C' hätte ich '.org PORTA_PORT_vect' geschrieben
- das Setzen des Stackpointers ist unnötig: 'Reset: Top of stack'
- die Zuordnung von HighByte und LowByte entspricht nicht dem 
AVR-Üblichen, passt evtl. später nicht bei z.B. 'movw'.

[Wilhelm M. (wimalopaan)]

Torsten N. schrieb:
> lds    Value, PORTA_INTFLAGS
>   cbr    Value, 0x01
>   sts    PORTA_INTFLAGS, Value

Es reicht ein:

sts PORTA_INFLAGS, 0x01

[S. L. (sldt)]

> Es reicht ein:
> sts PORTA_INFLAGS, 0x01

?

[Wilhelm M. (wimalopaan)]

S. L. schrieb:
>> Es reicht ein:
>> sts PORTA_INFLAGS, 0x01
>
> ?
 Ja sorry, dazu ist der AVR zu doof.

Also statt

  lds    Value, PORTA_INTFLAGS
  cbr    Value, 0x01
  sts    PORTA_INTFLAGS, Value

einfach

ldi Value,0x01
out PORTA_INTFLAGS,Value

Die Sequenz des ganz oben lädt alle Flags, löscht dann das 0-te und 
schreibt zurück. Damit werden alle gesetzten Flags resettet außer dem 
eigentlich gewünschten.

[S. L. (sldt)]

Nee, 'out' stimmt auch nicht.

 ldi Value,0x01
 sts PORTA_INFLAGS,Value

Würde auch das Sichern von SREG ersparen.

Oder vielleicht möchte Torsten etwas Schreibarbeit vermeiden mit:

 puti PORTA_INFLAGS,0x01

.macro put
.if @0 < $40
 out  @0,@1
.else
 sts  @0,@1
.endif
.endmacro

.macro puti
 ldi  tmp0,@1
 put @0,tmp0
.endmacro

[Wilhelm M. (wimalopaan)]

S. L. schrieb:
> Nee, 'out' stimmt auch nicht.
>  ldi Value,0x01
>  sts PORTA_INFLAGS,Value

Doch, da VPORTA_INTFLAGS die Adresse 0x03 hat.

Ups, sehe gerade, dass ich oben statt VPORTA_INFLAGS PORTA_INTFLAGS 
geschrieben habe. Asche auf mein Haupt.

Also nun:

ldi Value,0x01
out VPORTA_INTFLAGS,Value

[Veit D. (devil-elec)]

Hallo,

wegen Interrupt Flag zurücksetzen. Nichts von Hand irgendwie 
manipulieren. Einfach an die gewünschte Bitposition sturr "1" 
reinschreiben. Mehr muss nicht beachtet oder gemacht werden.

Bits 7:0 – INT[7:0] Pin Interrupt Flag
Pin interrupt flag n is cleared by writing a ‘1’ to it.
Pin interrupt flag n is set when the change or state of pin n (Pxn) matches the pin's Input/Sense Configuration (ISC)
in PORTx.PINnCTRL.
Writing a ‘0’ to bit n in this bit field has no effect.
Writing a ‘1’ to bit n in this bit field will clear Pin interrupt flag n.

[Veit D. (devil-elec)]

Wilhelm M. schrieb:
> Veit D. schrieb:
>> Hallo,
>>
>> @ Torsten, Ingo
>> Wenn die Kommandozeile für einen passt, kann man diese oder mehrere in
>> AS/MS eintragen.
>> Beitrag "Re: UPDI Programmer bauen - alias "El Tangas""
>> Vorher kompilieren, logisch.  :-)  :-)
>
> Die neuere, bessere Variante heißt: pymcuprog
>
> https://pypi.org/project/pymcuprog
>
> Wie vorher braucht man für UPDI auch nur einen USB/seriell-Umsetzer
> (z.B. CP2102) und eine Diode oder Widerstand.

Alles richtig. Es ging mir zu zeigen das man in AS einen eigenen 
Menüeintrag erstellen kann um die Kommandozeile zu hinterlegen. Für 
fertige Arduino xyz Boards wird nur ein USB Kabel benötigt. Beim Every 
ist der UPDI Übersetzer auf dem Board. Wie bei den MC Curiosity Boards.

[Wilhelm M. (wimalopaan)]

Veit D. schrieb:
> Hallo,
>
> wegen Interrupt Flag zurücksetzen. Nichts von Hand irgendwie
> manipulieren. Einfach an die gewünschte Bitposition sturr "1"
> reinschreiben. Mehr muss nicht beachtet oder gemacht werden.
>

> Bits 7:0 – INT[7:0] Pin Interrupt Flag
> Pin interrupt flag n is cleared by writing a ‘1’ to it.
> Pin interrupt flag n is set when the change or state of pin n (Pxn) 
> matches the pin's Input/Sense Configuration (ISC)
> in PORTx.PINnCTRL.
> Writing a ‘0’ to bit n in this bit field has no effect.
> Writing a ‘1’ to bit n in this bit field will clear Pin interrupt flag 
> n.
>

Willkommen im Club, oder "Man lernt nur durch Wiederholung". Steht alles 
schon oben.
Die Frage ist, ob der TO das auch liest.

[Veit D. (devil-elec)]

Hallo,

der TO bekommt das schon, da bin ich mir sicher. Die Frage ist eher ob 
sein Simulator das alles korrekt umsetzen kann.

[Torsten N. (torstenm1979)]

S. L. schrieb:
>> das habe ich schon versucht, ohne Erolg ... 'cbr ...'
>
> Wie wäre es mit 'ori Value, 0x01'?
>   Denn: 'Pin interrupt flag n is cleared by writing a ‘1’ to it'.
>
> Korrektur:
> 'andi Value, ~0x01' ist wohl besser; oder, wenn es dieses (aus meiner
> Sicht unglückliche) 'cbr' sein muss: 'cbr Value, ~0x01'.

Hallo,

also wer lesen kann, ist klar im Vorteil. Man bin ich blöd, ich habe 
eine '0' reingeschrieben.

Vielen Dank euch allen für eure Hilfe.

MfG Torsten

[Wilhelm M. (wimalopaan)]

Torsten N. schrieb:
> S. L. schrieb:
>>> das habe ich schon versucht, ohne Erolg ... 'cbr ...'
>>
>> Wie wäre es mit 'ori Value, 0x01'?
>>   Denn: 'Pin interrupt flag n is cleared by writing a ‘1’ to it'.
>>
>> Korrektur:
>> 'andi Value, ~0x01' ist wohl besser; oder, wenn es dieses (aus meiner
>> Sicht unglückliche) 'cbr' sein muss: 'cbr Value, ~0x01'.
>
> Hallo,
>
> also wer lesen kann, ist klar im Vorteil. Man bin ich blöd, ich habe
> eine '0' reingeschrieben.

Nicht nur das ... s.a.mein Beitrag oben.

[S. L. (sldt)]

Ja, war leider nicht ganz korrekt, weil damit evtl. weitere Flags 
gelöscht werden; korrekt ist das direkte, einfache Setzen des Bits im 
Register (also ohne vorheriges Lesen), wie von Wilhelm M. vorgestellt.

Nochmal zum 'cbr' (wie auch 'sbr'): das ist kein richtiger Befehl, 
sondern genaugenommen ein Artefakt des Assemblers - erkennbar im 'AVR® 
Instruction Set Manual', denn dort wird hierfür kein Maschinencode 
gezeigt.
  Und stiftet nur Verwirrung, falls man sich an 'sbi' oder 'cbi' 
orientiert.

[Spess53 .. (hardygroeger)]

Hi

>Nochmal zum 'cbr' (wie auch 'sbr'): das ist kein richtiger Befehl,
>sondern genaugenommen ein Artefakt des Assemblers -
>erkennbar im 'AVR® Instruction Set Manual', denn dort wird hierfür kein 
>Maschinencode gezeigt.


Wieso kein Maschinencode. Bei mir steht da
16-bit Opcode:   1001 1000 AAAA Abbb

mit  0 ≤ A ≤ 31, 0 ≤ b ≤ 7

Ist für mich ein eindeutiger Code.

MfG Spess

[S. L. (sldt)]

an Spess53:

Da haben Sie sich wohl vertan, Ihre Angaben kann ich nicht 
nachvollziehen.
  'cbr' ist ein im Argument modifiziertes 'andi', aus dem Listfile:

000000 7a0a        cbr  r16,~0xAA
000001 7a0a        andi r16,0xAA

Der Maschinencode fehlt für 'cbr' im 'AVR® Instruction Set Manual', 
siehe Anhang.

'sbr' ist identisch zu 'ori', bringt folglich, nach meiner Meinung, 
keinerlei Mehrwert.

[Uwe K. (ukhl)]

Warum sich mit ASM quälen, wenn es C gibt.

Es ist erstaunlich effektiv und viel einfacher.

Ist natürlich Geschmackssache....

[Spess53 .. (hardygroeger)]

Gi

>>Warum sich mit ASM quälen, wenn es C gibt.

Warum sich mit C quälen, wenn es Pascal gibt.

Es ist erstaunlich effektiv und viel einfacher.

MfG Spess

[Helmut H. (quacksalber)]

Spess53 .. schrieb:
> Gi
>
>>>Warum sich mit ASM quälen, wenn es C gibt.
>
> Warum sich mit C quälen, wenn es Pascal gibt.
>
> Es ist erstaunlich effektiv und viel einfacher.
>
> MfG Spess

Welches Pascal für AVR denn genau? Luna-AVR ist klinisch tot.
MfG Helmut

[S. L. (sldt)]

an Uwe K.:

Finden Sie nicht auch, nach näherer Betrachtung, dass Ihr Beitrag zum 
Thema etwas dürftig ausgefallen ist?
  Und da gleich zu Beginn offensichtlich war, dass es hier um Assembler 
geht, frage ich mich, weshalb Sie sich bis hier unten, durch dreißig 
Beiträge, "gequält" haben.

[Spess53 .. (hardygroeger)]

Hi

>Welches Pascal für AVR denn genau? Luna-AVR ist klinisch tot.

Lazarus

MfG Spess

[Günther K. (avr-guenther)]

Spess53 .. schrieb:
> Lazarus

Gibt es aber meines Wissens nur für Linux. Windows User sthen aussen 
vor.

Oder?

Ciao

[Spess53 .. (hardygroeger)]

Hi

>Gibt es aber meines Wissens nur für Linux. Windows User sthen aussen vor.

https://www.lazarusforum.de/viewtopic.php?t=12660

MfG Spess

[Günther K. (avr-guenther)]

Spess53 .. schrieb:
> https://www.lazarusforum.de/viewtopic.php?t=12660

in diesem Thread geht es um unterstützte AVR Varianten. Von einer Windos 
portierung von Lazarus habe ich da nichts lesen können.

Werde hute Abend mal stöbern.

Ciao

[Uwe K. (ukhl)]

S. L. schrieb:
> an Uwe K.:
>
> Finden Sie nicht auch, nach näherer Betrachtung, dass Ihr Beitrag zum
> Thema etwas dürftig ausgefallen ist?

Ähh. Nein.