第23回
☆パレットの設定ルーチンのサブルーチン化
『JSR命令とRTS命令』
*JSR命令は、サブルーチンの呼び出しで
  RTS命令は、サブルーチンからの復帰する命令です。
『サブルーチン化の実例』

  ldx #%00001000
  sta $2000
  ldx #%00000000
  sta $2001
  jsr VB0

  lda #$3f
  sta $2006
  lda #$00
  sta $2006
pal_loop:
  lda pall,x
  sta $2007
  inx
  cpx #32
  bne pal_loop
loop000:
  jmp loop000

⁂上のコード赤色の部分を切り取り,無限ループの下にコピーします、

 サブルーチンの名前をつけラベルをはります。

 

 

  ldx #%00001000
  sta $2000
  ldx #%00000000
  sta $2001
  jsr VB0

  jsr palette

loop000:
  jmp loop000

;*************************************

palette:
      lda #$3f
      sta $2006
      lda #$00
      sta $2006
pal_loop:
     lda pall,x
     sta $2007
     inx
     cpx #32
     bne pal_loop
     rts