Further experimenation

tic_tac.asm

@@ -46,12 +46,35 @@ rep #%00010000
 sep #%00100000
 
 
-ldx #$0000
-- lda UntitledPalette.l, x
-sta $2122  ; $2122 - data for CG RAM write
-inx
-cpx #8
-bne -
+
+; Load palette by writing to $2122
+; .db $00, $00, $E0, $7F, $1F, $00, $FF, $03
+
+
+lda #$00
+sta $2122
+lda #$00
+sta $2122
+lda #$e0
+sta $2122
+lda #$7f
+sta $2122
+lda #$1f
+sta $2122
+lda #$00
+sta $2122
+lda #$ff
+sta $2122
+lda #$0a
+sta $2122
+
+
+;ldx #$0000
+;- lda UntitledPalette.l, x
+;sta $2122  ; $2122 - data for CG RAM write
+;inx
+;cpx #8
+;bne -
 
 lda #33
 sta $2121  ; address for CG RAM write
@@ -180,24 +203,62 @@ sta $2100
 lda #%10000001  ; enable NMI and joypads
 sta $4200
 
-lda #%00011111
-sta $2100
-
 mainloop:
     Spin_Loop
+
+    stz $2121
+
+    lda #$00
+    sta $2122
+    lda #$00
+    sta $2122
+    lda #$e0
+    sta $2122
+    lda #$7f
+    sta $2122
+    lda #$1f
+    sta $2122
+    lda #$00
+    sta $2122
+    lda #$ff
+    sta $2122
+    lda #$0a
+    sta $2122
+
+    ;change brightness
     ;lda #%00000011
     ;sta $2100
 
-    lda #%00110000
-    sta $2105
+    ;lda #%00110000
+    ;sta $2105
 
     Spin_Loop
 
+    lda #0
+    sta $2121
+
+    lda #$09
+    sta $2122
+    lda #$00
+    sta $2122
+    lda #$e0
+    sta $2122
+    lda #$7f
+    sta $2122
+    lda #$1f
+    sta $2122
+    lda #$00
+    sta $2122
+    lda #$ff
+    sta $2122
+    lda #$7f
+    sta $2122
+
     ;lda #$0f
     ;sta $2100
 
-    lda #%00000000
-    sta $2105
+    ;lda #%00000000
+    ;sta $2105
 
     jmp mainloop