;
; 21.12.99
- .importzp ptr4
- .export BitmapRegs
+ .importzp ptr4
+ .export BitmapRegs
- .include "geossym.inc"
+ .include "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
+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