Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; ===========================================================================
- ; loc_C57E:
- SwScrl_EHZ:
- move.w (Camera_X_pos_diff).w,d4
- ext.l d4
- asl.l #8,d4
- move.w (Camera_Y_pos_diff).w,d5
- ext.l d5
- asl.l #4,d5
- bsr.w SetHorizVertiScrollFlagsBG
- move.w (Camera_X_pos_diff).w,d4
- ext.l d4
- asl.l #8,d4
- moveq #4,d6
- ; move.w (Camera_BG_Y_pos).w,(Vscroll_Factor_BG).w
- lea (Horiz_Scroll_Buf).w,a1
- move.w (Camera_X_pos).w,d0
- neg.w d0
- move.w d0,d2
- swap d0
- ; ===========================================================================
- move.w d2,d0
- asr.w #1,d0
- move.w #bytesToLcnt(16),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #2,d0
- move.w #bytesToLcnt(16),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #3,d0
- move.w #bytesToLcnt(16),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #4,d0
- move.w #bytesToLcnt(16),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #5,d0
- move.w #bytesToLcnt(16),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #6,d0
- move.w #bytesToLcnt(22),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #7,d0
- move.w #bytesToLcnt(16),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #8,d0
- move.w #bytesToLcnt(13),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #6,d0
- move.w #bytesToLcnt(47),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #4,d0
- move.w #bytesToLcnt(79),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #3,d0
- move.w #bytesToLcnt(65),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #2,d0
- move.w #bytesToLcnt(128),d1
- - move.l d0,(a1)+
- dbf d1,-
- ; ===========================================================================
- move.w d2,d0
- asr.w #2,d0
- move.w #bytesToLcnt($FF),d1
- - move.l d0,(a1)+
- dbf d1,-
- rts
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement