Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; ======================================================================
- loc_11b16:
- moveq #0,d5 ; Clear d5.
- move.w #$C000,d5 ; Set to write to a region of Plane A.
- bsr.w loc_10f24 ; Get a VRAM address in d5.
- lsl.w #2,d4 ; Multiply by 4 for 4 byte entry tables.
- move.w loc_11b3c(pc,d4.w),d7 ; Get amount of horizontal tiles to write.
- move.w loc_11b3c+2(pc,d4.w),d6 ; Get amount of vertical tiles to write.
- lsr.w #1,d4 ; Divide by 2 for 2 byte entry tables.
- moveq #-1,d2 ; Set d2 to $FFFFFFFF (for address).
- move.w loc_11b54(pc,d4.w),d2 ; Overwrite lower word with RAM address.
- movea.l d2,a6 ; Move the RAM address into a6.
- movea.l (a6),a6 ; Move the mappings address in that RAM address into a6.
- bsr.w loc_10f70 ; Write onto the screen.
- rts ; Return.
- ; ----------------------------------------------------------------------
- loc_11b3c:
- dc.w $0002
- dc.w $0002
- dc.w $0001
- dc.w $0001
- dc.w $0001
- dc.w $0002
- dc.w $0001
- dc.w $0002
- dc.w $0004
- dc.w $0002
- dc.w $0003
- dc.w $0003
- loc_11b54:
- dc.w $D81C
- dc.w $D820
- dc.w $D824
- dc.w $D810
- dc.w $D814
- dc.w $D818
- ; ======================================================================
Advertisement
Add Comment
Please, Sign In to add comment
