; Raster-Split-Hires - True 224 * 283 pixels with 36 $900f splits and 9 $900e splits
; only for PAL-VIC 20
; SYS 9774

*=$2030

charram=$9005
;charram=$900f

stackpointersave
.	byte	$00
onoffswitch
.	byte	$00

colorram1
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00

colorram2
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00

bottomgraphic1
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00

bottomgraphic2
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00

bottomgraphic3
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00

bottomgraphic4
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
.	byte	$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00

grontab
.	byte	$06,$0e,$1c,$48


; stop IRQ and switch to graphics mode (create video-RAM charmap)
gron	sei
	lda	#$7f
	sta	$911e	; disable NMIs (Restore key)
	sta	onoffswitch
	ldx	#$00
loopbt	lda	$00,x
	tay
	lda	bottomgraphic1,x
	sta	$00,x
	tya
	sta	bottomgraphic1,x
	lda	$0100,x
	tay
	lda	bottomgraphic2,x
	sta	$0100,x
	tya
	sta	bottomgraphic2,x
	lda	$0200,x
	tay
	lda	bottomgraphic3,x
	sta	$0200,x
	tya
	sta	bottomgraphic3,x
	lda	$0300,x
	tay
	lda	bottomgraphic4,x
	sta	$0300,x
	tya
	sta	bottomgraphic4,x
	lda	onoffswitch
	bne	onjmp
	jmp	offjmp
onjmp
colcopy	lda	colorram1,x
	sta	$9400,x
	lsr
	lsr
	lsr
	lsr
	sta	$95f8,x
	cpx	#$f8
	bcs	col2skip
	lda	colorram2,x
	sta	$9500,x
	lsr
	lsr
	lsr
	lsr
	sta	$96f8,x
col2skip	inx
	bne	loopbt

	clc
charmap	txa
	adc	#$40
	sta	$1348,x	; Line 31 (64-91)
	adc	#$1c
	sta	$1380,x	; Line 33 (92-119)
	adc	#$0c
	sta	$1118,x	; Line 11 (104-131)
	adc	#$0c
	sta	$1230,x	; Line 21 (116-143)
	adc	#$04
	sta	$1038,x	; Line 3 (120-147)
	sta	$13b8,x	; Line 35 (120-147)
	adc	#$0c
	sta	$1150,x	; Line 13 (132-159)
	adc	#$0c
	sta	$1268,x	; Line 23 (144-171)
	adc	#$04
	sta	$1070,x	; Line 5 (148-175)
	adc	#$0c
	sta	$1188,x	; Line 15 (160-187)
	adc	#$0c
	sta	$12a0,x	; Line 25 (172-199)
	adc	#$04
	sta	$10a8,x	; Line 7 (176-203)
	adc	#$0c
	sta	$11c0,x	; Line 17 (188-215)
	adc	#$0c
	sta	$12d8,x	; Line 27 (200-227)
	adc	#$04
	sta	$10e0,x	; Line 9 (204-231)
	adc	#$0c
	sta	$11f8,x	; Line 19 (216-243)
	adc	#$0c
	sta	$1310,x	; Line 29 (228-255)
	inx
	cpx	#$1c
	bne	charmap

	ldy	#$00
	ldx	#$23
	clc
charmap2	txa
	sta 	$1000,y	; Line 1 (35-8)
	sta 	$1054,y	; Line 4 (35-8)
	sta 	$10c4,y	; Line 8 (35-8)
	sta 	$1134,y	; Line 12 (35-8)
	sta 	$11a4,y	; Line 16 (35-8)
	sta 	$1214,y	; Line 20 (35-8)
	sta 	$1284,y	; Line 24 (35-8)
	sta 	$12f4,y	; Line 28 (35-8)
	sta	$1364,y	; Line 32 (35-8)
	sta	$13d4,y	; Line 36 (35-8)
	adc	#$1c	
	sta	$101c,y	; Line 2 (63-36)
	sta	$108c,y	; Line 6 (63-36)
	sta	$10fc,y	; Line 10 (63-36)
	sta	$116c,y	; Line 14 (63-36)
	sta	$11dc,y	; Line 18 (63-36)
	sta	$124c,y	; Line 22 (63-36)
	sta	$12bc,y	; Line 26 (63-36)
	sta	$132c,y	; Line 30 (63-36)
	sta	$139c,y	; Line 34 (63-36)
	dex
	iny
	cpy	#$1c
	bne	charmap2

	tsx
	stx	stackpointersave	; save stackpointer

	ldx 	#$ff
	txs

