ABBUC e.V. Forum

Dr. Irata

Hallo und ein frohes Pfingstfest uns allen! Ich denke wohl jeder aufmerksame User hat bemerkt, daß sich die generelle Aktivität hier im ABBUC senkt. Kaum Informationen vom Vorstand, weniger aktive Beiträge von aktiven Mitgliedern, eine allgemeine Müdigkeit schleicht sich zunehmend ein. So ist jedenf...

Dr. Irata

... hatte ich noch aus ganz alten Unterlagen...

Dr. Irata

.....

Dr. Irata

Vielleichst solltest Du für Deine "Aufgaben" mal dem GNU-Superoptimizer 6502 beibringen :) https://www.gnu.org/software/superopt/ Einmal gemacht, löst der dann ohne KI alle Aufgaben für Dich :lol: ... es geht gar nicht um Lösungen für mich... Bald unterhalten sich hier im Forum dann eh nu...

Dr. Irata

ja super Lösung

Dr. Irata

... hier mal mein schneller Ansatz: (ist natürlich nur eine recht gute Näherung)

Code: Alles auswählen

		LDA Wert
		LSR
		LSR
		LSR
		TAX
		LDA TabKorr,x
		STA Ergebnis

TabKorr	
		.byte 0,1,2,3,4,5,6,6,7,8,9,9,10,11,12,13,13,14,15,16,17,17,18,19,20,21,21,22,23,24,25

Dr. Irata

noch mal eine "knifflige" Aufgabe:

LDA Wert
LSR ;(50%)
LSR ;(25%)
LSR ;(12%)

Aber wie bekomme ich möglichst effektiv die 10% ??
Wer hat den smartesten und schnellsten / kürzesten Ansatz in Assembler??

Dr. Irata

Dr. Irata hat geschrieben: ↑
31.05.2025 20:21
also oben steh im kürzesten Code folgendes:

Nimm den Wert und teile ihn durch 2 (Befehl LSR) = 50%
Addiere dann mit dem Ursprungswert (100%+50% = 150%)
Teile wieder durch 2 (Befehl ROR) = 75%

also das ist ohne KI Power und kürzer als die von der KI

Dr. Irata

also oben steh im kürzesten Code folgendes:

Nimm den Wert und teile ihn durch 2 (Befehl LSR) = 50%
Addiere dann mit dem Ursprungswert (100%+50% = 150%)
Teile wieder durch 2 (Befehl ROR) = 75%

Dr. Irata

... ich lasse es mal so, den Namen haben schon etliche andere verwendet... dann kann ich das wohl auch und meins wird ja nicht kommerziell...

: gemi1.png (1.1 MiB) 1443 mal betrachtet

: gemi2.png (382.43 KiB) 1443 mal betrachtet

Dr. Irata

ja CLC kann weg, da es irrelevant in diesem Fall ist!

Dr. Irata

oh... das wusste ich nicht. Danke für den Hinweis...

Dr. Irata

... ne das CLC muss m.E. leider drin bleiben, da man sonst evt. mit LSR ein Carry setzt und mit ADC das dann fälschlich addiert...

Dr. Irata

Hey Mathy... klar doch. Und wenn du dir den ersten Ansatz genau anschaust, dann wirst du sehen, daß der genau so funktioniert.
Zunächst wird 2x halbiert mit LSR, der 25% Wert in Temp zwischengespeichert und dann vom 100%-Wert abgezogen.
Super Lösung, aber etwas langsamer als die anderen Ansätze.

Dr. Irata

Ja das muss man natürlich berücksichtigen... bei höheren Werten kommt man über 255 und dann wird es problematisch.
Der 3. Ansatz funktioniert wohl nur korrekt bei Werten bis 170

Code: Alles auswählen

LDA Wert
LSR
CLC
ADC Wert
ROR
STA Wert75Prozent

so müsste es dann klappen

Dr. Irata

Janko und ich haben uns gerade kurz ausgetauscht über die Möglichkeit eines 50- bzw 75% igen Wertes einer Zahl in Assembler. In einem Spiel kann es ja vorkommen, daß ein bestimmter Wert zu 75% erreicht werden muss, damit es dann entsprechend z.B. in einen nächsten Level weitergehen kann. 50 % muss m...

Dr. Irata

hier mal ein preview von gemini für den Wettbewerb 2025... mal sehen, ob ich es noch fertig bekomme... Ziel des Spieles: Für jedes Level gibt es maximal 3 verschiedene Steinfarben oder Steinarten, von denen man ein bestimmte Menge entfernen muss. Dafür stehen einen pro Level eine begrenzte Anzahl an...

Dr. Irata

... die Anfrage war insofern ungeschickt, weil es auf etwas anderes abzielte. ich wollte nun doch noch den scheinbare einfache Ansatz zur Konvertierung einer 16-Bit-Zahl von dezimal in einzelne Ziffern machen. Dann muss von der Zahl jeweils x-mal 10000 / 1000 / 100 / 10 / 1 abgezogen werden, daraus ...

Dr. Irata

tatsächlich habe ich es jetzt so gelöst:

Code: Alles auswählen


loop1
				sec
				lda var
				sbc #$e8
				sta var
				lda var+1
				sbc #$03
				sbc #0
				sta var+1
				bmi weiter
				... Anweisung ...
				jmp loop1
