Structs in ACME, wie?

BastetFurry · March 4, 2025 at 10:36 PM 2 posts here

Um es kurz zu machen, wie kann man das hier schöner schreiben?

Code

CursorX = $04 ; and $05 - The "mouse" cursor position in X
CursorY = $06 ; The "mouse" cursor position in Y
CursorB = $07 ; Is non-zero when the button was pushed
CursorSpeedIndex = $08 ; Counts up to $20 and then doubles the cursor speed

Irgendwas wo ich nur die Startadresse angebe und das ganze dann von alleine hoch zählt, die Doku war leider nicht so ganz hilfreich. -.-

the_cky · March 18, 2025 at 8:01 PM 1 post here

Moin,

warum nicht einfach eine Startadresse für die Labelzuweisung nehmen?

Code

base = $04
CursorX = base   ; and $05 - The "mouse" cursor position in X
CursorY = base+2 ; The "mouse" cursor position in Y
CursorB = base+3 ; Is non-zero when the button was pushed
CursorSpeedIndex = base+4 ; Counts up to $20 and then doubles the cursor speed

BastetFurry · March 20, 2025 at 8:12 AM 2 posts here

Quote from the_cky

warum nicht einfach eine Startadresse für die Labelzuweisung nehmen?

Dann muss man immer noch alles nachschieben wenn man irgendwo etwas hinzufügen will, oder es hinten dran pappen. Genau das wollte ich eigentlich vermeiden.
Aber gut, was nicht ist das ist halt nicht. :emojiSmiley-04:

Claus · March 20, 2025 at 9:07 AM 1 post here

Ich mach meist so was:

Code

CursorX = $04    ; and $05 - The "mouse" cursor position in X
CursorY = CursorX+2 ; The "mouse" cursor position in Y
CursorB = CursorY+1 ; Is non-zero when the button was pushed
CursorSpeedIndex = CursorB+1 ; Counts up to $20 and then doubles the cursor speed

Das ist jetzt auch nicht der Gipfel der Eleganz, aber man kann recht leicht Werte einfügen.

Hoogo · March 20, 2025 at 9:08 AM 1 post here

Vielleicht geht das, probier mal aus:

Code

*=$04

CursorX !skip 2
CursorY !skip 1
CursorB !skip 1
CursorSpeedIndex !skip 1

*=$c000

berni · March 20, 2025 at 6:50 PM 1 post here

Quote from Hoogo
Vielleicht geht das, probier mal aus:
Code
*=$04

CursorX !skip 2
CursorY !skip 1
CursorB !skip 1
CursorSpeedIndex !skip 1

*=$c000

Damit wird eine Code-Datei beginnend bei $0004 angelegt, die riesen groß ist. Aber das hat mich grad auf eine Idee gebracht, die tut:

Code

* = $C000, invisible

!pseudopc $04 {
CursorX !skip 2
CursorY !skip 1
CursorB !skip 1
CursorSpeedIndex !skip 1
}

* = $C000, invisible

  lda CursorY
  sta CursorB
  rts

Display More

Damit wird so getan, als wäre der Programmcounter bei $04, die Werte werden aber ab $C000 angelegt. Anschließend wird das ganze durch das eigentliche Programm überschrieben. Damit keine Warnungen ausgegeben werden braucht man das `invisible`.

Anstelle von `!skip` kann man auch `!wo 0` bzw. `!by 0` verwenden. Dann muss man nicht selber bis 2 zählen.

Endurion · March 21, 2025 at 11:16 AM 1 post here

Gab's bei ACME nicht auch die virtual !byte-Statements?

Sowas

* = 4

CursorX !byte ?

CursorY !byte ?

CursorB !byte ?

...

Solange ein Segment rein virtuell ist, werden die Daten nicht ins Compilat übernommen.

6 users have written here