show	inx
	lda	grontab,x
	sta	$9000,x
	cpx	#$03
	bne	show

;synchronize with the screen
	ldx	#$9b	; make sure next command really STARTS at line #$0b and not SOMEWHERE in it
raster0	cpx	$9004
	bne	raster0
	ldx	#$00	; wait for this raster line (times 2)
raster1	cpx	$9004
	bne	raster1	; 3 cycles - at this stage, the inaccuracy is 7 clock cycles
			;            the processor is in this place 2 to 9 cycles
			;            after $9004 has changed
	ldy	#9	; 2 cycles
	bit	$24	; 3 cycles
raster2
	ldx	$9004	; 4 cycles	
	txa		; 2 cycles
	bit	$24	; 3 cycles
	ldx	#24	; 2 cycles
minus11	dex		; 2 cycles * 24 = 48 cycles
	bne	minus11	; 3 cycles * 24 - 1 = 71 cycles - first spend some time (so that the whole
	cmp	$9004	; 4 cycles                        loop will be 2 raster lines)
	bcs	plus21	; 3 cycles (-1 on when carry clear) save one cycle if $9004 changed too late
plus21	dey		; 2 cycles
	bne	raster2	; 3 cycles (2 beim letzten)
			; now it is fully synchronized
			; 6 cycles have passed since last $9004 change
			; and we are on line 2*(28+9)=74

	ldx 	#$0d
wait1	dex
	bne	wait1
	ldx	#$c8	; preset for charram

keyoff	nop
	lda	#$ef
	sta	$9120
	lda	$9121
	cmp	#$fe
	bne	grcont

groff	ldx	stackpointersave
	txs
	ldx	#$00
	stx	onoffswitch
looprsbt	jmp	loopbt
offjmp	inx
	bne	looprsbt
	lda	#$f7
	sta	$9120
	lda	#$82
	sta	$911e	; enable NMIs (Restore key)
	jsr	$e518	; Initialize Video-Controller
	cli
	lda	#$00	
	sta	$c6	; clear keyboard buffer
	rts

grcont	ldy	#$cc	; preset for charram
	
upd02	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

upd04	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha	
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	lda	#$1b
	sta	$900f	; set for l02

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6
	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4
	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2
	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE
	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC
	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9
	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6
	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3

	sty	charram	; set for l03

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46
	lda	#$00
	sta	$45
	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42
	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

upd06	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l04

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	sty	charram	; set for l05

	lda	#$20
	sta	$900e
	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	
upd08	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l06

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6
	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4
	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2
	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE
	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC
	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9
	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6

	sty	charram	; set for l07

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3
	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46
	lda	#$00
	sta	$45
	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42
	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

upd10	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l08

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	sty	charram	; set for l09

	lda	#$20
	sta	$900e
	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

upd12	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l10

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6
	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4
	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2
	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE
	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC
	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9

	iny
	sty	charram	; set for l11

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6
	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3
	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46
	lda	#$00
	sta	$45
	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42
	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

upd14	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l12

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	sty	charram	; set for l13

	lda	#$20
	sta	$900e
	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

upd16	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l14

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6
	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4
	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2
	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE
	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC

	sty	charram	; set for l15

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9
	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6
	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3
	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46
	lda	#$00
	sta	$45
	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42
	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

upd18	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l16

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	sty	charram	; set for l17

	lda	#$20
	sta	$900e
	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

upd20	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l18

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6
	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4
	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2
	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE

	sty	charram	; set for l19

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC
	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9
	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6
	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3
	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46
	lda	#$00
	sta	$45
	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42
	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

	iny

upd22	lda	#$00
	pha

	stx	charram	; set for l20

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	sty	charram	; set for l21

	lda	#$20
	sta	$900e
	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l22

	lda	#$1b
	sta	$900f

	lda	#$00
	pha

upd24	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6
	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4
	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2

	sty	charram	; set for l23

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE
	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC
	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9
	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6
	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3
	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46
	lda	#$00
	sta	$45
	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42

	stx	charram	; set for l24

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

upd26	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	sty	charram	; set for l25

	lda	#$20
	sta	$900e
	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l26

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

upd28	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6
	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4

	sty	charram	; set for l27

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2
	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE
	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC
	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9
	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6
	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3
	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46
	lda	#$00
	sta	$45

	stx	charram	; set for l28

	lda	#$1b
	sta	$900f

	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42
	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

upd30	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	sty	charram	; set for l29

	lda	#$20
	sta	$900e
	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	stx	charram	; set for l30

	lda	#$1b
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

upd32	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6

	lda	#$1b	; set for l31
	sta	$900f

	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4
	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2
	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE
	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC
	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9
	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6
	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3
	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46

	lda	#$1b	; set for l32
	sta	$900f

	lda	#$00
	sta	$45
	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42
	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

upd34	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	lda	#$20
	sta	$900e
	lda	#$1b	; set for l33
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

	lda	#$1b	; set for l34
	sta	$900f

	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha

charmap3	ldy	#$00
	sty	$13c0
	iny
	sty	$13c1
	iny
	sty	$13c2
	iny
	sty	$13c3
	iny
	sty	$13c4
	iny
	sty	$13c5
	iny
	sty	$13c6
	iny
	sty	$13c7
	iny
	sty	$13c8
	iny
	sty	$13c9
	iny
	sty	$13ca
	iny
	sty	$13cb
	iny
	sty	$13cc
	iny
	sty	$13cd
	iny
	sty	$13ce
	iny
	sty	$13cf
	iny
	sty	$13d0
	iny
	sty	$13d1
	iny
	sty	$13d2
	iny
	sty	$13d3

upd35	lda	#$00
	sta	$40
	lda	#$00
	sta	$41
	lda	#$00
	sta	$42
	lda	#$00
	sta	$43
	lda	#$00
	sta	$44
	lda	#$00
	sta	$45
	lda	#$00
	sta	$46
	lda	#$00
	sta	$47
	lda	#$00
	sta	$48
	lda	#$00
	sta	$49
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$50
	lda	#$00
	sta	$51
	lda	#$00
	sta	$52
	lda	#$00
	sta	$53
	lda	#$00
	sta	$54
	lda	#$00
	sta	$55
	lda	#$00
	sta	$56
	lda	#$00
	sta	$57
	lda	#$00
	sta	$58
	lda	#$00
	sta	$59
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$60
	lda	#$00
	sta	$61
	lda	#$00
	sta	$62
	lda	#$00
	sta	$63
	lda	#$00
	sta	$64
	lda	#$00
	sta	$65
	lda	#$00
	sta	$66
	lda	#$00
	sta	$67
	lda	#$00
	sta	$68
	lda	#$00
	sta	$69
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$70
	lda	#$00
	sta	$71
	lda	#$00
	sta	$72
	lda	#$00
	sta	$73
	lda	#$00
	sta	$74
	lda	#$00
	sta	$75
	lda	#$00
	sta	$76
	lda	#$00
	sta	$77
	lda	#$00
	sta	$78
	lda	#$00
	sta	$79
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$80
	lda	#$00
	sta	$81
	lda	#$00
	sta	$82
	lda	#$00
	sta	$83
	lda	#$00
	sta	$84
	lda	#$00
	sta	$85
	lda	#$00
	sta	$86
	lda	#$00
	sta	$87
	lda	#$00
	sta	$88
	lda	#$00
	sta	$89
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$90
	lda	#$00
	sta	$91

	lda	#$1b	; set for l35
	sta	$900f

	lda	#$00
	sta	$92
	lda	#$00
	sta	$93
	lda	#$00
	sta	$94
	lda	#$00
	sta	$95
	lda	#$00
	sta	$96
	lda	#$00
	sta	$97
	lda	#$00
	sta	$98
	lda	#$00
	sta	$99
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9D
	lda	#$00
	sta	$9E
	lda	#$00
	sta	$9F

charmap4	ldy	#$23
	sty	$13d4
	dey
	sty	$13d5
	dey
	sty	$13d6
	dey
	sty	$13d7
	dey
	sty	$13d8
	dey
	sty	$13d9
	dey
	sty	$13da
	dey
	sty	$13db
	dey
	sty	$13dc
	dey
	sty	$13dd
	dey
	sty	$13de
	dey
	sty	$13df
	dey
	sty	$13e0
	dey
	sty	$13e1
	dey
	sty	$13e2
	dey
	sty	$13e3
	dey
	sty	$13e4
	dey
	sty	$13e5
	dey
	sty	$13e6
	dey
	sty	$13e7
	dey
	sty	$13e8
	dey
	sty	$13e9
	dey
	sty	$13ea	
	dey
	sty	$13eb
	dey
	sty	$13ec
	dey
	sty	$13ed
	dey
	sty	$13ee
	dey
	sty	$13ef

