init:
	REP #$20
	LDA #$3200
	STA $4330
	LDA #.GreenTable
	STA $4332
	LDY.b #.GreenTable>>16
	STY $4334
	LDA #$3200
	STA $4340
	LDA #.RedTable
	STA $4342
	LDY.b #.RedTable>>16
	STY $4344
	SEP #$20
	LDA #$18
	TSB $0D9F
	RTL

.GreenTable:         ; 
   db $02 : db $5F   ; 
   db $07 : db $5E   ; 
   db $08 : db $5D   ; 
   db $07 : db $5C   ; 
   db $07 : db $5B   ; 
   db $07 : db $5A   ; 
   db $08 : db $59   ; 
   db $07 : db $58   ; 
   db $07 : db $57   ; 
   db $07 : db $56   ; 
   db $08 : db $55   ; 
   db $07 : db $54   ; 
   db $07 : db $53   ; 
   db $07 : db $52   ; 
   db $07 : db $51   ; 
   db $07 : db $50   ; 
   db $08 : db $4F   ; 
   db $07 : db $4E   ; 
   db $07 : db $4D   ; 
   db $07 : db $4C   ; 
   db $08 : db $4B   ; 
   db $07 : db $4A   ; 
   db $07 : db $49   ; 
   db $07 : db $48   ; 
   db $08 : db $47   ; 
   db $07 : db $46   ; 
   db $07 : db $45   ; 
   db $07 : db $44   ; 
   db $08 : db $43   ; 
   db $07 : db $42   ; 
   db $07 : db $41   ; 
   db $05 : db $40   ; 
   db $00            ; 

.RedTable:           ; 
   db $11 : db $32   ; 
   db $10 : db $33   ; 
   db $12 : db $34   ; 
   db $11 : db $35   ; 
   db $13 : db $36   ; 
   db $10 : db $37   ; 
   db $12 : db $38   ; 
   db $11 : db $39   ; 
   db $11 : db $3A   ; 
   db $12 : db $3B   ; 
   db $10 : db $3C   ; 
   db $12 : db $3D   ; 
   db $11 : db $3E   ; 
   db $00            ; 

back to listings