;
; Maciej 'YTM/Alliance' Witkowiak
;
; 21.12.99

	    .importzp ptr4
	    
	    .export BitmapRegs

	    .include "../inc/geossym.inc"

BitmapRegs:			;a/x is a struct iconpic*
	    sta ptr4
	    stx ptr4+1
	    ldy #0
bmpLp:	    lda (ptr4),y
	    sta r0L,y
	    iny
	    cpy #6
	    bne bmpLp
	    rts