Advertisement
Guest User

Untitled

a guest
Mar 23rd, 2019
196
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.92 KB | None | 0 0
  1. ; ===========================================================================
  2. ; loc_C57E:
  3. SwScrl_EHZ:
  4. move.w (Camera_X_pos_diff).w,d4
  5. ext.l d4
  6. asl.l #8,d4
  7. move.w (Camera_Y_pos_diff).w,d5
  8. ext.l d5
  9. asl.l #4,d5
  10. bsr.w SetHorizVertiScrollFlagsBG
  11. move.w (Camera_X_pos_diff).w,d4
  12. ext.l d4
  13. asl.l #8,d4
  14. moveq #4,d6
  15. ; move.w (Camera_BG_Y_pos).w,(Vscroll_Factor_BG).w
  16. lea (Horiz_Scroll_Buf).w,a1
  17. move.w (Camera_X_pos).w,d0
  18. neg.w d0
  19. move.w d0,d2
  20. swap d0
  21. ; ===========================================================================
  22.  
  23. move.w d2,d0
  24. asr.w #1,d0
  25.  
  26. move.w #bytesToLcnt(16),d1
  27. - move.l d0,(a1)+
  28. dbf d1,-
  29. ; ===========================================================================
  30.  
  31. move.w d2,d0
  32. asr.w #2,d0
  33.  
  34. move.w #bytesToLcnt(16),d1
  35. - move.l d0,(a1)+
  36. dbf d1,-
  37. ; ===========================================================================
  38.  
  39. move.w d2,d0
  40. asr.w #3,d0
  41.  
  42. move.w #bytesToLcnt(16),d1
  43. - move.l d0,(a1)+
  44. dbf d1,-
  45. ; ===========================================================================
  46.  
  47. move.w d2,d0
  48. asr.w #4,d0
  49.  
  50. move.w #bytesToLcnt(16),d1
  51. - move.l d0,(a1)+
  52. dbf d1,-
  53. ; ===========================================================================
  54.  
  55. move.w d2,d0
  56. asr.w #5,d0
  57.  
  58. move.w #bytesToLcnt(16),d1
  59. - move.l d0,(a1)+
  60. dbf d1,-
  61. ; ===========================================================================
  62.  
  63. move.w d2,d0
  64. asr.w #6,d0
  65.  
  66. move.w #bytesToLcnt(22),d1
  67. - move.l d0,(a1)+
  68. dbf d1,-
  69. ; ===========================================================================
  70.  
  71. move.w d2,d0
  72. asr.w #7,d0
  73.  
  74. move.w #bytesToLcnt(16),d1
  75. - move.l d0,(a1)+
  76. dbf d1,-
  77. ; ===========================================================================
  78.  
  79. move.w d2,d0
  80. asr.w #8,d0
  81.  
  82. move.w #bytesToLcnt(13),d1
  83. - move.l d0,(a1)+
  84. dbf d1,-
  85. ; ===========================================================================
  86.  
  87. move.w d2,d0
  88. asr.w #6,d0
  89.  
  90. move.w #bytesToLcnt(47),d1
  91. - move.l d0,(a1)+
  92. dbf d1,-
  93. ; ===========================================================================
  94.  
  95. move.w d2,d0
  96. asr.w #4,d0
  97.  
  98. move.w #bytesToLcnt(79),d1
  99. - move.l d0,(a1)+
  100. dbf d1,-
  101. ; ===========================================================================
  102.  
  103. move.w d2,d0
  104. asr.w #3,d0
  105.  
  106. move.w #bytesToLcnt(65),d1
  107. - move.l d0,(a1)+
  108. dbf d1,-
  109. ; ===========================================================================
  110.  
  111. move.w d2,d0
  112. asr.w #2,d0
  113.  
  114. move.w #bytesToLcnt(128),d1
  115. - move.l d0,(a1)+
  116. dbf d1,-
  117. ; ===========================================================================
  118.  
  119. move.w d2,d0
  120. asr.w #2,d0
  121.  
  122. move.w #bytesToLcnt($FF),d1
  123. - move.l d0,(a1)+
  124. dbf d1,-
  125.  
  126.  
  127. rts
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement