villadelfia
/
dmgtris
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Let's not speed up DAS at 20G.

This commit is contained in:
Randy Thiemann 2023-10-29 11:45:02 +01:00
parent bd8d165d3a
commit 7ce42296c8
3 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
bin/DMGTRIS.GBC
View File

Binary file not shown.

BIN
bin/DMGTRIS.pocket
View File

Binary file not shown.

12
src/field.asm
View File

@ -1279,6 +1279,9 @@ FieldProcess::
cp a, 0 ; We never want to move if the button wasn't held. cp a, 0 ; We never want to move if the button wasn't held.
jr z, .wantright jr z, .wantright
ld b, a ld b, a
ldh a, [hCurrentIntegerGravity]
cp a, 20 ; No increased DAS at 20G.
jr z, .wantright
ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate. ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate.
cp a, $FF cp a, $FF
jr nz, .checkdasleft jr nz, .checkdasleft
@ -1305,6 +1308,9 @@ FieldProcess::
cp a, 0 ; We never want to move if the button wasn't held. cp a, 0 ; We never want to move if the button wasn't held.
jr z, .donemanipulating jr z, .donemanipulating
ld b, a ld b, a
ldh a, [hCurrentIntegerGravity]
cp a, 20 ; No increased DAS at 20G.
jr z, .donemanipulating
ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate. ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate.
cp a, $FF cp a, $FF
jr nz, .checkdasright jr nz, .checkdasright
@ -3333,6 +3339,9 @@ BigFieldProcess::
cp a, 0 ; We never want to move if the button wasn't held. cp a, 0 ; We never want to move if the button wasn't held.
jr z, .wantright jr z, .wantright
ld b, a ld b, a
ldh a, [hCurrentIntegerGravity]
cp a, 20 ; No increased DAS at 20G.
jr z, .wantright
ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate. ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate.
cp a, $FF cp a, $FF
jr nz, .checkdasleft jr nz, .checkdasleft
@ -3359,6 +3368,9 @@ BigFieldProcess::
cp a, 0 ; We never want to move if the button wasn't held. cp a, 0 ; We never want to move if the button wasn't held.
jr z, .donemanipulating jr z, .donemanipulating
ld b, a ld b, a
ldh a, [hCurrentIntegerGravity]
cp a, 20 ; No increased DAS at 20G.
jr z, .wantright
ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate. ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate.
cp a, $FF cp a, $FF
jr nz, .checkdasright jr nz, .checkdasright