... mit copy / paste und finden / ersetzen war das jetzt recht schnell erledigt und ich habe insgesamt 128 Charakter neu definiert in 16 Farben.
Zur besseren Übersicht habe ich das jetzt tatsächlich von binär in hexa umgeschrieben!
Code: Alles auswählen
ch = $2f4 ;High byte character set pointer
savmsc = $58
gprior = $26f
color4 = $2c8
org $2000
chr .byte 0,0,0,0,0,0,0,0
.byte $f0,$f0,$ff,$ff,$ff,$ff,$f0,$f0
.byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff
.byte $0f,$0f,$ff,$ff,$ff,$ff,$0f,$0f
.byte $f0,$f0,$f0,$f0,$f0,$f0,$f0,$f0
.byte $0f,$0f,$0f,$0f,$0f,$0f,$0f,$0f
.byte $0,$0,$0,$0,$ff,$ff,$ff,$ff
.byte $ff,$ff,$ff,$ff,0,0,0,0
.byte $f0,$f0,$f0,$f0,$ff,$ff,$ff,$ff
.byte $ff,$ff,$ff,$ff,$f0,$f0,$f0,$f0
.byte $0f,$0f,$0f,$0f,$ff,$ff,$ff,$ff
.byte $ff,$ff,$ff,$ff,$0f,$0f,$0f,$0f
.byte $b0,$b0,$bb,$bb,$bb,$bb,$b0,$b0
.byte $bb,$bb,$bb,$bb,$bb,$bb,$bb,$bb
.byte $0b,$0b,$bb,$bb,$bb,$bb,$0b,$0b
.byte $b0,$b0,$b0,$b0,$b0,$b0,$b0,$b0
.byte $0b,$0b,$0b,$0b,$0b,$0b,$0b,$0b
.byte $0,$0,$0,$0,$bb,$bb,$bb,$bb
.byte $bb,$bb,$bb,$bb,0,0,0,0
.byte $b0,$b0,$b0,$b0,$bb,$bb,$bb,$bb
.byte $bb,$bb,$bb,$bb,$b0,$b0,$b0,$b0
.byte $0b,$0b,$0b,$0b,$bb,$bb,$bb,$bb
.byte $bb,$bb,$bb,$bb,$0b,$0b,$0b,$0b
.byte $e0,$e0,$ee,$ee,$ee,$ee,$e0,$e0
.byte $ee,$ee,$ee,$ee,$ee,$ee,$ee,$ee
.byte $0e,$0e,$ee,$ee,$ee,$ee,$0e,$0e
.byte $e0,$e0,$e0,$e0,$e0,$e0,$e0,$e0
.byte $0e,$0e,$0e,$0e,$0e,$0e,$0e,$0e
.byte $0,$0,$0,$0,$ee,$ee,$ee,$ee
.byte $ee,$ee,$ee,$ee,0,0,0,0
.byte $e0,$e0,$e0,$e0,$ee,$ee,$ee,$ee
.byte $ee,$ee,$ee,$ee,$e0,$e0,$e0,$e0
.byte $0e,$0e,$0e,$0e,$ee,$ee,$ee,$ee
.byte $ee,$ee,$ee,$ee,$0e,$0e,$0e,$0e
.byte $d0,$d0,$dd,$dd,$dd,$dd,$d0,$d0
.byte $dd,$dd,$dd,$dd,$dd,$dd,$dd,$dd
.byte $0d,$0d,$dd,$dd,$dd,$dd,$0d,$0d
.byte $d0,$d0,$d0,$d0,$d0,$d0,$d0,$d0
.byte $0d,$0d,$0d,$0d,$0d,$0d,$0d,$0d
.byte $0,$0,$0,$0,$dd,$dd,$dd,$dd
.byte $dd,$dd,$dd,$dd,0,0,0,0
.byte $d0,$d0,$d0,$d0,$dd,$dd,$dd,$dd
.byte $dd,$dd,$dd,$dd,$d0,$d0,$d0,$d0
.byte $0d,$0d,$0d,$0d,$dd,$dd,$dd,$dd
.byte $dd,$dd,$dd,$dd,$0d,$0d,$0d,$0d
.byte $c0,$c0,$cc,$cc,$cc,$cc,$c0,$c0
.byte $cc,$cc,$cc,$cc,$cc,$cc,$cc,$cc
.byte $0c,$0c,$cc,$cc,$cc,$cc,$0c,$0c
.byte $c0,$c0,$c0,$c0,$c0,$c0,$c0,$c0
.byte $0c,$0c,$0c,$0c,$0c,$0c,$0c,$0c
.byte $0,$0,$0,$0,$cc,$cc,$cc,$cc
.byte $cc,$cc,$cc,$cc,0,0,0,0
.byte $c0,$c0,$c0,$c0,$cc,$cc,$cc,$cc
.byte $cc,$cc,$cc,$cc,$c0,$c0,$c0,$c0
.byte $0c,$0c,$0c,$0c,$cc,$cc,$cc,$cc
.byte $cc,$cc,$cc,$cc,$0c,$0c,$0c,$0c
.byte $a0,$a0,$aa,$aa,$aa,$aa,$a0,$a0
.byte $aa,$aa,$aa,$aa,$aa,$aa,$aa,$aa
.byte $0a,$0a,$aa,$aa,$aa,$aa,$0a,$0a
.byte $a0,$a0,$a0,$a0,$a0,$a0,$a0,$a0
.byte $0a,$0a,$0a,$0a,$0a,$0a,$0a,$0a
.byte $0,$0,$0,$0,$aa,$aa,$aa,$aa
.byte $aa,$aa,$aa,$aa,0,0,0,0
.byte $a0,$a0,$a0,$a0,$aa,$aa,$aa,$aa
.byte $aa,$aa,$aa,$aa,$a0,$a0,$a0,$a0
.byte $0a,$0a,$0a,$0a,$aa,$aa,$aa,$aa
.byte $aa,$aa,$aa,$aa,$0a,$0a,$0a,$0a
.byte $90,$90,$99,$99,$99,$99,$90,$90
.byte $99,$99,$99,$99,$99,$99,$99,$99
.byte $09,$09,$99,$99,$99,$99,$09,$09
.byte $90,$90,$90,$90,$90,$90,$90,$90
.byte $09,$09,$09,$09,$09,$09,$09,$09
.byte $0,$0,$0,$0,$99,$99,$99,$99
.byte $99,$99,$99,$99,0,0,0,0
.byte $90,$90,$90,$90,$99,$99,$99,$99
.byte $99,$99,$99,$99,$90,$90,$90,$90
.byte $09,$09,$09,$09,$99,$99,$99,$99
.byte $99,$99,$99,$99,$09,$09,$09,$09
.byte $80,$80,$88,$88,$88,$88,$80,$80
.byte $88,$88,$88,$88,$88,$88,$88,$88
.byte $08,$08,$88,$88,$88,$88,$08,$08
.byte $80,$80,$80,$80,$80,$80,$80,$80
.byte $08,$08,$08,$08,$08,$08,$08,$08
.byte $0,$0,$0,$0,$88,$88,$88,$88
.byte $88,$88,$88,$88,0,0,0,0
.byte $80,$80,$80,$80,$88,$88,$88,$88
.byte $88,$88,$88,$88,$80,$80,$80,$80
.byte $08,$08,$08,$08,$88,$88,$88,$88
.byte $88,$88,$88,$88,$08,$08,$08,$08
.byte $70,$70,$77,$77,$77,$77,$70,$70
.byte $77,$77,$77,$77,$77,$77,$77,$77
.byte $07,$07,$77,$77,$77,$77,$07,$07
.byte $70,$70,$70,$70,$70,$70,$70,$70
.byte $07,$07,$07,$07,$07,$07,$07,$07
.byte $0,$0,$0,$0,$77,$77,$77,$77
.byte $77,$77,$77,$77,0,0,0,0
.byte $70,$70,$70,$70,$77,$77,$77,$77
.byte $77,$77,$77,$77,$70,$70,$70,$70
.byte $07,$07,$07,$07,$77,$77,$77,$77
.byte $77,$77,$77,$77,$07,$07,$07,$07
.byte $60,$60,$66,$66,$66,$66,$60,$60
.byte $66,$66,$66,$66,$66,$66,$66,$66
.byte $06,$06,$66,$66,$66,$66,$06,$06
.byte $60,$60,$60,$60,$60,$60,$60,$60
.byte $06,$06,$06,$06,$06,$06,$06,$06
.byte $0,$0,$0,$0,$66,$66,$66,$66
.byte $66,$66,$66,$66,0,0,0,0
.byte $60,$60,$60,$60,$66,$66,$66,$66
.byte $66,$66,$66,$66,$60,$60,$60,$60
.byte $06,$06,$06,$06,$66,$66,$66,$66
.byte $66,$66,$66,$66,$06,$06,$06,$06
.byte $50,$50,$55,$55,$55,$55,$50,$50
.byte $55,$55,$55,$55,$55,$55,$55,$55
.byte $05,$05,$55,$55,$55,$55,$05,$05
.byte $50,$50,$50,$50,$50,$50,$50,$50
.byte $05,$05,$05,$05,$05,$05,$05,$05
.byte $0,$0,$0,$0,$55,$55,$55,$55
.byte $55,$55,$55,$55,0,0,0,0
.byte $50,$50,$50,$50,$55,$55,$55,$55
.byte $55,$55,$55,$55,$50,$50,$50,$50
.byte $05,$05,$05,$05,$55,$55,$55,$55
.byte $55,$55,$55,$55,$05,$05,$05,$05
.byte $40,$40,$44,$44,$44,$44,$40,$40
.byte $44,$44,$44,$44,$44,$44,$44,$44
.byte $04,$04,$44,$44,$44,$44,$04,$04
.byte $40,$40,$40,$40,$40,$40,$40,$40
.byte $04,$04,$04,$04,$04,$04,$04,$04
.byte $0,$0,$0,$0,$44,$44,$44,$44
.byte $44,$44,$44,$44,0,0,0,0
.byte $40,$40,$40,$40,$44,$44,$44,$44
.byte $44,$44,$44,$44,$40,$40,$40,$40
.byte $04,$04,$04,$04,$44,$44,$44,$44
.byte $44,$44,$44,$44,$04,$04,$04,$04
.byte $30,$30,$33,$33,$33,$33,$30,$30
.byte $33,$33,$33,$33,$33,$33,$33,$33
.byte $03,$03,$33,$33,$33,$33,$03,$03
.byte $30,$30,$30,$30,$30,$30,$30,$30
.byte $03,$03,$03,$03,$03,$03,$03,$03
.byte $0,$0,$0,$0,$33,$33,$33,$33
.byte $33,$33,$33,$33,0,0,0,0
.byte $30,$30,$30,$30,$33,$33,$33,$33
.byte $33,$33,$33,$33,$30,$30,$30,$30
.byte $03,$03,$03,$03,$33,$33,$33,$33
.byte $33,$33,$33,$33,$03,$03,$03,$03
.byte $20,$20,$22,$22,$22,$22,$20,$20
.byte $22,$22,$22,$22,$22,$22,$22,$22
.byte $02,$02,$22,$22,$22,$22,$02,$02
.byte $20,$20,$20,$20,$20,$20,$20,$20
.byte $02,$02,$02,$02,$02,$02,$02,$02
.byte $0,$0,$0,$0,$22,$22,$22,$22
.byte $22,$22,$22,$22,0,0,0,0
.byte $20,$20,$20,$20,$22,$22,$22,$22
.byte $22,$22,$22,$22,$20,$20,$20,$20
.byte $02,$02,$02,$02,$22,$22,$22,$22
.byte $22,$22,$22,$22,$02,$02,$02,$02
.byte $10,$10,$11,$11,$11,$11,$10,$10
.byte $11,$11,$11,$11,$11,$11,$11,$11
.byte $01,$01,$11,$11,$11,$11,$01,$01
.byte $10,$10,$10,$10,$10,$10,$10,$10
.byte $01,$01,$01,$01,$01,$01,$01,$01
.byte $0,$0,$0,$0,$11,$11,$11,$11
.byte $11,$11,$11,$11,0,0,0,0
.byte $10,$10,$10,$10,$11,$11,$11,$11
.byte $11,$11,$11,$11,$10,$10,$10,$10
.byte $01,$01,$01,$01,$11,$11,$11,$11
.byte $11,$11,$11,$11,$01,$01,$01,$01
.proc main
lda #>chr ;HighByte Character Pointer auf $2000 setzen
sta ch
ldy #127
loop tya ;Die Charakter printen
sta (savmsc),y
dey
bpl loop
lda #192 ;GTIA Modus 3 (16 Farben) initialisieren
sta gprior
lda #8 ;Hintergrundfarbe / Helligkeit festlegen
sta color4
jmp *
.endp
run main
Damit baue ich jetzt die Landschaft.... falls die Charakter nicht reichen definiere ich mir einfach noch ein paar weitere