Accelerate DAS when grounded.
This commit is contained in:
parent
04ff7a70a5
commit
62cfe3c88c
BIN
bin/DMGTRIS.GBC
BIN
bin/DMGTRIS.GBC
Binary file not shown.
Binary file not shown.
|
@ -22,5 +22,5 @@ make > NUL
|
||||||
|
|
||||||
echo Pushing new version...
|
echo Pushing new version...
|
||||||
git add . > NUL
|
git add . > NUL
|
||||||
git commit -am "Deploy new build." > NUL
|
git commit -am %* > NUL
|
||||||
git push
|
git push
|
||||||
|
|
|
@ -1159,32 +1159,52 @@ FieldProcess::
|
||||||
; HANDLE MOVEMENT
|
; HANDLE MOVEMENT
|
||||||
; Do we want to move left?
|
; Do we want to move left?
|
||||||
.norot
|
.norot
|
||||||
ldh a, [hLeftState]
|
ldh a, [hLeftState] ; Check if held for 1 frame. If so we move.
|
||||||
cp a, 1
|
cp a, 1
|
||||||
jr z, :+
|
jr z, .doleft
|
||||||
|
cp a, 0 ; We never want to move if the button wasn't held.
|
||||||
|
jr z, .wantright
|
||||||
ld b, a
|
ld b, a
|
||||||
|
ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate.
|
||||||
|
cp a, $FF
|
||||||
|
jr nz, .checkdasleft
|
||||||
|
inc b
|
||||||
|
ld a, b
|
||||||
|
ldh [hLeftState], a
|
||||||
|
.checkdasleft
|
||||||
ldh a, [hCurrentDAS]
|
ldh a, [hCurrentDAS]
|
||||||
ld c, a
|
ld c, a
|
||||||
ld a, b
|
ld a, b
|
||||||
cp a, c
|
cp a, c
|
||||||
jr c, .wantright
|
jr c, .wantright
|
||||||
: ldh a, [hWantX]
|
.doleft
|
||||||
|
ldh a, [hWantX]
|
||||||
dec a
|
dec a
|
||||||
ldh [hWantX], a
|
ldh [hWantX], a
|
||||||
jr .trymove
|
jr .trymove
|
||||||
|
|
||||||
; Do we want to move right?
|
; Do we want to move right?
|
||||||
.wantright
|
.wantright
|
||||||
ldh a, [hRightState]
|
ldh a, [hRightState] ; Check if held for 1 frame. If so we move.
|
||||||
cp a, 1
|
cp a, 1
|
||||||
jr z, :+
|
jr z, .doright
|
||||||
|
cp a, 0 ; We never want to move if the button wasn't held.
|
||||||
|
jr z, .donemanipulating
|
||||||
ld b, a
|
ld b, a
|
||||||
|
ldh a, [hGrounded] ; If we're grounded, assume some urgency in getting DAS charged, charge at twice the rate.
|
||||||
|
cp a, $FF
|
||||||
|
jr nz, .checkdasright
|
||||||
|
inc b
|
||||||
|
ld a, b
|
||||||
|
ldh [hRightState], a
|
||||||
|
.checkdasright
|
||||||
ldh a, [hCurrentDAS]
|
ldh a, [hCurrentDAS]
|
||||||
ld c, a
|
ld c, a
|
||||||
ld a, b
|
ld a, b
|
||||||
cp a, c
|
cp a, c
|
||||||
jr c, .donemanipulating
|
jr c, .donemanipulating
|
||||||
: ldh a, [hWantX]
|
.doright
|
||||||
|
ldh a, [hWantX]
|
||||||
inc a
|
inc a
|
||||||
ldh [hWantX], a
|
ldh [hWantX], a
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue