Brauche einen kleinen Crashkurs mit viel Unterstützung

the_dark_knight · 2. August 2016

Hallo liebe forum64 Gemeinde,

ich habe eine etwas ungewöhliche Bitte. Privat lief bei mir in den letzten Monaten etwas sehr schief. Möchte aber ungern hier offen darauf eingehen. Wer will schreibt mir eine PN.
Um das alles abzuarbeiten und loslassen zu können, will ich alle Pläne/Vorhaben aus den letzten Jahren umsetzen.

Eins davon ist auf dem C64 eine kleine Animation mit etwas Pieptönen in Assembler zu programmieren. Folgendes soll umgesetzt werden:

3 Luftballons (Sprites?) sollen von unten nach oben scrollen. Alle 3 leicht versetzt. Dazu kommt noch ein Text und nach Möglichkeiten ein kleiner Pfeil rechts unten der anzeigt dass noch etwas kommt.
Dann soll das Scrolling stoppen (wenn der 2 Luftballon oben fast raus ist). Das Bild bleibt stehen und die Pieptöne laufen weiter. Genial wäre es noch, wenn die Animation (?) nach 60 Sekunden wieder von vorn beginnen würde.
Ich habe auch 3 Bilder angehängt die den Ablauf verdeutlichen sollen.

Nur mein Problem: Ich kann (noch) kein Assembler. Im Studium habe ich zwar C, C++, JAVA, Perl, etc. gehabt, aber seit dem habe ich nichts damit gemacht.

Kann mir bitte jemand helfen? Ich bräuchte eine kurze aber detaillierte Anleitung wie ich wo was machen soll. Gerne auch fertige Codeschnipsel bzw. Code. (Dann kann ich mich einarbeiten und verstehen wo was gemacht wird, das zählt auch)
Diese Animation sitzt mir schon seit ca. 3 Jahren im Nacken. Ich muss es endlich umsetzen, das macht mich noch verrückt. Deswegen auch die Suche nach Unterstützung statt erstmal Assembler zu lernen.

Das Programm soll dann auch auf einem originalen C64 laufen. Und auf einem Emulator. Einen USB2IEC (MK-II) Adapter habe ich bereits. Programmieren kann ich aber auch gern am Emulator. Ist wohl deutlich angenehmer, richtig?

Hat jemand Lust und Zeit mir zu helfen? Gerne auch für Gegenleistungen.

Viele Grüße
the_dark_knight

Mac Bacon · 2. August 2016

Zitat von the_dark_knight

Ich bräuchte eine kurze aber detaillierte Anleitung wie ich wo was machen soll.

Crossdevelopment-Tool besorgen
beliebigen 6502-Assemblerkurs durcharbeiten
Ballon-Beispiel aus dem C64-Handbuch durcharbeiten (wegen Sprites)
Aufgabe lösen

Zitat von the_dark_knight

Gerne auch fertige Codeschnipsel bzw. Code.

Gibt es auf Codebase bzw. in den diversen Assemblerkursen.

Zitat von the_dark_knight

Deswegen auch die Suche nach Unterstützung statt erstmal Assembler zu lernen.

Die skizzierte Aufgabe ist von der Komplexität her ideal für C64-Assembleranfänger. Worum geht es Dir genau? Eine Lösung "abgeben zu können", auch wenn den Code jemand anderes schreibt? Oder willst Du wirklich soweit 6502-Assembler lernen, dass Du die Aufgabe selbständig lösen kannst?

the_dark_knight · 2. August 2016

"Crossdevelopment-Tool besorgen" -> ok, welches? Hab da leider keine Ahnung
"beliebigen 6502-Assemblerkurs durcharbeiten" -> eben hier fehlt grad die Kraft
"Ballon-Beispiel aus dem C64-Handbuch durcharbeiten (wegen Sprites)" -> Super Idee. Ich suche heute Abend gleich mal das Handbuch daheim!

"Die skizzierte Aufgabe ist von der Komplexität her ideal für C64-Assembleranfänger. Worum geht es Dir genau? Eine Lösung "abgeben zu können", auch wenn den Code jemand anderes schreibt? Oder willst Du wirklich soweit 6502-Assembler lernen, dass Du die Aufgabe selbständig lösen kannst?"

Naja, etwas dazwischen würde mich glücklich machen. Z.B. "so und so erstellst du den Sprite" , "so geht eine Animation" , ... und ich arbeite dann mit diesen Schnipseln und füge es zu einem Ganzen zusammen. Wichtig ist halt in erster Linie dass ich nachvollziehen kann was ich da mache. Aber primär geht es um "abgeben zu können". Aber einfach einen komplett fertigen Code, der schon alles macht, irgendwo reinkopieren will ich auch nicht. Es sollte was dazwischen sein. Alles sich selbst beizubringen geht momentan einfach nicht.