weiter

Dr. Irata

Puh, entweder habe ich gerade einen Knoten im Hirn, oder es ist wirklich so kompliziert.
ich habe es zwar jetzt hinbekommen, aber bestimmt zu kompliziert und daher zu langsam.

Ich möchte eine Bedingung abfragen in folgender Form:

wenn wert a (16 Bit) ist größer 999, dann springe zu loop1

Dr. Irata

... jaja ... ich habe auch noch keinen "zerlegt" ... da würde es einem das Herz bluten

Dr. Irata

jaja ... das Thema mit den zunehmend seltenen Custom-Chips .... Ich mache das so: ich schaue immer mal wieder bei Ebay, ob es da was gibt. Ansonsten habe ich mir vorgenommen immer dann einen Atari zu kaufen, wenn der Preis unter 100 Euro ist. Bei unter 200 Euro schaue ich, ob es sich wirklich lohnt....

Dr. Irata

... wunderbar... ihr seid einfach großartig!!

Dann ist meine Routine gar nicht mehr nötig...

Dr. Irata

Ich hatte ja schon mal hier im Forum und dann im vorletzten Heft über die Score-Darstellung berichtet. Leider ist die Methode mit Nutzung des Dezimalmodus im Beispiel eher unvollständig. Das Problem dabei ist, daß man nur maximal den Wert 99 zum Score addieren kann und Subtraktion ist gar nicht impl...

Dr. Irata

Hallöle, ich würde mich als Grillmeister zur Verfügung stellen!

Dr. Irata

... wie gesagt, wir diskutieren hier über ein Bug im Code. Also ein vergessenes # was dazu führt, daß das Programm an dieser Stelle nicht mit dem Wert vergleicht, sondern mit der Speicheradresse. Wenn ich also aktuellen Akku-Inhalt mit cmp #1 vergleichen möchte und das # vergesse, dann bewirkt cmp 1...

Dr. Irata

ja... theoretisch könnte man folgendes coden: BODEN .byte 01 .... cmp BODEN In diesem Fall steht an der Speicherstelle BODEN der Wert 01 und mit cmp BODEN wird dann vom Akkumulator der Wert in Boden (also 1) abgezogen. Darauf folgt dann z.B. der branch Das geht schon, erscheint allerdings umständlic...

Dr. Irata

Das geht doch recht einfach... Vorraussetzung ist, daß Dein Programm rein garnix vom OS benutzt. Also auch VBI,DLIs usw. nicht. Dann einfach mit $FE in $D301 das OS abschalten und schon ist von $C000-$FFFF Ram. Vorher noch die IRQs die auf das OS evt. zeigen, deaktivieren... (Natürlich nicht bei de...

Dr. Irata

Hey Janko,
vielleicht magst du ja mal einen eigenen Artikel / Post übers RAM unter ROM mit Abschalten des OS und eigenen Routinen hier gut erklärt mit entsprechenden Routinen präsentieren... damit jeder es nutzen kann und weiß wie es funktioniert und worauf man da achten muss...
LG Peter

Dr. Irata

Mann muss ja auch das Rad nicht schlechter und neu erfinden, weil man so vielleicht einen möglichen Bug weniger hätte... einfach den # verwenden und schon gehts ja wie gewünscht

Dr. Irata

... Klassiker ...

Dr. Irata

erstaunlich, daß der Player echt in der Luft hängt und dort bleibt... also nicht runterfällt...

Dr. Irata

Hi janko, ich wusste ja schon, was kommt - dennoch... geiles Spiel! Freue mich schon auf die finale Version!!

Dr. Irata

... tatsächlich habe ich mich nach Anregung von Janko an diesem WE zum ersten Mal mit ChatGPT beschäftigt und mich direkt bei der deutschen Variante kostenfrei angemeldet. Hier bin ich etliche Dinge mit Mike (ich habe ihn Mike genannt) durchgegangen und war echt erstaunt, wie gut das funktioniert. M...

Dr. Irata

Danke Florian

Dr. Irata

... echt super ... ich hatte diese blöden "Ausreißer" schon wahrgenommen aber noch nicht so richtig in den Griff bekommen! Echt gut!!

Dr. Irata

du meinst aber sicherlich c = a + b/2 für a>b

Dr. Irata

die ist allerdings deutlich länger als c = a + b/2 , a>b

Dr. Irata

Nach langer Pause überlege ich das Projekt im Herbst - vielleicht zur Fujiama - zu reaktivieren. Einge wichtige Dinge habe ich ja schon umsetzen können, das Projekt bedarf aber einige Anpassungen und kann gerne auch eine längerfristige "Sache" werden... ich habe ja Zeit!! Ein wichtiger Bes...

Dr. Irata

Bei Jankos Ansatz müsste man ja nur die Tabellenwerte um den Wert 1 erhöhen. Die Taktzyklen bei Janko sind zwischen 31 und 47 - das sind im Mittel aller 4 Fälle 39,75 Taktzyklen. Der Ansatz von RhoSigma liegt bei 41,5 Taktzyklen - also im Mittel etwas langsamer. Ich werde hier bei Zeiten noch einen ...

Die Suche ergab 1236 Treffer