REP #$20
LDA #$3200
STA $4330
LDA #RedColour
STA $4332
PHK
PLY
STY $4334
LDA #$3200
STA $4340
LDA #GreenColour
STA $4342
PHK
PLY
STY $4344
LDA #$3200
STA $4350
LDA #BlueColour
STA $4352
PHK
PLY
STY $4354
SEP #$20
LDA #$38
TSB $0D9F
RTS

RedColour:
db $07,$30
db $07,$2F
db $07,$2E
db $07,$2D
db $07,$2C
db $07,$2B
db $07,$2A
db $07,$29
db $07,$28
db $07,$27
db $07,$26
db $07,$25
db $07,$24
db $07,$23
db $07,$22
db $07,$21
db $07,$20
db $00

GreenColour:
db $07,$50
db $07,$4F
db $07,$4E
db $07,$4D
db $07,$4C
db $07,$4B
db $07,$4A
db $07,$49
db $07,$48
db $07,$47
db $07,$46
db $07,$45
db $07,$44
db $07,$43
db $07,$42
db $07,$41
db $07,$40
db $00

BlueColour:
db $07,$9F
db $07,$9E
db $07,$9D
db $07,$9C
db $07,$9B
db $07,$9A
db $07,$99
db $07,$98
db $07,$97
db $07,$96
db $07,$95
db $07,$94
db $07,$93
db $07,$92
db $07,$91
db $07,$90
db $07,$8F
db $07,$8E
db $07,$8D
db $07,$8C
db $07,$8B
db $07,$8A
db $07,$89
db $07,$88
db $07,$87
db $07,$86
db $07,$85
db $00