Advertisement
IsoKilo

P128 Rev01 Guide Restored

May 29th, 2023 (edited)
548
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
M68000 Assembler 2.62 KB | Source Code | 0 0
  1. MARKEYJESTER'S GUIDE ON PORTING REV01 EFFECTS TO PROJECT SONIC 1: TWO-EIGHT
  2. RESTORED BY KILO SINCE SONIC RETRO'S FORMATTING UPDATES DESTROYED IT. AND PEOPLE SHOULDN'T HAVE TO USE A SHITTY GIT FORK.
  3.  
  4. ----------------------------------------------------
  5. goto sub_6886:
  6. change
  7.  
  8.        lea ($FFFFA440).w,a4
  9.  
  10. to
  11.  
  12.        movea.l ($FFFFA404).w,a4    ; MJ: Load address of layout BG
  13.  
  14. ----------------------------------------------------
  15.  
  16. goto LoadTilesAsYouMove:
  17. change
  18.  
  19.        lea ($FFFFA440).w,a4
  20.  
  21. to
  22.  
  23.        movea.l ($FFFFA404).w,a4    ; MJ: Load address of layout BG
  24.  
  25. and change
  26.  
  27.        lea ($FFFFA400).w,a4
  28.  
  29. to
  30.  
  31.        movea.l ($FFFFA400).w,a4    ; MJ: Load address of layout
  32.  
  33. ----------------------------------------------------
  34.  
  35. goto sub_70AC:  (Was sub_6B32: in normal S1)
  36. change
  37.  
  38.        btst    #4,(a0)
  39.  
  40. to
  41.  
  42.        btst    #3,(a0) ; MJ: checking bit 3 not 4 (Flip)
  43.  
  44. and change
  45.  
  46.        btst    #3,(a0)
  47.  
  48. to
  49.  
  50.        btst    #2,(a0) ; MJ: checking bit 2 not 3 (Mirror)
  51.  
  52. ----------------------------------------------------
  53.  
  54. goto loc_70E8: (Was loc_6B6E: in normal S1)
  55. change
  56.  
  57.        btst    #3,(a0)
  58.  
  59. to
  60.  
  61.        btst    #2,(a0) ; MJ: checking bit 2 not 3 (Mirror)
  62.  
  63. ----------------------------------------------------
  64.  
  65. goto loc_712C: (Was sub_6BD6: in normal S1)
  66. remove
  67.  
  68.        lsr.w   #1,d3
  69.  
  70. change
  71.  
  72.        andi.w  #$380,d3
  73.  
  74. to
  75.  
  76.        andi.w  #$780,d3    ; MJ: get within 780 (Not 380) (E00 pixels (not 700)) in multiples of 80
  77.  
  78. and change
  79.  
  80.        lsr.w   #5,d0
  81.  
  82. to
  83.  
  84.        lsr.w   #4,d0   ; MJ: divide by 10 (Not 20)
  85.  
  86. under this command
  87.  
  88.        andi.w  #$7F,d0
  89.  
  90. insert this
  91.  
  92.        lsl.w   #$01,d3 ; MJ: multiply by 2 (So it skips the BG)
  93.  
  94. remove these two
  95.  
  96.        beq.s   locret_7172
  97.        subq.b  #1,d3
  98.  
  99. change
  100.  
  101.        andi.w  #$7F,d3
  102.  
  103. to
  104.  
  105.        andi.w  #$FF,d3 ; MJ: keep within FF
  106.  
  107. under this command
  108.  
  109.        ror.w   #7,d3
  110.  
  111. insert this
  112.  
  113.        ror.w   #2,d3   ; MJ: ..plus an extra 2 (so it's within 80 bytes, not 200)
  114.  
  115. remove
  116.  
  117.         add.w   d4,d4
  118.  
  119. change these two
  120.  
  121.         andi.w  #$1E0,d4
  122.         andi.w  #$1E,d5
  123.  
  124. to this
  125.  
  126.         andi.w      #$070,d4    ; MJ: keep Y pos within 80 pixels
  127.         andi.w      #$0E,d5 ; MJ: keep X pos within 10
  128.  
  129. ----------------------------------------------------
  130.  
  131. goto LoadTilesFromStart:
  132. change
  133.  
  134.         lea ($FFFFA400).w,a4
  135.  
  136. to
  137.  
  138.         movea.l ($FFFFA400).w,a4    ; MJ: Load address of layout
  139.  
  140. and change
  141.  
  142.         lea ($FFFFA440).w,a4
  143.  
  144. to
  145.  
  146.         movea.l ($FFFFA404).w,a4    ; MJ: Load address of layout BG
  147.  
  148. ----------------------------------------------------
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement