LoadArt:
		subi.w	#1,d3		; number of words - 1
		movea.l	d1,a4		; address to art in ROM
		lea	($C00000).l,a6	; VRAM data address
		swap	d2		; Convert word address to VRAM control
		clr.w	d2
		swap	d2
		lsl.l	#2,d2
		lsr.w	#2,d2
		ori.w	#$4000,d2
		swap	d2

LoadArt_Loop:
		move.l	d2,4(a6)	; set VRAM location
		move.w	(a4)+,(a6)	; copy word to VRAM
		add.l	#$020000,d2	; next word
		dbf	d3,LoadArt_Loop
		rts