upd36	lda	#$00
	sta	$0118
	lda	#$00
	sta	$0110
	lda	#$00
	sta	$0108
	lda	#$00
	sta	$0100
	lda	#$00
	sta	$f8
	lda	#$00
	sta	$f0
	lda	#$00
	sta	$e8
	lda	#$00
	sta	$e0
	lda	#$00
	sta	$d8
	lda	#$00
	sta	$d0
	lda	#$00
	sta	$c8
	lda	#$00
	sta	$c0
	lda	#$00
	sta	$b8
	lda	#$00
	sta	$b0
	lda	#$00
	sta	$a8
	lda	#$00
	sta	$a0
	lda	#$00
	sta	$98
	lda	#$00
	sta	$90
	lda	#$00
	sta	$88
	lda	#$00
	sta	$80
	lda	#$00
	sta	$78
	lda	#$00
	sta	$70
	lda	#$00
	sta	$68
	lda	#$00
	sta	$60
	lda	#$00
	sta	$58
	lda	#$00
	sta	$50
	lda	#$00
	sta	$48
	lda	#$00
	sta	$40

	lda	#$00
	sta	$0119
	lda	#$00
	sta	$0111
	lda	#$00
	sta	$0109
	lda	#$00
	sta	$0101
	lda	#$00
	sta	$f9
	lda	#$00
	sta	$f1
	lda	#$00
	sta	$e9
	lda	#$00
	sta	$e1
	lda	#$00
	sta	$d9
	lda	#$00
	sta	$d1
	lda	#$00
	sta	$c9
	lda	#$00
	sta	$c1
	lda	#$00
	sta	$b9
	lda	#$00
	sta	$b1
	lda	#$00
	sta	$a9
	lda	#$00
	sta	$a1
	lda	#$00
	sta	$99
	lda	#$00
	sta	$91
	lda	#$00
	sta	$89
	lda	#$00
	sta	$81
	lda	#$00
	sta	$79
	lda	#$00
	sta	$71
	lda	#$00
	sta	$69
	lda	#$00
	sta	$61
	lda	#$00
	sta	$59
	lda	#$00
	sta	$51
	lda	#$00
	sta	$49
	lda	#$00
	sta	$41

	lda	#$00
	sta	$011a
	lda	#$00
	sta	$0112
	lda	#$00
	sta	$010a
	lda	#$00
	sta	$0102
	lda	#$00
	sta	$fa
	lda	#$00
	sta	$f2

	lda	#$1b	; set for l36
	sta	$900f

	lda	#$00
	sta	$ea
	lda	#$00
	sta	$e2
	lda	#$00
	sta	$da
	lda	#$00
	sta	$d2
	lda	#$00
	sta	$ca
	lda	#$00
	sta	$c2
	lda	#$00
	sta	$ba
	lda	#$00
	sta	$b2
	lda	#$00
	sta	$aa
	lda	#$00
	sta	$a2
	lda	#$00
	sta	$9a
	lda	#$00
	sta	$92
	lda	#$00
	sta	$8a
	lda	#$00
	sta	$82
	lda	#$00
	sta	$7a
	lda	#$00
	sta	$72
	lda	#$00
	sta	$6a
	lda	#$00
	sta	$62
	lda	#$00
	sta	$5a
	lda	#$00
	sta	$52
	lda	#$00
	sta	$4a
	lda	#$00
	sta	$42