oobdoo · 2. August 2016

Schonmal http://www.retro-programming.de/ angeschaut?

the_dark_knight · 2. August 2016

Zitat von oobdoo

Schonmal http://www.retro-programming.de/ angeschaut?

ok, diese Seite ist ja der Hammer! Danke!

oobdoo · 2. August 2016

Und für ganz eilige Fragen einfach mal in die Shoutbox reinschauen.
Da gibts immer jemanden, der 6510 versteht.
Ich bin das aber nicht.

Vernunftmensch · 2. August 2016

Aber ich. Einfach mich anhauen, ich kann jede Art von Fragen beantworten. Schlimmstensfalls dauert es aber einen Tag, bis meine Informanten und Hintermänner mich richtig informiert haben.

X-X-X2 · 3. August 2016

Respekt Jede Frage?

Gesendet von meinem M2 mit Tapatalk

Vernunftmensch · 3. August 2016

[Externes Medium: https://www.youtube.com/watch?feature=player_detailpage&v=BKorP55Aqvg]

Ja, klar. Jede Frage. I am an expert.

oobdoo · 3. August 2016

Zitat von Vernunftmensch

Ich sehe schon: Ich muß an meinem Humor arbeiten.

Hexworx · 3. August 2016

Zitat

Ich sehe schon: Ich muß an meinem Humor arbeiten.

Mag' meistens wohl sein, aber das YT-Video war mal echt klasse . Etwas 'IT-Crowd'-Like (gleich mal wieder rauskram...).

BTT:

Zitat von the_dark_knight

Diese Animation sitzt mir schon seit ca. 3 Jahren im Nacken. Ich muss es endlich umsetzen, das macht mich noch verrückt.

Dann wird's aber Zeit...

Zitat von the_dark_knight

Ich bräuchte eine kurze aber detaillierte Anleitung wie ich wo was machen soll.

Hast du dir denn schon mal selbst Gedanken gemacht? Zerleg' das "Problem" doch erstmal in einzelne Teile. Der Tipp von 'Mac Bacon' mit dem Ballon-Beispiel sollte wohl allererste Maßnahme sein. Da kann man sicher gut drauf aufbauen/entsprechend abändern und den Rest anhängen. Wobei das natürlich BASIC ist. Je nach Qualitätsanspruch könnte aber auch das funktionieren. Oder man macht einen Assembler/BASIC-Mix draus.

Hier sind sicher viele in der Lage, dass 'Ding' zusammenzukloppen, oder die Einzelteile zu liefern. Fang' aber mal mit dem Ballon an.

Hier werden sie geholfen .

TheRyk · 3. August 2016

Ballonbeispiel gibt es z.B. auch hier in BASIC 2.0
https://www.c64-wiki.de/index.php/sprite#Beispiele_2

Das in Assembler umzusetzen, wenn man n Speicherbelegungsplan vor sich hat und n Taschenrechner mit DEZ/HEX auf hat, ist keine Alchemie
Hier Grafik-Chip https://www.c64-wiki.de/index.php/VIC

Hier Sound-Chip https://www.c64-wiki.de/index.php/SID

Alle Assembler-Pseudo-Opcode-Tokens mit Link: https://www.c64-wiki.de/index.php/Kategorie:Assembler-Befehl

Alle OpCodes http://www.oxyron.de/html/opcodes02.html

the_dark_knight · 7. August 2016

So, ich habe jetzt mal den Ballon Codeschnipsel im Handbuch durch. Habe auch schon etwas gespielt und erweitert. Ich habe jetzt 3 Luftballons die nach oben scrollen. Aber leider ist da noch ein Fehler im Code. Sobald der erste Ballon außerhalb des Bildschirm ist gibt es einen Fehler. Der Grund ist, dass die Y-Position einen negativen Wert bekommt. (seht selbst im Code). Ich weiß nicht wie ich sie versetzt starten / fliegen lassen kann. FOR...NEXT schleifen verschachteln? Dann scrollen die Ballons unterschiedlich schnell... :-/

Code mit negativer Y-Position:

Spoiler anzeigen

Code

1 REM UP, UP; AND AWAY! Tests
2 REM PRINT "CLR/HOME"
3 SYS 58692
4 V=53248 : REM VIC Startdadresse setzen
5 REM POKE V+32,0 : REM Bildschirmrand auf schwarz setzen
6 POKE V+33,0 : REM Bildschirmhintergrund auf schwarz setzen
10 POKE V+21,7 : REM Sprites 0+1+2 einschalten
11 POKE 2040,13 : REM Zeiger auf Sprite 0
12 POKE 2041,13 : REM Zeiger auf Sprite 1
13 POKE 2042,13 : REM Zeiger auf Sprite 2
14 POKE V+39,1 : REM Farbe Sprite 0 auf weiss setzen
15 POKE V+40,1 : REM Farbe Sprite 1 auf weiss setzen
16 POKE V+41,1 : REM Farbe Sprite 2 auf weiss setzen
17 POKE V+23,7 : POKE V+29,7 : REM Sprites 0+1+2 vergroessern
18 POKE V+0,90 : REM Sprite 0 X-Position
19 POKE V+2,130 : REM Sprite 1 X-Position
20 POKE V+4,230 : REM Sprite 2 X-Position
30 FOR N = 0 TO 62 : READ Q : POKE 832+N,Q : NEXT : REM Spritedaten einlesen
40 FOR Y = 200 TO 0 STEP -1
41 POKE V+1,Y-84
42 POKE V+3,Y
43 POKE V+5,Y-42
44 NEXT Y
45 GOTO 40
100 DATA 0,127,0,1,255,192,3,255,224,3,231,224
101 DATA 7,217,240,7,223,240,7,217,240,3,231,224
102 DATA 3,255,224,3,255,224,2,255,160,1,127,64
103 DATA 1,62,64,0,156,128,0,156,128,0,73,0,0,73,0
104 DATA 0,62,0,0,62,0,0,62,0,0,28,0

Alles anzeigen

Code mit verschachtelten FOR Schleifen:

Spoiler anzeigen

Code

1 REM UP, UP; AND AWAY! Tests
2 REM PRINT "CLR/HOME"
3 SYS 58692
4 V=53248 : REM VIC Startdadresse setzen
5 REM POKE V+32,0 : REM Bildschirmrand auf schwarz setzen
6 POKE V+33,0 : REM Bildschirmhintergrund auf schwarz setzen
10 POKE V+21,7 : REM Sprites 0+1+2 einschalten
11 POKE 2040,13 : REM Zeiger auf Sprite 0
12 POKE 2041,13 : REM Zeiger auf Sprite 1
13 POKE 2042,13 : REM Zeiger auf Sprite 2
14 POKE V+39,1 : REM Farbe Sprite 0 auf weiss setzen
15 POKE V+40,1 : REM Farbe Sprite 1 auf weiss setzen
16 POKE V+41,1 : REM Farbe Sprite 2 auf weiss setzen
17 POKE V+23,7 : POKE V+29,7 : REM Sprites 0+1+2 vergroessern
18 POKE V+0,90 : REM Sprite 0 X-Position
19 POKE V+2,130 : REM Sprite 1 X-Position
20 POKE V+4,230 : REM Sprite 2 X-Position
30 FOR N = 0 TO 62 : READ Q : POKE 832+N,Q : NEXT : REM Spritedaten einlesen
40 FOR A = 116 TO 0 STEP -1
41 POKE V+1,A
42 FOR B = 200 TO 0 STEP -1
43 POKE V+3,B
44 FOR C = 156 TO 0 STEP -1
45 POKE V+5,C
46 NEXT C
47 NEXT B
48 NEXT A
49 GOTO 40
100 DATA 0,127,0,1,255,192,3,255,224,3,231,224
101 DATA 7,217,240,7,223,240,7,217,240,3,231,224
102 DATA 3,255,224,3,255,224,2,255,160,1,127,64
103 DATA 1,62,64,0,156,128,0,156,128,0,73,0,0,73,0
104 DATA 0,62,0,0,62,0,0,62,0,0,28,0

Alles anzeigen

Hmm, ich komme nicht auf die Lösung. Kann mir bitte jemand einen Tip geben?

DANKE!

Mac Bacon · 7. August 2016

POKE erlaubt als Werte 0 bis 255 und beschwert sich daher über negative Zahlen. Du könntest entweder eine Sonderabfrage einbauen, die die negativen Werte überspringt (statt "POKE V+1,Y-84" also "IF Y>=84 THEN POKE V+1,Y-84") oder Du wandelst die negativen Werte zu positiven ("POKE V+1,(Y-84) AND 255"). Letzteres würde dafür sorgen, dass die Ballons irgendwann wieder unten auftauchen.

the_dark_knight · 7. August 2016

so ähnlich versuche ich es gerade mit einem Ballon:

Code

50 FOR A = 255 TO 0 STEP -1
51 POKE V+1,A : REM Sprite 0 Y-Position
52 REM IF A = 0 THEN LET A=255
53 NEXT A

So kommt der Ballon immer wieder unten hoch. Mal experimentieren....

Danke für Deine Antwort. Ich gebe mein bestes

the_dark_knight · 7. August 2016

TOP!!! DANKE DIR!

Mit

Code

40 FOR Y = 255 TO 0 STEP -1
41 POKE V+1,(Y-84) AND 255
42 POKE V+3,Y AND 255
43 POKE V+5,(Y-42) AND 255
44 NEXT Y
45 GOTO 40

läuft es super!

the_dark_knight · 7. August 2016

Super, jetzt habe ich meine Animation. Nächster Schritt ist dann es in ASM zu übertragen

Code:

Code

1 REM UP, UP; AND AWAY! Tests
2 REM PRINT "CLR/HOME"
3 SYS 58692
4 V=53248 : REM VIC Startdadresse setzen
5 POKE V+32,0 : REM Bildschirmrand auf schwarz setzen
6 POKE V+33,0 : REM Bildschirmhintergrund auf schwarz setzen
10 POKE V+21,127 : REM Sprites 0-6 einschalten
11 POKE 2040,255 : REM Zeiger auf Sprite 0
12 POKE 2041,255 : REM Zeiger auf Sprite 1
13 POKE 2042,255 : REM Zeiger auf Sprite 2
14 POKE 2043,254 : REM Zeiger auf Sprite 3
15 POKE 2044,253 : REM Zeiger auf Sprite 4
16 POKE 2045,252 : REM Zeiger auf Sprite 5
17 POKE 2046,251 : REM Zeiger auf Sprite 6
18 POKE V+39,1 : REM Farbe Sprite 0 auf weiss setzen
19 POKE V+40,1 : REM Farbe Sprite 1 auf weiss setzen
20 POKE V+41,1 : REM Farbe Sprite 2 auf weiss setzen
21 POKE V+42,1 : REM Farbe Sprite 3 auf weiss setzen
22 POKE V+43,1 : REM Farbe Sprite 4 auf weiss setzen
23 POKE V+44,1 : REM Farbe Sprite 5 auf weiss setzen
24 POKE V+45,1 : REM Farbe Sprite 6 auf weiss setzen
25 POKE V+23,127 : POKE V+29,127 : REM Sprites 0-6 vergroessern
26 POKE V+0,90 : REM Sprite 0 X-Position
27 POKE V+2,230 : REM Sprite 1 X-Position
28 POKE V+4,130 : REM Sprite 2 X-Position
29 POKE V+6,130 : REM Sprite 3 X-Position
30 POKE V+8,178 : REM Sprite 4 X-Position
31 POKE V+10,130 : REM Sprite 5 X-Position
32 POKE V+12,178 : REM Sprite 6 X-Position
40 FOR N = 0 TO 62 : READ Q : POKE 16320+N,Q : NEXT : REM Spritedaten einlesen
41 FOR N = 0 TO 62 : READ Q : POKE 16256+N,Q : NEXT : REM Spritedaten einlesen
42 FOR N = 0 TO 62 : READ Q : POKE 16192+N,Q : NEXT : REM Spritedaten einlesen
43 FOR N = 0 TO 62 : READ Q : POKE 16128+N,Q : NEXT : REM Spritedaten einlesen
44 FOR N = 0 TO 62 : READ Q : POKE 16064+N,Q : NEXT : REM Spritedaten einlesen
50 FOR Y = 255 TO 0 STEP -1
51 IF Y >= 115 THEN POKE V+1,Y-115
52 IF Y >= 63 THEN POKE V+3,Y-63
53 POKE V+5,Y
54 IF Y <= 185 THEN POKE V+7,Y+70
55 IF Y <= 185 THEN POKE V+9,Y+70
56 IF Y <= 141 THEN POKE V+11,Y+114
57 IF Y <= 141 THEN POKE V+13,Y+114
58 IF Y=70 THEN 60
59 NEXT Y
60 FOR A=0 TO 1 STEP 0
61 NEXT A
100 REM
101 DATA 0,127,0
102 DATA 1,255,192
103 DATA 3,255,224
104 DATA 3,231,224
105 DATA 7,217,240
106 DATA 7,223,240
107 DATA 7,217,240
108 DATA 3,231,224
109 DATA 3,255,224
110 DATA 3,255,224
111 DATA 2,255,160
112 DATA 1,127,64
113 DATA 1,62,64
114 DATA 0,156,128
115 DATA 0,156,128
116 DATA 0,73,0
117 DATA 0,73,0
118 DATA 0,62,0
119 DATA 0,62,0
120 DATA 0,62,0
121 DATA 0,28,0
123 REM
124 DATA 225,3,132
125 DATA 65,1,4
126 DATA 65,1,4
127 DATA 65,1,4
128 DATA 65,1,4
129 DATA 93,57,116
130 DATA 85,41,84
131 DATA 93,57,116
132 DATA 81,33,68
133 DATA 93,185,118
134 DATA 0,0,0
135 DATA 225,3,132
136 DATA 65,1,4
137 DATA 65,1,4
138 DATA 65,1,4
139 DATA 65,1,4
140 DATA 93,57,116
141 DATA 85,41,84
142 DATA 93,57,116
143 DATA 81,33,68
144 DATA 93,185,118
146 REM
147 DATA 14,16,21
148 DATA 4,16,21
149 DATA 4,16,21
150 DATA 4,16,21
151 DATA 4,16,21
152 DATA 229,211,149
153 DATA 165,82,149
154 DATA 229,211,128
155 DATA 133,18,21
156 DATA 229,219,149
157 DATA 0,0,0
158 DATA 14,16,21
159 DATA 4,16,21
160 DATA 4,16,21
161 DATA 4,16,21
162 DATA 4,16,21
163 DATA 229,211,149
164 DATA 165,82,149
165 DATA 229,211,128
166 DATA 133,18,21
167 DATA 229,219,149
169 REM
170 DATA 225,3,132
171 DATA 65,1,4
172 DATA 65,1,4
173 DATA 65,1,4
174 DATA 65,1,4
175 DATA 93,57,116
176 DATA 85,41,84
177 DATA 93,57,116
178 DATA 81,33,68
179 DATA 93,185,118
180 DATA 0,0,0
181 DATA 225,3,132
182 DATA 65,1,4
183 DATA 65,1,4
184 DATA 65,1,4
185 DATA 65,1,4
186 DATA 93,57,116
187 DATA 85,41,84
188 DATA 93,57,116
189 DATA 81,33,68
190 DATA 93,185,118
192 REM
193 DATA 14,16,21
194 DATA 4,16,21
195 DATA 4,16,21
196 DATA 4,16,21
197 DATA 4,16,21
198 DATA 229,211,149
199 DATA 165,82,149
200 DATA 229,211,128
201 DATA 133,18,21
202 DATA 229,219,149
203 DATA 0,0,0
204 DATA 14,16,21
205 DATA 4,16,21
206 DATA 4,16,21
207 DATA 4,16,21
208 DATA 4,16,21
209 DATA 229,211,149
210 DATA 165,82,149
211 DATA 229,211,128
212 DATA 133,18,21
213 DATA 229,219,149

Alles anzeigen

Gold Beaver · 7. August 2016

einen Großteil des Programms wirst du vermutlich fast 1:1 übersetzen können:

Aus "DATA" wird je nach verwendetem Assembler ".BYTE", "!BYTE" oder ähnliches.

Aus POKE <Adresse>,<Festwert> wird

LDA #<Festwert>
STA <Adresse>

Aus SYS 58692 wird einfach JSR 58692.

Konstantenzuweisungen wie V=53248 kannst du je nach Assemblersyntax direkt übernehmen, evtl. muss auch das "=" durch "EQU" o.ä. ersetzt werden. Sowas sollte aber alles in der Anleitung des verwendeten Assemblers stehen.

Damit hast du dann jedenfalls schon mal 2/3 des Programs umgewandelt, bleiben nur noch die FOR-Schleifen und IF-THEN-Abfragen

Squidward · 7. August 2016

my2cents:Wenn ich eines beim Sprung zu Assembler empfehlen kann, dann dies: Adressen nur noch hexadezimal schreiben!

Messerjocke · 7. August 2016

Als nächstes solltest Du Dich mit (Verzögerungs-)Schleifen in ASM beschäftigen, du wirst sie brauchen.
Auch Speicherbelegungsplan und VIC-Banking sollten bald interessant für Dich werden, spätestens wenn Du mehr Grafikdaten und Sprites benutzen willst wirst Du merken, dass die VIC-Bank0 ziemlich ungünstig ist.
Viel Erfolg noch und niemals aufgeben. Mein ASM-Tutor pflegte zu sagen: 'Die Lernkurve bei ASM ist steil'
PS: Die ganze Sprite-Daten-Poke-Orgie kann man elegant mit einem externen Editor umgehen und die Daten als Binärfile in den Code includen.