[A83] Re: Mario Side-Scroller

To: assembly-83@lists.ticalc.org
Subject: [A83] Re: Mario Side-Scroller
From: Sk8a4good@aol.com
Date: Sun, 27 May 2001 15:22:21 EDT
Reply-To: assembly-83@lists.ticalc.org

THANK YOU!!!! That helps a lot.  I don't think that my map data is vertically 
stored it is:
map:
 .db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 ;Row 0
 .db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 ;Row 1
 .db $00,$00,$00,$00,$00,$00,$08,$00,$00,$00,$00,$00,$00,$00,$00,$00 ;Row 2
 .db $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$1A,$00,$00,$00,$00,$00 ;Row 3
 .db $00,$00,$00,$00,$00,$00,$00,$00,$00,$1A,$1A,$00,$00,$00,$15,$00 ;Row 4
 .db $00,$00,$00,$17,$1C,$1C,$1C,$1C,$1C,$1C,$1C,$18,$00,$00,$16,$00 ;Row 5
 .db $01,$01,$01,$1B,$1B,$1B,$1B,$1B,$1B,$1B,$1B,$1B,$01,$01,$01,$01 ;Row 6
 .db $02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02 ;Row 7


graphic_source:
 ;Tile 0
 .db $00,$00,$00,$00,$00,$00,$00,$00
 ;Tile 1
 .db $FF,$04,$00,$20,$AA,$55,$AA,$55
 ;Tile 2
 .db $55,$AA,$55,$AA,$55,$AA,$55,$AA
 ;Tile 3
 .db $3C,$42,$81,$81,$FF,$6A,$56,$3C
 ;Tile 4
 .db $01,$02,$04,$09,$10,$21,$42,$A5
 ;Tile 5
 .db $80,$40,$20,$90,$08,$84,$42,$A5
 ;Tile 6
 .db $FA,$FD,$FF,$FF,$FF,$FF,$FF,$FF
 ;Tile 7
 .db $5F,$BF,$FF,$FF,$FF,$FF,$FF,$FF
 ;Tile 8
 .db $7E,$DB,$A5,$89,$99,$81,$DB,$7E
 ;Tile 9
 .db $7E,$E7,$DB,$F7,$E7,$FF,$E7,$7E
 ;Tile 10
 .db $18,$24,$4A,$4A,$4A,$42,$24,$18
 ;Tile 11
 .db $00,$00,$FF,$57,$2F,$37,$2F,$37
 ;Tile 12
 .db $00,$00,$FF,$EA,$F4,$EC,$F4,$EC
 ;Tile 13
 .db $2F,$37,$2F,$37,$2F,$37,$2F,$37
 ;Tile 14
 .db $F4,$EC,$F4,$EC,$F4,$EC,$F4,$EC
 ;Tile 15
 .db $F5,$EA,$FF,$FF,$FF,$FF,$FF,$FF
 ;Tile 16
 .db $AF,$57,$FF,$FF,$FF,$FF,$FF,$FF
 ;Tile 17
 .db $3C,$48,$44,$38,$54,$6C,$6C,$38
 ;Tile 18
 .db $3C,$12,$22,$1C,$2A,$36,$36,$1C
 ;Tile 19
 .db $3C,$7E,$DB,$FF,$FF,$7E,$3C,$42
 ;Tile 20
 .db $3C,$7E,$DB,$FF,$FF,$7E,$3C,$24
 ;Tile 21
 .db $00,$3C,$7E,$FF,$FF,$FF,$FF,$FF
 ;Tile 22
 .db $FF,$F9,$F9,$FF,$FF,$FF,$FF,$FF
 ;Tile 23
 .db $7F,$84,$80,$A0,$80,$82,$80,$90
 ;Tile 24
 .db $FE,$21,$01,$05,$01,$41,$01,$09
 ;Tile 25
 .db $FE,$05,$01,$21,$AB,$55,$AB,$55
 ;Tile 26
 .db $2B,$55,$2B,$55,$2B,$55,$2B,$FF
 ;Tile 27
 .db $40,$04,$00,$20,$AA,$55,$AA,$55
 ;Tile 28
 .db $FF,$20,$00,$02,$00,$40,$04,$00
 ;Tile 29
 .db $00,$00,$00,$00,$00,$00,$00,$00
 ;Tile 30
 .db $00,$00,$00,$00,$00,$00,$00,$00
 ;Tile 31
 .db $00,$00,$00,$00,$00,$00,$00,$00
 ;Tile 32
 .db $00,$00,$00,$00,$00,$00,$00,$00


How would I store it vertically and display it?  I am using crashman's 
routine with the above map and it works just fine.  Also, should I reserve 2 
bytes for the xpos in my equates since it is being loaded into hl, or should 
I just:
ld a,(xpos)
ld l,a
ld h,0
???
Thanks again for that information.

-Cole South