restore1	lda	$2000
	sta	$13c0
	lda	$2001
	sta	$13c1
	lda	$2002
	sta	$13c2
	lda	$2003
	sta	$13c3
	lda	$2004
	sta	$13c4
	lda	$2005
	sta	$13c5
	lda	$2006
	sta	$13c6
	lda	$2007
	sta	$13c7
	lda	$2008
	sta	$13c8
	lda	$2009
	sta	$13c9
	lda	$200a
	sta	$13ca
	lda	$200b
	sta	$13cb
	lda	$200c
	sta	$13cc
	lda	$200d
	sta	$13cd
	lda	$200e
	sta	$13ce
	lda	$200f
	sta	$13cf
	lda	$2010
	sta	$13d0
	lda	$2011
	sta	$13d1
	lda	$2012
	sta	$13d2
	lda	$2013

	ldy	#$20
	sty	$900e
	ldy	#$1b	; set for l01
	sty	$900f

	sta	$13d3
	lda	$2014
	sta	$13d4
	lda	$2015
	sta	$13d5
	lda	$2016
	sta	$13d6
	lda	$2017
	sta	$13d7
	lda	$2018
	sta	$13d8
	lda	$2019
	sta	$13d9
	lda	$201a
	sta	$13da
	lda	$201b
	sta	$13db
	lda	$201c
	sta	$13dc
	lda	$201d
	sta	$13dd
	lda	$201e
	sta	$13de
	lda	$201f
	sta	$13df
	lda	$2020
	sta	$13e0
	lda	$2021
	sta	$13e1
	lda	$2022
	sta	$13e2
	lda	$2023
	sta	$13e3
	lda	$2024
	sta	$13e4
	lda	$2025
	sta	$13e5
	lda	$2026
	sta	$13e6
	lda	$2027
	sta	$13e7
	lda	$2028
	sta	$13e8
	lda	$2029
	sta	$13e9
	lda	$202a
	sta	$13ea
	lda	$202b
	sta	$13eb
	lda	$202c
	sta	$13ec
	lda	$202d
	sta	$13ed
	lda	$202e
	sta	$13ee
	lda	$202f
	sta	$13ef

