summaryrefslogtreecommitdiff
path: root/engine/battle/1.asm
diff options
context:
space:
mode:
authorxCrystal <rgr.crystal@gmail.com>2015-04-01 11:23:27 +0200
committerxCrystal <rgr.crystal@gmail.com>2015-04-01 17:05:10 +0200
commite74dce24b4bbb0d0d23a1724932b289050b66d4a (patch)
treeac695b04a00f7af920e1e84b88adbcb0fce84842 /engine/battle/1.asm
parent9d93b5b630eaabd57f213c9dc5761223ff7445ec (diff)
Rename battle files and split move effects Part 1
1.asm, 4.asm, and 4_2.asm
Diffstat (limited to 'engine/battle/1.asm')
-rwxr-xr-xengine/battle/1.asm104
1 files changed, 0 insertions, 104 deletions
diff --git a/engine/battle/1.asm b/engine/battle/1.asm
deleted file mode 100755
index 517d53d1..00000000
--- a/engine/battle/1.asm
+++ /dev/null
@@ -1,104 +0,0 @@
-DrainHPEffect_: ; 783f (1:783f)
- ld hl, W_DAMAGE
- ld a, [hl]
- srl a ; divide damage by 2
- ld [hli], a
- ld a, [hl]
- rr a
- ld [hld], a
- or [hl] ; is damage 0?
- jr nz, .getAttackerHP
-; if damage is 0, increase to 1 so that the attacker gains at least 1 HP
- inc hl
- inc [hl]
-.getAttackerHP
- ld hl, wBattleMonHP
- ld de, wBattleMonMaxHP
- ld a, [H_WHOSETURN]
- and a
- jp z, .addDamageToAttackerHP
- ld hl, wEnemyMonHP
- ld de, wEnemyMonMaxHP
-.addDamageToAttackerHP
- ld bc, wHPBarOldHP+1
-; copy current HP to wHPBarOldHP
- ld a, [hli]
- ld [bc], a
- ld a, [hl]
- dec bc
- ld [bc], a
-; copy max HP to wHPBarMaxHP
- ld a, [de]
- dec bc
- ld [bc], a
- inc de
- ld a, [de]
- dec bc
- ld [bc], a
-; add damage to attacker's HP and copy new HP to wHPBarNewHP
- ld a, [W_DAMAGE + 1]
- ld b, [hl]
- add b
- ld [hld], a
- ld [wHPBarNewHP], a
- ld a, [W_DAMAGE]
- ld b, [hl]
- adc b
- ld [hli], a
- ld [wHPBarNewHP+1], a
- jr c, .capToMaxHP ; if HP > 65,535, cap to max HP
-; compare HP with max HP
- ld a, [hld]
- ld b, a
- ld a, [de]
- dec de
- sub b
- ld a, [hli]
- ld b, a
- ld a, [de]
- inc de
- sbc b
- jr nc, .next
-.capToMaxHP
- ld a, [de]
- ld [hld], a
- ld [wHPBarNewHP], a
- dec de
- ld a, [de]
- ld [hli], a
- ld [wHPBarNewHP+1], a
- inc de
-.next
- ld a, [H_WHOSETURN]
- and a
- hlCoord 10, 9
- ld a, $1
- jr z, .next2
- hlCoord 2, 2
- xor a
-.next2
- ld [wHPBarType], a
- predef UpdateHPBar2
- predef DrawPlayerHUDAndHPBar
- predef DrawEnemyHUDAndHPBar
- callab ReadPlayerMonCurHPAndStatus
- ld hl, SuckedHealthText
- ld a, [H_WHOSETURN]
- and a
- ld a, [W_PLAYERMOVEEFFECT]
- jr z, .next3
- ld a, [W_ENEMYMOVEEFFECT]
-.next3
- cp DREAM_EATER_EFFECT
- jr nz, .printText
- ld hl, DreamWasEatenText
-.printText
- jp PrintText
-
-SuckedHealthText: ; 78dc (1:78dc)
- TX_FAR _SuckedHealthText
- db "@"
-
-DreamWasEatenText: ; 78e1 (1:78e1)
- TX_FAR _DreamWasEatenText
- db "@"