Hi Roland;),
ewig nix mehr von Dir gehört, werd Deine Ratschläge beherzigen !
![]()
Spindizzy
Es gibt 24 Antworten in diesem Thema, welches 10.418 mal aufgerufen wurde. Der letzte Beitrag (
Hi Roland;),
ewig nix mehr von Dir gehört, werd Deine Ratschläge beherzigen !
![]()
Spindizzy
Hi ;),
ZitatAber trotzdem, wenn man die kopierroutinen (rauf/runter) nicht sauber hat, dann "lösst" sich die tabelle irgendwann auf
...aber was ist denn an den rauf/ runter Routinen nicht sauber ![]()
Gruss![]()
Spindizzy
ZitatOriginal von spindizzy
Hi ;),
...aber was ist denn an den rauf/ runter Routinen nicht sauber
Gruss
Spindizzy
wie sauhund schon sagte...
die zeile 166 muss ein ldyBitte melde dich an, um diesen Link zu sehen. (anstelle von ldyBitte melde dich an, um diesen Link zu sehen.) sein UND:
du darfst in zeile 120 nicht mit bne (also y=0) aufhören, sondern bei y=FF.
also entweder mit cpy Bitte melde dich an, um diesen Link zu sehen. bne loop5, oder aber mit bpl loop5 (ohne den cpy)
hier nochmal zu meinem vorschlag mit den 2 tabellen (eine wo dir farben alle abgelegt sind, und die andere für den bereich der auf dem bildschirm angezeigt wird)
dazu ein kleiner codeausschnitt aus dem angehängten beispielprogramm (startbar mit sys 4096)
farben liegen auf $1400-$1700, wobei der bereich von $1400-1480 sich am ende der tabelle ab $1700 nochmal wiederholt, wegen dem überlauf bei kopieren am ende der tabelle.
darstellungsbereich ist $1200-$1280
sinustabelle von $0f00-$1000
;--------- zuerst 128 zeilen farben in den darstellungsbereich kopieren
.C:1066 A2 00 LDX #$00
.C:1068 BD 00 14 LDA $1400,X
.C:106b 9D 00 12 STA $1200,X
.C:106e E8 INX
.C:106f 10 F7 BPL $1068
;---------------------- kopieren ende, nun noch den zähler für den anfang erhöhen
.C:1071 EE 69 10 INC $1069
.C:1074 D0 0D BNE $1083
.C:1076 AE 6A 10 LDX $106A
.C:1079 E8 INX
.C:107a E0 17 CPX #$17
.C:107c D0 02 BNE $1080
.C:107e A2 14 LDX #$14
.C:1080 8E 6A 10 STX $106A
;----------------------- und jetzt ein paar beweglich bars drüberkopieren
.C:1083 A9 00 LDA #$00
.C:1085 8D 8B 10 STA $108B
.C:1088 A2 05 LDX #$05 ; ANZAHL DER BARS
.C:108a AD EC 0F LDA $0F00 ; SINUSWERT FÜR DEN BAR AUSLESEN
.C:108d 8D 96 10 STA $1096
.C:1090 A0 0E LDY #$0E; HÖHE DER BARS
.C:1092 B9 F0 10 LDA $10F0,Y ; FARBEN FÜR DIE BARS
.C:1095 99 11 12 STA $1200,Y
.C:1098 88 DEY
.C:1099 10 F7 BPL $1092
.C:109b AD 8B 10 LDA $108B
.C:109e 18 CLC
.C:109f 69 0C ADC #$0C ; SINUSABSTAND ZWISCHEN DEN BARS
.C:10a1 8D 8B 10 STA $108B
.C:10a4 CA DEX
.C:10a5 D0 E3 BNE $108A
.C:10a7 AD 84 10 LDA $1084
.C:10aa 18 CLC
.C:10ab 69 03 ADC #$03 ; GESCHWINDIGKEIT DER BARS
.C:10ad 8D 84 10 STA $1084
Alles anzeigen
>Roland
danke das UND wars ![]()
jetzt funktioniert's
![]()
![]()
Spindizzy