upd01	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	pha
	lda	#$00
	sta	$FF
	lda	#$00
	sta	$FE
	lda	#$00
	sta	$FD
	lda	#$00
	sta	$FC
	lda	#$00
	sta	$FB
	lda	#$00
	sta	$FA
	lda	#$00
	sta	$F9
	lda	#$00
	sta	$F8
	lda	#$00
	sta	$F7
	lda	#$00
	sta	$F6
	lda	#$00
	sta	$F5
	lda	#$00
	sta	$F4
	lda	#$00
	sta	$F3
	lda	#$00
	sta	$F2
	lda	#$00
	sta	$F1
	lda	#$00
	sta	$F0
	lda	#$00
	sta	$EF
	lda	#$00
	sta	$EE
	lda	#$00
	sta	$ED
	lda	#$00
	sta	$EC
	lda	#$00
	sta	$EB
	lda	#$00
	sta	$EA
	lda	#$00
	sta	$E9
	lda	#$00
	sta	$E8
	lda	#$00
	sta	$E7
	lda	#$00
	sta	$E6
	lda	#$00
	sta	$E5
	lda	#$00
	sta	$E4
	lda	#$00
	sta	$E3
	lda	#$00
	sta	$E2
	lda	#$00
	sta	$E1
	lda	#$00
	sta	$E0
	lda	#$00
	sta	$DF
	lda	#$00
	sta	$DE
	lda	#$00
	sta	$DD
	lda	#$00
	sta	$DC
	lda	#$00
	sta	$DB
	lda	#$00
	sta	$DA
	lda	#$00
	sta	$D9
	lda	#$00
	sta	$D8
	lda	#$00
	sta	$D7
	lda	#$00
	sta	$D6
	lda	#$00
	sta	$D5
	lda	#$00
	sta	$D4
	lda	#$00
	sta	$D3
	lda	#$00
	sta	$D2
	lda	#$00
	sta	$D1
	lda	#$00
	sta	$D0
	lda	#$00
	sta	$CF
	lda	#$00
	sta	$CE
	lda	#$00
	sta	$CD
	lda	#$00
	sta	$CC
	lda	#$00
	sta	$CB
	lda	#$00
	sta	$CA
	lda	#$00
	sta	$C9
	lda	#$00
	sta	$C8
	lda	#$00
	sta	$C7
	lda	#$00
	sta	$C6
	lda	#$00
	sta	$C5
	lda	#$00
	sta	$C4
	lda	#$00
	sta	$C3
	lda	#$00
	sta	$C2
	lda	#$00
	sta	$C1
	lda	#$00
	sta	$C0
	lda	#$00
	sta	$BF
	lda	#$00
	sta	$BE
	lda	#$00
	sta	$BD
	lda	#$00
	sta	$BC
	lda	#$00
	sta	$BB
	lda	#$00
	sta	$BA
	lda	#$00
	sta	$B9
	lda	#$00
	sta	$B8
	lda	#$00
	sta	$B7
	lda	#$00
	sta	$B6
	lda	#$00
	sta	$B5
	lda	#$00
	sta	$B4
	lda	#$00
	sta	$B3
	lda	#$00
	sta	$B2
	lda	#$00
	sta	$B1
	lda	#$00
	sta	$B0
	lda	#$00
	sta	$AF
	lda	#$00
	sta	$AE
	lda	#$00
	sta	$AD
	lda	#$00
	sta	$AC
	lda	#$00
	sta	$AB
	lda	#$00
	sta	$AA
	lda	#$00
	sta	$A9
	lda	#$00
	sta	$A8
	lda	#$00
	sta	$A7
	lda	#$00
	sta	$A6
	lda	#$00
	sta	$A5
	lda	#$00
	sta	$A4
	lda	#$00
	sta	$A3
	lda	#$00
	sta	$A2
	lda	#$00
	sta	$A1
	lda	#$00
	sta	$A0
	lda	#$00
	sta	$9F
	lda	#$00
	sta	$9E
	lda	#00
	sta	$9D
	lda	#$00
	sta	$9C
	lda	#$00
	sta	$9B
	lda	#$00
	sta	$9A
	lda	#$00
	sta	$99
	lda	#$00
	sta	$98
	lda	#$00
	sta	$97
	lda	#$00
	sta	$96
	lda	#$00
	sta	$95
	lda	#$00
	sta	$94
	lda	#$00
	sta	$93
	lda	#$00
	sta	$92
	lda	#$00
	sta	$91
	lda	#$00
	sta	$90
	lda	#$00
	sta	$8F
	lda	#$00
	sta	$8E
	lda	#$00
	sta	$8D
	lda	#$00
	sta	$8C
	lda	#$00
	sta	$8B
	lda	#$00
	sta	$8A
	lda	#$00
	sta	$89
	lda	#$00
	sta	$88
	lda	#$00
	sta	$87
	lda	#$00
	sta	$86
	lda	#$00
	sta	$85
	lda	#$00
	sta	$84
	lda	#$00
	sta	$83
	lda	#$00
	sta	$82
	lda	#$00
	sta	$81
	lda	#$00
	sta	$80
	lda	#$00
	sta	$7F
	lda	#$00
	sta	$7E
	lda	#$00
	sta	$7D
	lda	#$00
	sta	$7C
	lda	#$00
	sta	$7B
	lda	#$00
	sta	$7A
	lda	#$00
	sta	$79
	lda	#$00
	sta	$78
	lda	#$00
	sta	$77
	lda	#$00
	sta	$76
	lda	#$00
	sta	$75
	lda	#$00
	sta	$74
	lda	#$00
	sta	$73
	lda	#$00
	sta	$72
	lda	#$00
	sta	$71
	lda	#$00
	sta	$70
	lda	#$00
	sta	$6F
	lda	#$00
	sta	$6E
	lda	#$00
	sta	$6D
	lda	#$00
	sta	$6C
	lda	#$00
	sta	$6B
	lda	#$00
	sta	$6A
	lda	#$00
	sta	$69
	lda	#$00
	sta	$68
	lda	#$00
	sta	$67
	lda	#$00
	sta	$66
	lda	#$00
	sta	$65
	lda	#$00
	sta	$64
	lda	#$00
	sta	$63
	lda	#$00
	sta	$62
	lda	#$00
	sta	$61
	lda	#$00
	sta	$60
	lda	#$00
	sta	$5F
	lda	#$00
	sta	$5E
	lda	#$00
	sta	$5D
	lda	#$00
	sta	$5C
	lda	#$00
	sta	$5B
	lda	#$00
	sta	$5A
	lda	#$00
	sta	$59
	lda	#$00
	sta	$58
	lda	#$00
	sta	$57
	lda	#$00
	sta	$56
	lda	#$00
	sta	$55
	lda	#$00
	sta	$54
	lda	#$00
	sta	$53
	lda	#$00
	sta	$52
	lda	#$00
	sta	$51
	lda	#$00
	sta	$50
	lda	#$00
	sta	$4F
	lda	#$00
	sta	$4E
	lda	#$00
	sta	$4D
	lda	#$00
	sta	$4C
	lda	#$00
	sta	$4B
	lda	#$00
	sta	$4A
	lda	#$00
	sta	$49
	lda	#$00
	sta	$48
	lda	#$00
	sta	$47
	lda	#$00
	sta	$46
	lda	#$00
	sta	$45
	lda	#$00
	sta	$44
	lda	#$00
	sta	$43
	lda	#$00
	sta	$42
	lda	#$00
	sta	$41
	lda	#$00
	sta	$40

	jmp	keyoff