Изменение цвета текста без памяти цвета в C64/Сборка

Question

У меня есть код, как показано ниже, и он отлично работает. Он очищает экран, помещает в цветную память первые 12 символов на экране и печатает текст на экране.

  jsr $e544 
     ldx #$00 
     lda #3 
loopclr: sta $d800,x 
     inx 
     cpx #$0c 
     bne loopclr 
     ldx #$00 
     lda #0 
loop: lda message,x 
     sta $0400,x 
     inx 
     cpx #$0c 
     bne loop 
     rts 
message: .byte "Hello " 
     .byte "World!" 

Что интересно, это, если есть более простой способ изменить цвет текста в C64 Ассамблеи, как POKE 646,color в BASIC?

Edit: я думал, что мне нужно быть более ясным, я могу использовать

lda #color 
sta 646 

Но это не влияет на текст положить на экране ассемблере в 1024+.

Есть ли адрес, который влияет на все символы, помещенные на экран?

Редактировать: Я думаю, что знаю ответ, нет.

Answer 1

Теперь есть вопрос, который я никогда не думал, что меня попросят! sta $ 0286 (646 десятичный знак) устанавливает цвет фона, который будет использоваться при использовании стандартной процедуры печати ($ FFD2), которую я рекомендую для прямого доступа к видеопамяти, поскольку он учитывает положение курсора. Итак:

 lda #$00  ; Black letters 
     sta $0286 ; Set color 
     ldx #$00 
msgloop: 
     lda message,x 
     beq msgdone ; Zero byte sets z flag - end of string - shorter than checking x value 
     jsr $ffd2 ; print a to current device at current position (default: screen) 
     inx 
     bne msgloop ; pretty much always unless you have a string > 255 
msgdone: 
     rts 

message: .byte "Hello " 
     .byte "World!" 
     .byte 0 

Ну, там идет мой авторитет как современный ассемблер парень! ;-)